我想写一个VB程序,用到了IF,以下是代码
Private Sub Command3_Click()
Open "C:\保存.txt" For Output As #1
Print #1, Combo1.Text
Print #1, Text1.Text '写入文件
Close #1 '关闭文件
If Combo1.Text = "0319" Then MsgBox "XXX", , "XXX"
Else
MsgBox "找不到文件GroupConnection.dll,重新安装会解决此问题", vbOKOnly + vbExclamation, , "缺少文件"
End If
End Sub
为什么是 Else 没有 IF呢?我错在哪里巨侠们帮帮忙我是小白
參考答案:Private Sub Command3_Click()
Open "C:\保存.txt" For Output As #1
Print #1, Combo1.Text
Print #1, Text1.Text '写入文件
Close #1 '关闭文件
If Combo1.Text = "0319"
Then MsgBox "XXX",48 , "XXX"
Else
MsgBox "找不到文件GroupConnection.dll,重新安装会解决此问题", vbOKOnly + vbExclamation , "缺少文件"
End If
End Sub
修改vbExclamation后的应该是一个逗号,而不是两个逗号!谢谢!