For i = 1 To 200
    j = Len(i)
    MsgBox j
Next

执行第一次的时候，j的值不应该是1吗？怎么都是2
当i=100时    j还是2？  为毛？

你在前面加一句dim i as long试试，即：
Dim i As Long
For i = 1 To 200
    j = Len(i)
    MsgBox j
Next

我定义了的
Dim j As Integer, i As Integer
   按你说的  我定义成long
结果  j 的值变成了 4
想说len不是计算字符长度的么……

Len 函数

返回 Long，其中包含字符串内字符的数目，或是存储一变量所需的字节数。

-----------------
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()是读字符串的长度吧？用len(str(i))再试

我好像有点弄明白了，len(n)如果n是string,则是字符长度，如果是其它的则返回字节数，是这样吗

我只知道是字符串的话返回长度，如果是其他类型没试过，不过从你的运行结果来看应该是字节数。

首先你要知道变量类型
INteger整形，2 Bit 存储内存
LOng长整形，4 Bit 存储内存
String 字符
你用LEN去LEN数字，当然INTEGER就是2，LONG就是4啦

[ 本帖最后由 renxiaoyao36 于 2015-10-12 19:55 编辑 ]

转换成字符串再算长度就没有问题了！~

学习了-------