Oppure

Loading
23/08/11 12:44
AldoPiccione
Ciao a tutti! Ho dei dubbi sulle Combobox, in pratica vorrei che se l'utente scegliesse un'elemento della lista variasse qualcosa nel form. Ad esempio, se dalla lista sceglie "Ciao" vorrei che su un Label fosse scritto "Arrivederci", è possibile farlo? Scusate se la domanda è banale, ma ho cercato su internet e non ho trovato risposte..
aaa
23/08/11 18:40
Sal47
Ciao,
in un Form inserisci un ComboBox con proprietà Style=0 e in List un elenco a piacere (tipo A B C ecc), poi con il codice seguente risolvi:
---------------
Option Explicit

Private Sub Combo1_Click()
Select Case Combo1.ListIndex
Case 0
Label1 = "Arrivederci"
Case 1
Label1 = "Grazie"
Case 2
Label1 = "A domani"
End Select
End Sub
--------------
Saluti
aaa
24/08/11 7:37
AldoPiccione
Grazie mille per la puntuale risposta!! Nel mio programma ho inserito una funzione di login, e vorrei sapere se, con un unico command (in questo caso ho utlizzato due immagini) posso gestire sia il login dell'user che dell'admin, il codice utilizzato da me è questo, però ho utlizzato due command:

Private Sub Image1_Click()
    If Text1.Text = "user" And Text2.Text = "ciaociao" Then
        Me.Visible = False
        Form2.Show
        
     Else
        MsgBox "Username e Password non riconosciuti", vbCritical, "Errore"
        Text1.Text = ""
        Text2.Text = ""
        Text1.SetFocus
    End If

End Sub

Private Sub Image2_Click()
    If Text1.Text = "amministratore" And Text2.Text = "ciao" Then
        Me.Visible = False
        Form3.Show
        
     Else
        MsgBox "Username e Password non riconosciuti", vbCritical, "Errore"
        Text1.Text = ""
        Text2.Text = ""
        Text1.SetFocus
    End If
End Sub
Ultima modifica effettuata da AldoPiccione 24/08/11 10:11
aaa
24/08/11 15:56
Sal47
Ciao,
premettendo che sono anche io "alle prime armi", vorrei provare ad aiutarti ancora ma non capisco bene il nuovo quesito:
- vuoi eliminare una delle due Images?
- quando dici "però ho utilizzato due command" ti riferisci alle due Images o alle due TextBox?
aaa
24/08/11 16:42
AldoPiccione
In pratica, per una questione puramente grafica, invece di utilizzare due command utilizzo due immagini, e vorrei eliminare una delle due per far si che una svolga il compito sia di login utente che di login admin..
aaa
24/08/11 17:14
Sal47
Allora io ho provato a fare così:
- lasciare le due textbox senza alcun nome,
- aggiungere due label "Digita nome Utente" e "Digita password",
- eliminare la seconda Image,
- e modificare il codice così:
--------------------
Option Explicit
Private Sub Image1_Click()
If Text1.Text = "user" And Text2.Text = "ciaociao" Then
Me.Visible = False
Form2.Show
GoTo 1
End If
If Text1.Text = "amministratore" And Text2.Text = "ciao" Then
Me.Visible = False
Form3.Show
GoTo 1
End If
MsgBox "Username e Password non riconosciuti", vbCritical, "Errore"
Text1.Text = ""
Text2.Text = ""
Text1.SetFocus
1:
End Sub
--------------
Saluti
aaa
25/08/11 16:42
AldoPiccione
Grazie mille :)
aaa