如题所述
1、if逻辑不对
2、判断条件写法不对
修改如下:
Private Sub Command1_Click()
Dim nvzu
Dim nvzum
nvzu = "黑雪姬"
nvzum = "heixueji"
If Text1.Text = nvzu Then
If Text2.Text = nvzum Then
Label3.Caption = "欢迎" + Text1.Text + "进入加速世界!"
Else
Label3.Caption = "密码错误!"
End If
End If
If Text1.Text <> nvzu Then
Label3.Caption = "角色不存在!"
End If
End Sub追问
2、判断条件写法不对
修改如下:
Private Sub Command1_Click()
Dim nvzu
Dim nvzum
nvzu = "黑雪姬"
nvzum = "heixueji"
If Text1.Text = nvzu Then
If Text2.Text = nvzum Then
Label3.Caption = "欢迎" + Text1.Text + "进入加速世界!"
Else
Label3.Caption = "密码错误!"
End If
End If
If Text1.Text <> nvzu Then
Label3.Caption = "角色不存在!"
End If
End Sub追问
谢谢大神,初次学习还不是很懂,想请大神教我,不知意下如何
请问怎么做两个角色呢
温馨提示:答案为网友推荐,仅供参考