ciao a tutti,
io nella mia paginazione mi muovo da una pagina all'altra con questo codice:
io vorrei evitare di scrivere i numeri ecc.. e mettere delle immagini che mi rappresentano la Prossima Pagina e la Precendente.codice:Sub BuildPagers() ' ciclo Dim i As Integer Dim lb As Label If TotalPages > 1 Then lb = New Label() lb.Text = "Ci sono " & TotalPages & " pagine con i risultati: " paginazione.Controls.Add(lb) For i = 1 To (TotalPages) lb = New Label() lb.ID = "ThisPage" & i If CurrentPage = i Then lb.Text = "[" & i & "] " & vbCrLf Else lb.Text = "[" & i & "] " & vbCrLf End If paginazione.Controls.Add(lb) Next End If End Sub
come posso fare?