Visual Basic 6 - ListBox

Forum - Visual Basic 6 - ListBox - Pagina 2

Pagine: [ 1 2 ]

gius (Ex-Member)
Expert

Messaggi: 294
Iscritto: 20/06/2007

Postato alle 22:53
Mercoledì, 21/11/2007

I database sono divisi in celle quindi é più facile incolonnare

moet (Normal User)
Pro

Messaggi: 185
Iscritto: 13/11/2007

Postato alle 22:56
Mercoledì, 21/11/2007

questo è il mio codice... leggo da db e inserisco in listbox... ma come incolonnarli bene non saprei come fare... se puoi aiutarmi ! grazie

Codice sorgente - presumibilmente VB.NET

Private Sub Form_Load()
    stringa = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="
    stringa = stringa & App.Path & "\componenti.mdb"
    
    Set cn = New ADODB.Connection
    Set rs = New ADODB.Recordset
 
    cn.Open stringa
    rs.Open "SELECT * FROM Tabella1", cn, 1
 
    If rs.EOF Then
        MsgBox "Database VUOTO!", vbExclamation, "HELPDESK"
    Else
        While rs.EOF = False
           
           List1.AddItem rs("Nome") & vbTab & rs("Cognome") & vbTab & rs("Ditta") & vbTab & rs("mansione")
 
                            
            rs.MoveNext
        Wend
    End If
 
    Set cn = Nothing
    Set rs = Nothing
End Sub

gius (Ex-Member)
Expert

Messaggi: 294
Iscritto: 20/06/2007

Postato alle 22:59
Mercoledì, 21/11/2007

Scusa ma se allarghi tanto le listbox il nome non ti ci entra

moet (Normal User)
Pro

Messaggi: 185
Iscritto: 13/11/2007

Postato alle 23:01
Mercoledì, 21/11/2007

Qui è questione di incolonnare non di farcele stare! ci stanno !!!!!!! eheh :alert:

P4p3r0g4 (Member)
Guru

Messaggi: 1319
Iscritto: 29/12/2006

Postato alle 0:18
Giovedì, 22/11/2007

puo creare un effetto stile cella di excel usando i column.
occhio però che ti aggiunge i campi in verticale,
è solo un effetto ottico.
se ad esempio ho 3 campi metto column = 4
e la lunghezza del listbox quanto l'inserimento completo dei valori
poi inserisco tutti gli elementi del 1 campo,poi del 2 poi del 3
l'effetto ottico è creato.

Pagine: [ 1 2 ]