Risultati da 1 a 11 di 11

Discussione: Visualizzazione di array

  1. #1
    New Member
    Data Registrazione
    15-06-2010
    Messaggi
    13

    Visualizzazione di array

    Scusate, vorrei chiedere se e` possibile ,avendo una matrice bidimensionale, averla a video con visulalizzazione tipo casella combinata senza salvarla prima in una tabella .
    Grazie

  2. #2
    Software Zone Fanatic L'avatar di MANDRAKE
    Data Registrazione
    28-12-2002
    Messaggi
    3.100
    spiegati meglio

    che linguaggio di programmazione usi ?

  3. #3
    New Member
    Data Registrazione
    15-06-2010
    Messaggi
    13
    Scusa, uso il VBA di Access2003. Vorrei un esempio pratico di come popolare una casella combinata con elenco valori e usando ADDITEM membro dell' oggetto Listbox.
    Grazie

  4. #4
    Software Zone Fanatic L'avatar di MANDRAKE
    Data Registrazione
    28-12-2002
    Messaggi
    3.100
    per aggiungere un elemento in una casella combinata (combobox) devi usare il metodo

    AddItem

    quindi dovrai fare un ciclo che scorre l'array e nel contempo popola la combobox


    Dim i As Integer
    With combobox1
    For i = 0 To UBound(array) '(UBound(array) ti dà il totale elementi Array)
    .AddItem array(i)
    Next i

    'Seleziona il primo elemento.
    .ListIndex = 0
    End With


    ciao

  5. #5
    New Member
    Data Registrazione
    15-06-2010
    Messaggi
    13
    Scusami , ho usato questo codice e va bene, solo che vorrei che la listbox avesse piu` colonne .Come si genera ?

    Sub Alist()
    For I = 1 To 50
    Forms![Prova Calcolo].CS1.AddItem I
    Next
    End Sub

  6. #6
    Software Zone Fanatic L'avatar di MANDRAKE
    Data Registrazione
    28-12-2002
    Messaggi
    3.100
    Allora non era una casella combinata !!!!

    a te serve una listview !!!


    Dim tempItem As ListItem
    With listview1
    .View = lvwReport 'tipo visualizzazione report
    'pulisce la lista
    .ListItems.Clear
    'pulisce ColumnHeaders collection.
    .ColumnHeaders.Clear
    'crea le colonne
    .ColumnHeaders.Add , , "ID", 200
    .ColumnHeaders.Add , , "prova calcolo", 1000


    For I = 1 To 50
    Set tempItem = .ListItems.Add()
    tempItem.text I

    tempItem .SubItems(I) = "Pippo" & I

    next

    End With


    ciao

  7. #7
    New Member
    Data Registrazione
    15-06-2010
    Messaggi
    13
    Grazie.Ti faro` sapere come va` .

  8. #8
    New Member
    Data Registrazione
    15-06-2010
    Messaggi
    13
    Scusa ma il termine :"Dim tempItem As ListItem" non esiste in Access2003, forse bisogna usare :"Dim tempItem As ListBox" ?
    Mi fai sapere qualcosa?
    Grazie

  9. #9
    Software Zone Fanatic L'avatar di MANDRAKE
    Data Registrazione
    28-12-2002
    Messaggi
    3.100
    Scaricati questo esempio (link con zip)
    ActiveX Listview control with ImageList - Access World Forums

    1 ) Apri una maschera

    2) vai su Inserisci =>controlli activex ...

    3) cerca Microsoft ListView Control e vedi esempio di utilizzo del link sopra

    ciao

  10. #10
    New Member
    Data Registrazione
    15-06-2010
    Messaggi
    13
    Grazie di tutto, il codice finale e` :

    Sub Alist()
    Dim I As Byte
    With Forms![Prova Calcolo].CR1
    .RowSource = ""
    .ColumnCount = 7
    .ColumnWidths = "1200;800;800;800;800;800;800"
    For I = 1 To 100
    .AddItem I & ";" & I + 1 & ";" & I + 2 & ";" & I + 3 & ";" & I + 4 & ";" & I + 5 & ";" & I + 6
    Next I
    End With
    End Sub

    Saluti

  11. #11
    Software Zone Fanatic L'avatar di MANDRAKE
    Data Registrazione
    28-12-2002
    Messaggi
    3.100


    ciao

Segnalibri

Permessi di Scrittura

  • Tu non puoi inviare nuove discussioni
  • Tu non puoi inviare risposte
  • Tu non puoi inviare allegati
  • Tu non puoi modificare i tuoi messaggi
  •