[求助]
谁能帮我啊 老师给我留的作业我做不好
Select Case ComboBox1.SelectedIndex
Case -1
If ComboBox1.Text = "请选择" Then
MessageBox.Show("请选择类型")
End If
Case 0
If TextBox1.Text = "zs" Then : TextBox2.Text = 123 : ComboBox1.Text = "学生"
MessageBox.Show("登陆成功")
Else : TextBox2.Text = 123 : TextBox1.Text = "zs" = False : ComboBox1.Text = "学生" = True MessageBox.Show("用户名不正确") If TextBox1.Text = "zs" = True Then : TextBox2.Text = 123 = False : ComboBox1.Text = "学生" = True MessageBox.Show("密码不正确")
If ComboBox1.Text = "学生" = False Then : TextBox1.Text = "zs" = True : TextBox2.Text = 123 = True : MessageBox.Show("你选择的类型不符") End If End If End If
