Imam jedan problem koji nikako da resim. Na formi imam listbox koji se puni podacima koji su smesteni u cetiri kolone. Zeleo bih da sacuvam podatke iz svih kolona listboxa u odgovarajuca polja u tabeli, medjutim sve sto sam do sada uspeo je da sacuvam podatke iz prve kolone. Da li neko zna kako da sacuvam podatke iz svih kolona listboxa. ovo je deo koda kojim pokusavam da procitam multicolumn listbox:
For i = 0 To List1.ListCount - 1
If List1.Selected(i) Then
tstr = tstr & "' , '" & List1.ItemData(i)
End If
tstr = Mid(tstr, 2)
MsgBox tstr 'Nazalost ovaj string sadrzi samo podatke iz prve kolone
Next