Als beginnend VB-er heb ik een stukje script gemaakt maar dat werkt niet (joh, hoe kan dat nou)..
Ik heb al gezocht hier op tweakers en via google kom ik er ook niet uit. Ik dacht dat het zo wel zou moeten werken. Wanneer ik op de login button druk van mijn form krijg ik alleen de message te zien uit mijn messagebox. Ook wanneer hij aan de voorwaarde voldoet. Iemand een idee?
a.u.b. geen flauwe reacties over dat de code zo simpel enz is..
Dit is de code:
=======================================================
Dim userid As String
Dim pw As String
If userid = "beheer" And pw = "12345" Then
Dim Other As Form
Other = New Beheerder_Hoofdscherm
Other.Show()
Me.Hide()
ElseIf userid = "medewerker" And pw = "123" Then
Dim med As Form
med = New Medewerker_Hoofdscherm
med.Show()
Me.Hide()
Else : MsgBox("Vul a.u.b. uw goede username en wachtwoord in.")
End If
=======================================================
Ik heb al gezocht hier op tweakers en via google kom ik er ook niet uit. Ik dacht dat het zo wel zou moeten werken. Wanneer ik op de login button druk van mijn form krijg ik alleen de message te zien uit mijn messagebox. Ook wanneer hij aan de voorwaarde voldoet. Iemand een idee?
a.u.b. geen flauwe reacties over dat de code zo simpel enz is..
Dit is de code:
=======================================================
Dim userid As String
Dim pw As String
If userid = "beheer" And pw = "12345" Then
Dim Other As Form
Other = New Beheerder_Hoofdscherm
Other.Show()
Me.Hide()
ElseIf userid = "medewerker" And pw = "123" Then
Dim med As Form
med = New Medewerker_Hoofdscherm
med.Show()
Me.Hide()
Else : MsgBox("Vul a.u.b. uw goede username en wachtwoord in.")
End If
=======================================================