VB中LENGTH函数怎么用（显示字符长度）

Question

如题所述

Answer 1

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.

Answer 2

i=len(text1.text)本回答被提问者采纳

Answer 3

其实很简单 先建立两个文本框一个按钮
Dim a,b AS String（声明a,b为字符串）
a = textbox1.text （a=文本框1）
b = len（a）
textbox2.text=b

Answer 4

len()