datagrid显示数据后,当我选中其中一列如果判断我选中是那一列,比如我选中ID为10的,那么如果取出ID值?本人比较菜,谢谢

解决方案 »

  1.   

    建议参考MSDN...或<<VB控件大全>>
      

  2.   

    不对,应该是选中一行,
    如果选中ID为10的那行,我怎么取出ID值?谢谢
      

  3.   

    '*************************************************************************
    '**函 数 名:DataDL_RowColChange
    '**输    入:LastRow(Variant)       -
    '**        :ByVal LastCol(Integer) -
    '**输    出:无
    '**功能描述:
    '**全局变量:
    '**调用模块:
    '**作    者:孤夜寒心泪
    '**日    期:2007-06-21 17:31:22
    '**修 改 人:
    '**日    期:
    '**版    本:V1.0.0
    '*************************************************************************
    Private Sub DataDL_RowColChange(LastRow As Variant, ByVal LastCol As Integer)
        On Error GoTo ToExit '打开错误陷阱
        '------------------------------------------------
        With DataDL
            flagID = .Columns(0).CellText(.Book)
            txtSBZ.Text = .Columns(1).CellText(.Book)
            txtSBRL.Text = .Columns(2).CellText(.Book)
            txtKD.Text = .Columns(3).CellText(.Book)
            txtCOS.Text = .Columns(4).CellText(.Book)
            txtSBZ.Enabled = False
            txtSBRL.Enabled = False
            txtKD.Enabled = False
            txtCOS.Enabled = False
            cmdQX.Enabled = False    End With
        '------------------------------------------------Exit Sub    '----------------
    ToExit:
        Resu