Zdravím jsem začátečník ve VB. Zkoušel jsem udělat přihlášení pomocí databáze to všechno jede ok. Ale chci přidat funkci na tlačítko Přihlásit abych na něj nemusel jenom klikat myší ale aby šlo i potvrdit Entrem. Děkuji za radu Kód zde:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim Přihlášení = Me.JmenoHesloTableAdapter1.JmenoHesloString(txtjmeno.Text, txtheslo.Text)
If Přihlášení Is Nothing Then
MsgBox("Nesprávné údaje")
Else
MsgBox("Vítejte, úspěšně jste se přihlásil do systému")
Form2.Show()
Me.Hide()
End If
End Sub
|