什么毛病呢(初学VB的人的求助)
Private Sub Command1_Click() Dim name, pass, x1, y1, x2, y2 name = InputBox("Input your name") pass = InputBox("Input your pass") x1 = "yexuxiang" y1 = "123456" x2 = "QQ" y2 = "342462561" If name = x1 And pass = y1 Then _ MsgBox ("welcome your!") And Form1.Picture = LoadPicture("C:\Documents and Settings\Administrator\My Documents\My Pictures\07568.jpg")
Else: If name = x2 And pass = y2 Then _ MsgBox ("yes,good!") And Form1.Picture = LoadPicture("C:\Documents and Settings\Administrator\My Documents\My Pictures\2004123119369241.gif")
End Sub 上面的代码运行时总是出现"ELSE没有IF"的错误提示,请问是什么意思呀,到底哪里出错了呢,书上都是这么写的代码呀?急死人了,又没有MSDN
