VBA LEN 函数返回字符串中的字符数。
Len(文本)
获取多行字符数:
Sub LenExample1() MsgBox Len("") '返回:0 MsgBox Len("45") '退货:2 MsgBox Len("excel") '退货:5 MsgBox Len("www.moonexcel.com.ua") '退货:20 variable = "moonexcel" MsgBox Len(variable) '退货:9 End Sub
在执行操作之前检查用户名至少包含 3 个字符的条件下使用 Len 函数:
Sub LenExample2() name = InputBox("输入用户名:", "姓名") If Len(name) >= 3 Then MsgBox "做得好" & name & "!" End If End Sub