下面应该可以
Dim a As StringDim b As Integera = InputBox("请输入内容")b = Len(a)Print b
10-29 101阅读
04-12 154阅读
01-22 147阅读
10-28 113阅读
05-04 97阅读
04-21 149阅读
05-17 177阅读
10-11 197阅读
04-05 237阅读
04-18 104阅读