解决方案 »

  1.   

    dim s as string
    datagrid1.col=2
    datagrid1.row=2
    得到第2行2列的值:
    s=datagrid1.text
    由于你要得到选中的行,所以row不用赋值
      

  2.   

    因为默认的row的值就是选中的行的值
      

  3.   

    Private Sub Command1_Click()
        MsgBox DataGrid1.Text
    End Sub
      

  4.   


    Private Sub DBGrid1_RowColChange(LastRow As Variant, ByVal LastCol As Integer)
     
    End Sub
      

  5.   

    比如说你有6列
    Private Sub DBGrid1_RowColChange(LastRow As Variant, ByVal LastCol As Integer)
     Msgbox(DBGrid1.Columns(0).Value)
    Msgbox(DBGrid1.Columns(1).Value)
    Msgbox(DBGrid1.Columns(2).Value)
    Msgbox(DBGrid1.Columns(3).Value)
    Msgbox(DBGrid1.Columns(4).Value)
    Msgbox(DBGrid1.Columns(5).Value)
    End Sub