UC知道关于VB的if then的条件问题
来源：百度知道 编辑：UC知道 时间：2024/06/06 20:32:23
Private Sub Command1_Click()
If Text1 = a Then
Shell "cmd /c shutdown -a"
Else
MsgBox "密码错"
End If
End Sub
Private Sub Form_Load()
Shell "cmd /c shutdown -s -t 3600 -f"
a = text1
End Sub
上面的是我写的，如果If Then这里的条件直接输入数字的话可以直接判断，但是如果输入英文或者其的话，就会出错，然后自动退出，但如果按照我上面的输入的话无论条件是否正确，都会执行else后面的语句，这是为什么？如何if then语句进行判断，无论输入什么都什么都可以正确判断？
If Text1 = a Then
Shell "cmd /c shutdown -a"
Else
MsgBox "密码错"
End If
End Sub
Private Sub Form_Load()
Shell "cmd /c shutdown -s -t 3600 -f"
a = text1
End Sub
上面的是我写的，如果If Then这里的条件直接输入数字的话可以直接判断，但是如果输入英文或者其的话，就会出错，然后自动退出，但如果按照我上面的输入的话无论条件是否正确，都会执行else后面的语句，这是为什么？如何if then语句进行判断，无论输入什么都什么都可以正确判断？
首先 在command1_click 里面
定义了一个a（程序自动定义）
然后在form_load 里面
程序又是自动定义了一个a
两个a不是一个a，是不一样的谢谢……
顺便说下：字符串转数字：使用CInt或者Val
数字转字符串：Str
你的变量a不是公共变量
应该是
dim a as string
Private Sub Command1_Click()
If Text1 = a Then
Shell "cmd /c shutdown -a"
Else
MsgBox "密码错"
End If
End Sub
Private Sub Form_Load()
Shell "cmd /c shutdown -s -t 3600 -f"
a = text1
End Sub
if val(text1)=val(a) then......