Excel UserForm Eksempel af Kadr L.

Brugeren kan se posterne med tidligere kontrol- og næste knapper nemt .Også i denne form,

Hvis du klikker på "cmdfirst" knappen, formen går til den første record.Or Hvis du klikker på "cmdlast" knappen, formen går til den sidste record.While visning poster på listefeltet, kan du se rækkefølgen af ​​records i "TextBox"

Natur billede blev brugt som baggrund for denne userform.Very flot skabelon

etiske Forrige Button:.

Hvis ListBox1.ListIndex = 0 Så

MsgBox "First Record", vbCritical

Afslut Sub

Else

TextBox6 = TextBox6 - 1

Med Me.ListBox1

.ListIndex = .ListIndex - 1

End Med

End If

etiske næste knap:

Hvis ListBox1.ListIndex = ListBox1.ListCount - 1 Så

MsgBox "Sidste Record", vbCritical

Afslut Sub

Else

TextBox6 = TextBox6 + 1

Med Me.ListBox1

.ListIndex = .ListIndex + 1

End Med

End If

http://youtu.be/HqF1NdILrLs

Mere Se

Hent