Bekijk de onderstaande video om te zien hoe je onze site als een web app op je startscherm installeert.
Opmerking: Deze functie is mogelijk niet beschikbaar in sommige browsers.
Public Class Form1
Private Sub Login_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Login.Click
naam.Text = "accountnaam"
password.Text = "accountpassword"
Me.Hide()
End Sub
Private Sub cancel_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cancel.Click
Me.Close()
End Sub
End Class
Je kan makelijk een inlog systeem maken maar dat je de rest kan weet ik niet
(inlog systeem
Code:Public Class Form1 Private Sub Login_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Login.Click naam.Text = "accountnaam" password.Text = "accountpassword" Me.Hide() End Sub Private Sub cancel_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cancel.Click Me.Close() End Sub End Class
If txtuser.text = "user" then
If txtpass.text = "pass" then
msg("Welkom")
ese
msg("Foutief wachtwoord/username")
End if
else
msg("Foutief wachtwoord/username")
End if
Public Class Form1
Private Sub Login_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Login.Click
naam.Text = "accountnaam"
password.Text = "accountpassword"
Me.Hide()
Else
Msgbox ("Verkeerd")
End Sub
Private Sub cancel_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cancel.Click
Me.Close()
End Sub
End Class
We gebruiken essentiële cookies om deze site te laten werken, en optionele cookies om de ervaring te verbeteren.