Question

VB中 编写程序,从键盘输入一个字符串,并统计字符串包含的字符个数

Answer 1

'添加一个Lebel控件
'比如用Text1来接收键盘的字符
Private Sub Text1_Change()
    Label1.Caption = "共输入" & Len(Text1.Text) & "个字符"
End Sub

希望可以帮到你

Answer 2

如下所示：

Private Sub xxxx()
Dim a As String
Dim b As Integer
a = InputBox("请输入内容")
b = Len(a)
MsgBox "字符串包含字符个数为：" & b
End Sub