各位,是这样的,我想读出当前datagrid其中一列的全部数据。学号      姓名
001       陈三
002       李四以下这个程序,只能读出一条当前DARAGEID1其中一列的数据,但循环就不行。For i = 0 To DataGrid1.Columns.Count
a(i) = DataGrid1.Columns.Item(1)
Next i请问应如何修改,谢谢。

解决方案 »

  1.   

    你有没有用绑定?
    我是用ADO绑定的
    For I = 1 To adodc1.Recordset.RecordCount
      adodc1.Recordset(列号).Value
    adodc1.Recordset.MoveNext
    next i
      

  2.   

    有,对啊,这样也应可以的,谢谢!
    但请问能否用datagrid的属性来完成,我想学多点。
      

  3.   

    rs.movefirst
    do until rs.eof 
      msgbox datagrid1.column(列号).text
      rs.movenext
    loop
      

  4.   

    不行啊。
    你这样不是还要打开个连接,对象,datagrid不是已经打开过了,
    我想通过循环直接把datagrid的数据显示出来就行了,不用再打开数据库来查询。
      

  5.   

    不心用循环显示的,赋给DataGrid就行了:Rs.CursorLocation = adUseClient
    Set dataGrid1.DataSource = Rs
      

  6.   

    我的意思是现在datagrid已经显示出了所有需要的数据,
    现在通过一个按钮按某一列的全部数据再存储其他的表格去。例如用户通过查询,窗体里现在datagrid已经显示了相关的数据(如下):-------------------------
    姓名      学号      分数
    张三      001       100
    李四      002       90
    王五      003       80
    -------------------------   现在所做的是把“学号”这列的所有数据,存到另外一张表。
    现首先所做的是读出,请问应怎么读出当前datagrid已经有的数据?