VB中LENGTH函数怎么用(显示字符长度)
推荐于2018-04-24 · 知道合伙人软件行家
VB中Length是一个控件的属性,另有一个Len函数可返回字符个数。
Len 函数
返回 Long,其中包含字符串内字符的数目,或是存储一变量所需的字节数。
注意 LenB
函数作用于字符串中的字节数据,如同在双字节字符集(DBCS)语言中一样。所以 LenB
返回的是用于代表字符串的字节数,而不是返回字符串中字符的数量。如为用户自定义类型,LenB 返回在内存中的大小,包括元素之间的衬垫。
Len 函数示例
本示例使用 Len
函数来得知某字符串的长度(字符数)或某变量的大小(位数)。Type...End Type 程序区块定义一个自定义数据类型
CustomerRecord。如果该数据类型定义在对象类模块中,则必需以关键字 Private
开头(表示为私有)。若定义在常规模块中,Type 定义就可以为 Public。
Type CustomerRecord ' 定义用户自定义的数据类型。
ID As Integer ' 将此定义放在常规模块中。
Name As String * 10
Address As String * 30
End Type
Dim 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。
注意当字符串中是汉字时,Len函数返回的是字符个数。
Private Sub Command1_Click()
Debug.Print "VB中LENGTH函数怎么用(显示字符长度)"
Debug.Print Len("VB中LENGTH函数怎么用(显示字符长度)")
Debug.Print LenB("VB中LENGTH函数怎么用(显示字符长度)")
End Sub
代码输出字符串长度是22个字符。
输出的字节数是44.
Dim a,b AS String(声明a,b为字符串)
a = textbox1.text (a=文本框1)
b = len(a)
textbox2.text=b