怎样判断点击了哪一个columnheader

[gzzhuna1]

请问，点击columnheader时，怎样判断点击了那一项

[bitsoft]

HeadClick事件

[gump2000]

Private Sub ListView1_ColumnClick(ByVal ColumnHeader As MSComctlLib.ColumnHeader)
MsgBox ColumnHeader.Text
End Sub

[gzzhuna1]

不好意思，没讲清楚，用的是listview控件，只有ColumnClick事件，HeadClick是datagrid事件

[gzzhuna1]

gump2000(阿甘)谢了！解决大问题呀。

[benbenc]

Private Sub ListView1_ColumnClick(ByVal ColumnHeader As ColumnHeader)
'单击 ColumnHeader 对象时，将根据
'那一列的子项目把 ListView 控件排序。
'设置 SortKey 为 ColumnHeader 的索引值减 1
ListView1.SortKey = ColumnHeader.Index - 1
'设置 Sorted 为 True 以将列表排序。
ListView1.Sorted = True
End Sub