简单的说,就是读取一个字符串的 字符长度 的函数。
实例1:
1 Sub W1() 2 If Len(Dir("d:/A.xls")) = 0 Then 3 MsgBox "A文件不存在" 4 Else 5 MsgBox "A文件存在" 6 End If 7 End Sub
实例2:
1 For x = 5 To 13 2 Cells(x - 4, 1) = "NO." & Left("000", 3 - Len(x)) & x 3 Next
另外:
Len函数,不仅可以表示字符串的长度,还可以表示存储某变量需要的字节数。
代码测试:
1 Sub xx() 2 Dim a As Long, b as Integer 3 MsgBox Len(a) ‘显示结果为4 4 msgbox Len(b) ‘显示结果为2 5 a = 11 6 MsgBox Len(a) ‘显示结果依然为4 7 End Sub