主题:两个判断语句连接后为什么就错了
设计一个如图所示的应用程序,它能利用LostFocus事件过程对输入的内存大小进行合法性检查,确保最后两个字符是“MB”,其余的都是数字字符。当用户单击“OK”按钮后,在右边的文本框中显示所选的信息。
我的程序是这样的,为什么单独的检查“MB”和数字字符的时候是正确的,当把两个语句用AND 连接起来后就检查不出来了呢??
Private Sub Text1_LostFocus()
a = Len(Text1)
If (Not IsNumeric(Left(Text1, a - 2))) And (Right(Text1, 2) <> "MB") Then
MsgBox "输入的格式不对!", , "警告"
Text1.Text = " "
Text1.SetFocus
End If
End Sub
请各位好汉指教!!!
我的程序是这样的,为什么单独的检查“MB”和数字字符的时候是正确的,当把两个语句用AND 连接起来后就检查不出来了呢??
Private Sub Text1_LostFocus()
a = Len(Text1)
If (Not IsNumeric(Left(Text1, a - 2))) And (Right(Text1, 2) <> "MB") Then
MsgBox "输入的格式不对!", , "警告"
Text1.Text = " "
Text1.SetFocus
End If
End Sub
请各位好汉指教!!!