[VB WORD] hoe list box vullen ?

[vso]

Ik mis (internet)google op mijn werk
na de helpfile doorgespit te hebben snap ik er nog geen jota van

het probleem:
ik wil via 2/3 tekstboxjes de waardes die de gebruiker intikt weg laten schrijven naar een Listbox
nu krijg ik wel 1 value naar 1 rij maar naar rij 1 colom 0 en colom 2 het is me niet gelukt !
additem/list / array etc


het ziet er een beetje cryptisch als volgt uit
gebruiker drukt op knop en "hup"

code:

textbox1.value + textbox2.value(etc) naar listbox (colom 0 en colom 1)

en weet iemand een goeie reference guide (1 document ofzo) met voorbeelden voor VB ?
o ja het is office 97

ik schrijf normaal beetje batch scripts voor dos

[mbrouwer]

Het is mij, mede door een niet echt duidelijke zinsopbouw, niet helemaal duidelijk wat je nu wilt en en wat er niet werkt.

Als je meerdere kolommen wilt vullen in een standaard listbox dan heb je een probleem want er zit maar 1 kolom in een listbox.

Als je de text van verschillende textboxen aan een listbox wilt toevoegen is de code :

code:

Listbox.additem (TextBox1.text & TextBox2.text)

Zoiets zou het in ieder geval in "echt" VB6 zijn...

[Daos]

Dit staat gewoon in de help:
object.List( row, column ) [= Variant]

bv

Visual Basic:

ListBox1.List(0, 0) = "x"
ListBox1.List(0, 1) = "y"

[WillyF]

Ik weet niet of dit ook werkt in Office 97, maar het volgende werkt wel in Office 2000

Eerst een array definiëren: Dim arrTexten(1 to 2, 1 to 1)

Dan de strings / waardes van de 2 textboxen uitlezen, en die in de array zetten

arrTexten(1,1) = Zin1
arrTexten(2,1) = Zin2

Als laatste de array toewijzen aan de listbox:

code:

Private Sub BewerkShowFormulier()
    With frmShowInvoer.kiesKeuze
        .ColumnCount = 2
        .ColumnWidths = "50;50"
        .Column() = arrTexten
    End With
    frmShowInvoer.Show
End Sub

edit:

teveel getest en te langzaam getikt...

[ Voor 7% gewijzigd door WillyF op 25-07-2005 18:21 ]

[vso]

mbrouwer schreef op maandag 25 juli 2005 @ 17:57:
Het is mij, mede door een niet echt duidelijke zinsopbouw, niet helemaal duidelijk wat je nu wilt en en wat er niet werkt.

Als je meerdere kolommen wilt vullen in een standaard listbox dan heb je een probleem want er zit maar 1 kolom in een listbox.

Als je de text van verschillende textboxen aan een listbox wilt toevoegen is de code :

code:

Listbox.additem (TextBox1.text & TextBox2.text)

Zoiets zou het in ieder geval in "echt" VB6 zijn...

dat werkt dus niet (niet wat ik wil)

en ja je kan wel meerdere colomen in een listbox defineren

Daos schreef op maandag 25 juli 2005 @ 18:16:
Dit staat gewoon in de help:
object.List( row, column ) [= Variant]

bv

Visual Basic:

ListBox1.List(0, 0) = "x"
ListBox1.List(0, 1) = "y"

hmm volgens mij heb ik dat ook geprobeerd maar ook dat werkte niet (error) op "x" gedeelte ik had staan textbox1.value (ook tussen haakjes geprobeerd) zonder "" de value was niet correct (hij accepteert de value dan niet die als string staat. (ziet hem als getal ofzo )

WillyF schreef op maandag 25 juli 2005 @ 18:20:
Ik weet niet of dit ook werkt in Office 97, maar het volgende werkt wel in Office 2000

Eerst een array definiëren: Dim arrTexten(1 to 2, 1 to 1)

Dan de strings / waardes van de 2 textboxen uitlezen, en die in de array zetten

arrTexten(1,1) = Zin1
arrTexten(2,1) = Zin2

Als laatste de array toewijzen aan de listbox:

code:

Private Sub BewerkShowFormulier()
    With frmShowInvoer.kiesKeuze
        .ColumnCount = 2
        .ColumnWidths = "50;50"
        .Column() = arrTexten
    End With
    frmShowInvoer.Show
End Sub

dit zou ik wel kunnen proberen

edit:

ps beter langzaam en goed dan halfbakken jou optie is IMHO het beste tot nu toe

[ Voor 5% gewijzigd door vso op 25-07-2005 18:49 ]

[Daos]

vso schreef op maandag 25 juli 2005 @ 18:48:

[...]


hmm volgens mij heb ik dat ook geprobeerd maar ook dat werkte niet (error) op "x" gedeelte ik had staan textbox1.value (ook tussen haakjes geprobeerd) zonder "" de value was niet correct (hij accepteert de value dan niet die als string staat. (ziet hem als getal ofzo )
[/edit]

.List(0,0) werkt alleen als er al items in de listbox staan. Items toevoegen moet dan bv met ListBox1.AddItem. Dit alles staat gewoon in de help van de AddItem Method:

For a multicolumn ListBox or ComboBox, AddItem inserts an entire row, that is, it inserts an item for each column of the control. To assign values to an item beyond the first column, use the List or Column property and specify the row and column of the item.

De methode van WillyF staat gewoon in de help bij Column Property:

You can also use Column to copy an entire two-dimensional array of values to a control. This syntax lets you quickly load a list of choices rather than individually loading each element of the list using AddItem.

Je moet dus gewoon (de help) leren lezen.

[vso]

Daos schreef op maandag 25 juli 2005 @ 21:14:
[...]


.List(0,0) werkt alleen als er al items in de listbox staan. Items toevoegen moet dan bv met ListBox1.AddItem. Dit alles staat gewoon in de help van de AddItem Method:

[...]


De methode van WillyF staat gewoon in de help bij Column Property:

[...]


Je moet dus gewoon (de help) leren lezen.

je hebt gelijk !!

Toch vindt ik het bijzonder prettig dat mensen me het uitkunnen leggen wat ik niet snap, soms zit je er zo dicht op .. dat je het niet meer ziet. ik zie VB toch wat meer als progammeren dan scripten

en communicatie tussen de leek en degene met ervaring leert bijde kanten wat de 1 om ermee te werken en de ander om het duidelijk uit te leggen de help lezen kost ook moeite als je er niet in thuis bent