podaci iz datagrida u listbox

[ 101kerber @ 25.08.2007. 11:09 ] @

Dali mi može netko reći kako da npr. podaci iz jednog stupca iz datagrida budu upisani u Listbox?

Znači imam datagrid u kojem je učitana neka tablica, i sada želim da podatke iz stupca "Prezime" upišem u Listbox tako da u njemu imam sva prezimena iz tog stupca.

Dali mi može netko reći kako općenito mogu iz određenog stupca u datagridu doći do podatka.Znači da kažem da hoću podatak iz trećeg reda datagrida iz stupca "Ime" ? Npr. želim da je taj podatak upisan u label1.caption?

Riječ je o VisualBasicu 6.0.

Unaprijed hvala.

[ steve585 @ 25.08.2007. 16:59 ] @

Code:

Label1.Caption = DataGrid1.Text

[ 101kerber @ 25.08.2007. 22:31 ] @

Ovo sam i ja znao.

Ali kako da ja učitam točno određeno polje iz određenog redka i određenog stupca? Pri tome mislim bez korištenja miša.

[ steve585 @ 26.08.2007. 10:20 ] @

Code:
DataGrid1.Row = 1
DataGrid1.Col = 1
a = DataGrid1.Text
Label1.Caption = a

[ BinLaden @ 26.08.2007. 12:55 ] @

Mislim da si ovo traazio:

Code:
Private Sub Command1_Click()
Dim I As Integer
Dim iRow As Integer
Dim iCol As Integer

    For I = 1 To DataGrid1.Rows - 1
        List1.AddItem DataGrid1.TextMatrix(I, 3)
    Next I
    '--------------------------------------------
    iRow = 2
    iCol = 3

    Label1.Caption = DataGrid1.TextMatrix(iRow, iCol)

End Sub

Pogledaj svojstvo "TextMatrix" Grida, sa njim direktno izvlacis podatka iz odredjenog polja
Grida. Trebas samo proslijediti broj Kolone i broj Redka Grida u Funkciju, da bi se pozicionirao
u odredjeno polje.

[ steve585 @ 26.08.2007. 13:20 ] @

Kod mene DataGrid nema svojstvo TextMatrix

[ rgdrajko @ 26.08.2007. 22:42 ] @

Evo na brzinu ono sto si trazio.

Code:

Private Sub Form_Load()

    Adodc1.RecordSource = "SELECT * FROM Proba"

    datoteka = "C:\Proba\db1.mdb"

    Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & datoteka & ";Persist Security Info=False"

    Set DataGrid1.DataSource = Adodc1

    For r = 0 To 10
            DataGrid1.Row = r
            DataGrid1.Col = 1
            List1.AddItem DataGrid1.Text
    Next r

    DataGrid1.Row = 2
    DataGrid1.Col = 1
    Label1.Caption = DataGrid1.Text

    DataGrid1.Row = 0
    DataGrid1.Col = 0

End Sub

[ BinLaden @ 27.08.2007. 22:16 ] @

Moja greska, mislio sam da se radi o MSFlexGridu, nisam obracao paznju.

[ 101kerber @ 30.08.2007. 17:59 ] @

Hvala ljudi na pomoći. Uglavnom ste mi razjasnili princip rada sa datagridom, sada mi je dalje sve lakše.

Međutim,sada imam problema s nečim što mi se činilo sasvim jednostavnim i s čime nisam mislio da ću imati problema.

Upišem sljedeći kod:

Code:

datagrid1.col=0
br = datagrid1.ApproxCount - 1
For c = 0 To br
datagrid1.Row = c
List1.AddItem (datagrid1.Text)
Next c

I u List1 mi ne upiše sve iz datagrid kolone, uvijek fali podatak iz jednog reda. I što je još zanimljivije uvijek je taj podatak koji nedostaje iz predzadnjeg reda datagrida??

A najviše me živcira to što sam ovakav isti dio koda već koristio na jednoj drugoj formi i normalno radi.