Login non scompare

di il
21 risposte

Login non scompare

Buonasera,
io ho creato un sistema di login che quando inserisco il nome e la password mi fa entrare.
tutto perfetto tranne che quando clicco su accedi compare la home ma il form di login scompare e ricompare.
ho messo sia che me.hide sia che me.dispose ma niente.
ecco il codice:

Public Class Login
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        If ComboBox1.Text = "Alessandra" And TextBox2.Text = "11A1111" Then
            Me.Hide()
            homeal.Show()
        Else
            Label1.Visible = 100
            If ComboBox1.Text = "Bianca" And TextBox2.Text = "6B1111" Then
                homebi.Show()
                Me.Hide()
            Else
                Label1.Visible = 100
                If ComboBox1.Text = "Gaetano" And TextBox2.Text = "7G1111" Then
                    homega.Show()
                    Me.Hide()
                End If
            End If
        End If
    End Sub

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Me.ComboBox1.Items.Add("Alessandra")
        Me.ComboBox1.Items.Add("Bianca")
        Me.ComboBox1.Items.Add("Gaetano")
    End Sub
End Class

21 Risposte

  • Re: Login non scompare

    ..... ma questa domanda non l'avevi già fatta ??

    comunque correggi il post e al posto del primo "<tag>" ci scrivi "[ code ]", e al posto del secondo "<tag>" ci scrivi "[ /code ]"
    (p.s.: tra la scritta "code" e le parentesi quadre non ci devono essere gli spazi, io li ho messi per leggibilità)

    1) cosa serve la linea seguente ??
    Label1.Visible = 100

    2) Come prima riga del tuo codice devi mettere
    Option Strict On
  • Re: Login non scompare

    Label1.visible = 100 ho sbagliato
    EDIT: non funziona
  • Re: Login non scompare

    Eppure avevi detto che avevo ragione quando te l'ho segnalato... se ripeti il thread con gli stessi errori non ne esci più... ma ovviamente non si può perdere tempo...
  • Re: Login non scompare

    Innanzitutto al posto di Me.Hide() mettici un bel Me.Dispose(), e poi controlla bene su tutto il resto del codice che hai perchè mi sa che da qualche altra parte vai a chiamare di nuovo il form "Login" e non te ne sei accorto.
  • Re: Login non scompare

    Nn funziona.
    ho ricontrollato ma non funziona.
    ho anche messo me.dispose ma niente.
    qualche altra soluzione?
  • Re: Login non scompare

    Posta uno zip con il progetto da scaricare perché sarà una cosa banale ma non possiamo andare avanti se non mostri tutto il codice di tutti i form
  • Re: Login non scompare

    Https://we.tl/t-DC77Rn5Hd
  • Re: Login non scompare

    Cambia con
    
            Dim ErrLog As Boolean = True
    
            If ComboBox1.Text = ... Then
                ErrLog = False
            ElseIf ComboBox1.Text = ... Then
                ErrLog = False
            ElseIf ComboBox1.Text = ... Then            
                ErrLog = False
            ElseIf ComboBox1.Text = ... Then            
                ErrLog = False
            End If
    
            If ErrLog Then
                Label1.Visible = True
            Else
                Me.Dispose(
                homeal.Show()
            End If
    
    anche se tutte quelle If non si possono vedere ... questa parte (il login) sarebbe tutto da rivedere ... cmounque il problema è che la Label1.Visible veniva semore eseguita ed essendo della Form Login questa veniva riaperta.
  • Re: Login non scompare

    Scusa, ma non è questo il problema, perché ho provato sia ha mettere quello che mi hai consigliato e sia ad cancellare label1.
  • Re: Login non scompare

    Leggi bene il codice che ti ho proposto.
  • Re: Login non scompare

    Ho provato ma non funziona.
    ho capito cosa vuol dire il codice ma non funziona.
  • Re: Login non scompare

    Che vuol dire non funziona?? Mostra una schermata, un elenco di errori ... non funziona non vuol dire nulla.
  • Re: Login non scompare

    È come prima. la schermata (login) rimane
  • Re: Login non scompare

    Allora non hai ricompilato. Posta nuovamente lo zip aggiornato e ricompilato.
Devi accedere o registrarti per scrivere nel forum
21 risposte