IL MENU ha questo codice in LOAD
La form LOGIN ha questo codice quando viene premuto il pulsante "ACCEDI", che è quello che fa verifica della login.Private Sub Form_menù_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.Hide()
Form_login.Show()
End Sub
Private Sub login_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles accedi.Click
Dim permessi As Integer = verifica_login(login.Text, password.Text)
If permessi < 0 Then
Windows.Forms.MessageBox.Show("Nome utente, o password, non corretti")
Form_menù.Close()
Else
Me.Close()
Form_menù.visible=true
Form_menù.permessi = permessi
End If
End Sub
Non esiste altro codice nel progetto, a parte le funzioni, e poc'altro contenuto in altre form.