VB的IF THEN语句

来源:百度知道 编辑:UC知道 时间:2024/05/31 10:02:53
Private Sub Form_Click()
Dim b As Variant
a$ = InputBox("enter a string:", "check box")
If Len(a$) > 6 Then
Print "1111111"
ElseIf Len(a$) < 6 Then
Print "222222222"
ElseIf b(a$) = "a" Then
Print "33333333333"
End If
End Sub

为什么我输入什么值不管真假VB都认为第2个语句块是真的 是什么原因呢?

你这个程序本身好象就有问题
ElseIf b(a$) = "a" Then
Print "33333333333"
根本无意义
至于"VB都认为第2个语句块是真的"不知道是不是
ElseIf Len(a$) < 6 Then
Print "222222222"
这一块 我调试没你说的这个问题~