Sistema Login

[fezzinn 0]

 

Public Class Form1

   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
       If ComboBox1.Text = "Gustavo" And TextBox2.Text = "12" Then
       End If
       If ComboBox1.Text = "312" And TextBox2.Text = "312" Then
       End If
       If ComboBox1.Text = "321" And TextBox2.Text = "132" Then
       End If
       If ComboBox1.Text = "Fes" And TextBox2.Text = "112" Then
       End If
       If ComboBox1.Text = "31" And TextBox2.Text = "122" Then
           MsgBox("Parabéns você está dentro do sistema", MsgBoxStyle.Information, "Logado Com Sucesso")
           Form3.Show()
       Else
           MsgBox("Verifique os campos corretamente", MsgBoxStyle.Critical, "Erro De Login")
           TextBox2.Text = ""

       End If
   End Sub

   Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
       Form2.Show()
   End Sub
End Class

 

 

Pessoal, então o código acima é do meu Projeto.

No caso eu queria fazer para quando selecionar algum item no ComboBox, e digitar a senha entre.

Mas colocar vários usuários!

Alguém me ajuda?

[Durbano 1]

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

If ComboBox1.Text = "Gustavo" And TextBox2.Text = "12" or ComboBox1.Text = "312" And TextBox2.Text = "312" or ComboBox1.Text = "321" And TextBox2.Text = "132" or ComboBox1.Text = "Fes" And TextBox2.Text = "112" or ComboBox1.Text = "31" And TextBox2.Text = "122" Then

 

MsgBox("Parabéns você está dentro do sistema", MsgBoxStyle.Information, "Logado Com Sucesso")

Form3.Show()

Else

MsgBox("Verifique os campos corretamente", MsgBoxStyle.Critical, "Erro De Login")

TextBox2.Text = ""

 

End If

End Sub

 

End Class