请教怎么在vb datagrid读取选中列的列标题?

请问如何在vb datagrid读取选中列的列标题???
问个vb datagrid的问题：

即怎样才能单击一列的列标题，然后返回这列的列标题。


谢谢！！！

------解决方案--------------------------------------------------------
Private Sub DataGrid1_HeadClick(ByVal ColIndex As Integer)


MsgBox adoRecordset.Fields(ColIndex).Name


End Sub