Excel form Esempio da Kadr L.

L'utente può visualizzare i record con i pulsanti di controllo precedente e di controllo successivo facilmente .Anche in questa forma,

Se si fa clic su "cmdfirst" pulsante, il modulo va al primo record.Or Se si fa clic sul pulsante "cmdlast", il modulo va all'ultimo record.While visualizzano i record su casella di riepilogo, è possibile vedere l'ordine dei record in "TextBox" search

immagine Natura è stata utilizzata come sfondo del bel modello questo userform.Very

Codici Button Precedente:.

Se ListBox1.ListIndex = 0 Then

MsgBox "First Record", vbCritical

Exit Sub

Else

TextBox6 = TextBox6 - 1

Con Me.ListBox1

.ListIndex = .ListIndex - 1

End With

End If


Codici di Next Button:


Se ListBox1.ListIndex = ListBox1.ListCount - 1 Poi

MsgBox "Last Record", vbCritical

Exit Sub

Else

TextBox6 = TextBox6 + 1

Con Me.ListBox1

.ListIndex = .ListIndex + 1

End With

End If



http://youtu.be/HqF1NdILrLs


Più Vedere

Scarica