Home Page
Articoli
Tips & Tricks
News
Forum
Archivio Forum
Blogs
Sondaggi
Rss
Video
Utenti
Chi Siamo
Contattaci
Username:
Password:
Login
Registrati ora!
Recupera Password
Home Page
Stanze Forum
App. WinForms / WPF .NET
[vb.net] Esempio ProgressBar in ListView
martedì 17 aprile 2007 - 14.16
Elenco Threads
Stanze Forum
Aggiungi ai Preferiti
Cerca nel forum
seven.7
Profilo
| Junior Member
127
messaggi | Data Invio:
mar 17 apr 2007 - 14:16
Salve a tutti, ho trovato un po' di script in giro ma sinceramente non sono stato in grado di capire bene il funzionamento. Qualcuno può gentilmente aiutarmi? grazie anticipatamente
[
http://img70.imageshack.us/my.php?image=prolistviewln0.gif
Public Function ListView_AddProgressBar(ByRef pListView As System.Windows.Forms.ListView, ByVal ListViewItemIndex As Integer, ByVal ColumnIndex As Integer) As System.Windows.Forms.ProgressBar
Dim r As Rectangle
Dim pb As New System.Windows.Forms.ProgressBar
r = pListView.Items(ListViewItemIndex).Bounds()
r.Width = pListView.Columns(ColumnIndex).Width
If ColumnIndex > 0 Then
r.X = r.X + pListView.Columns(ColumnIndex - 1).Width
End If
pb.Parent = pListView
pb.SetBounds(pListView.Columns(ColumnIndex).Width, r.Y, r.X, r.Height)
pb.Visible = True
Return pb
End Function
Public Sub VisualizzaRecordXML()
Dim contatore As Integer
For contatore = 1 To Me.NumeroDiUsimRegistrate
Dim ITEM(8) As String
Dim L As ListViewItem
ITEM(0) = ds.Tables(contatore - 1).Rows(0).Item("ID")
ITEM(1) = ds.Tables(contatore - 1).Rows(0).Item("Numero3")
ITEM(2) = ds.Tables(contatore - 1).Rows(0).Item("Profilo")
ITEM(3) = ds.Tables(contatore - 1).Rows(0).Item("CreditoResiduo")
ITEM(4) = ds.Tables(contatore - 1).Rows(0).Item("ParzialeMeseInCorsoSMS")
ITEM(5) = ds.Tables(contatore - 1).Rows(0).Item("ParzialeMeseInCorsoEuro")
If ds.Tables(contatore - 1).Rows(0).Item("ParzialeMeseInCorsoEuro") <> "Non disponibile" Then
ITEM(6) = (CType(ds.Tables(contatore - 1).Rows(0).Item("ParzialeMeseInCorsoEuro"), Integer).ToString("n0") * 100 / Me.Importo_limite_supertuapiu).ToString("n0") & " %"
Else
ITEM(6) = "Valore 0"
End If
ITEM(7) = ds.Tables(contatore - 1).Rows(0).Item("DataUltimoAggiornamento")
L = New ListViewItem(ITEM)
Me.USIMElenco.Items.Add(L)
ListView_AddProgressBar(Me.USIMElenco, 0, 7)
Next
End Sub
questo è lo script trovato... il mio problema è quello di visualizzare un progressbar in una list view in modo da rendere un po la grafica accattivante e veloce. mi servirebbe creare in sostanza quelle list view come i programmi sharing che ti permettono di visualizzare lo stato del download...
io sinceramente è la prima volta che mi trovo in questa situazione quindi non so' se mi conviene usare un list view oppure un datagrid view visto che i dati sono xml... cerco anche un cosiglio... grazie
Torna su
Stanze Forum
Elenco Threads
Partecipa anche tu! Registrati!
Hai bisogno di aiuto ?
Perchè non ti registri subito?
Dopo esserti registrato potrai chiedere
aiuto sul nostro
Forum
oppure aiutare gli altri
Consulta le
Stanze
disponibili.
Registrati ora !