DATAGRID的问题。特急（20分）

Question

建议用FLEXGRID试试
得到列号后用SELECT  CASE 判断名称

Answer 1

字段名获得，ID、NAME、SEX，这些都是字段名啊，我想点击某个字段，就返回当前我点击的字段名。
比如，像上面的。我点的是NAME字段，label.caption显示“NAME”
若是我点SEX字段，label.caption显示“SEX”
若是我点ID字段，label.caption显示“ID”

Answer 2

用HFFLEXGRID，只要你点哪个字段，当前的单元格值就能被获得

Answer 3

HFFLEXGRID？？
是DATAGRID的属性吗？怎么用啊。请写段代码，给我参考吧。

Answer 4

我再说清楚点，我不是想获得字段下面的单元格的数据值，是想获得字段名。
我点的是NAME字段名，label.caption显示“NAME”，而不是“NAME”下面的数据。

Answer 5

你用MSFlexGrid控件，在Click事件里加下面代码就行了：
Grid.Row=0
Grid.Col=MouseCol
Label.caption=Grid.Text

Answer 6

Private Sub DataGrid1_RowColChange(LastRow As Variant, ByVal LastCol As Integer)
    Static iCol As Integer
    If iCol <> DataGrid1.Col Or LastCol <> DataGrid1.Col Then
        Debug.Print DataGrid1.Columns(DataGrid1.Col).DataField
        iCol = DataGrid1.Col
    End If
End Sub

Answer 7

'当用鼠标点击dataGrid的整列时触发
Private Sub DataGrid1_HeadClick(ByVal ColIndex As Integer)
         Dim fld As Field
         Dim i As Integer
         i = 0
         Dim rsTmp As New ADODB.Recordset
         Set rsTmp = DataGrid1.DataSource
         For Each fld In rsTmp.Fields
             If i = ColIndex Then
               MsgBox fld.Name   '获得字段名
               Exit For
             End If
             i = i + 1
         Next
         Set rsTmp = Nothing
End Sub