求教为何返回值分别为2,42,11,8

来源:百度知道 编辑:UC知道 时间:2024/06/17 11:42:34
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。

MyLen = Len(MyInt) 因为是Integer类型所以是2
MyLen = Len(Customer) 结构体类型 大小为其内变量大小的和,即2+10+30=42
MyLen = Len(MyString) 也就是Hello World的长度,一共是11个字符(包括中间的空格哦)
MyLen = Len(MyCur) 因为是Currency 类型(货币变量),所以长度是8