Len 函数示例
本示例使用 Len 函数来得知某字符串的长度(字符数)或某变量的大小(位数)。Type...End Type 程序区块定义一个自定义数据类型 CustomerRecord。如果该数据类型定义在对象类模块中,则必需以关键字 Private 开头(表示为私有)。若定义在常规模块中,Type 定义就可以为 Public。Type CustomerRecord ' 定义用户自定义的数据类型。
ID As Integer ' 将此定义放在常规模块中。
Name As String * 10
Address As String * 30
End TypeDim Customer As CustomerRecord ' 声明变量。
Dim MyInt As Integer, MyCur As Currency
Dim MyString, MyLen
MyString = "Hello World" ' 设置变量初值。
MyLen = Len(MyInt) ' 返回 2。
MyLen = Len(Customer) ' 返回 42。
MyLen = Len(MyString) ' 返回 11。
MyLen = Len(MyCur) ' 返回 8。问题一,请问变量的大小(位数)是什么意思?
问题二,“Name As String * 10”,定义字符型变量,后面的“*10”是什么意思?
问题三,“Len(MyInt)”返回的为什么是2,请问是怎么算的?
本示例使用 Len 函数来得知某字符串的长度(字符数)或某变量的大小(位数)。Type...End Type 程序区块定义一个自定义数据类型 CustomerRecord。如果该数据类型定义在对象类模块中,则必需以关键字 Private 开头(表示为私有)。若定义在常规模块中,Type 定义就可以为 Public。Type CustomerRecord ' 定义用户自定义的数据类型。
ID As Integer ' 将此定义放在常规模块中。
Name As String * 10
Address As String * 30
End TypeDim Customer As CustomerRecord ' 声明变量。
Dim MyInt As Integer, MyCur As Currency
Dim MyString, MyLen
MyString = "Hello World" ' 设置变量初值。
MyLen = Len(MyInt) ' 返回 2。
MyLen = Len(Customer) ' 返回 42。
MyLen = Len(MyString) ' 返回 11。
MyLen = Len(MyCur) ' 返回 8。问题一,请问变量的大小(位数)是什么意思?
问题二,“Name As String * 10”,定义字符型变量,后面的“*10”是什么意思?
问题三,“Len(MyInt)”返回的为什么是2,请问是怎么算的?
解决方案 »
- ★CSDN&DOTA黑店!本人6年CW经验,收徒弟,点草过PIS2009等 欢迎加入^_^QQ群号48343524★
- 怎样判断Adodc查询结果是否有记录?
- 多行文字TextBox无法转移setfocus怎么办?
- 谁能把这个文本文件里的特定城市信息读出来?
- 如何实现WEBBROWSER自动点击里面的链接?
- 3道小问题,各位大侠帮个忙
- 基础问题~怎样与access做的数据库联接?请大家一定要回答啊~~
- 我想把计算结果保存在文本框中,该如何做?
- 高分!去掉VB菜单选中后的高亮显示
- 我使用ListView控件来显示RecordSet的结果集,请问,这个控件有没有一个方法可以一次把已经显示出来东西全不清除掉,以便我能显示新的东西呢?????
- ccrpProgressBar如何使用
- 如何实现下列数据比较功能?
问题一,变量的大小是指变量不同类型有着不同的字节的存储空间,如:INT 占用2个字节,LONG 占用4个字节。
问题二,是指有10个字符长度的字符串
问题三:返回2个字节,