绑定时:
If e.Item.ItemType.ToString = "Header" Then
For i = 0 To '列的总数' -1
e.Item.Cells(i).Text = e.Item.Cells(i).Text & "<Img src='向下图片'/>"
e.Iten.Cells(i).Attributes("OnClick") = "ChangeImg"
Next
End If
--------------
<script language="vbscript">
Sub ChangeImg()
If Window.Event.srcElement.ParentElement.Children(0).src = '向下图片' Then
Window.Event.srcElement.ParentElement.Children(0).src = '向上图片'
Else
Window.Event.srcElement.ParentElement.Children(0).src = '向下图片'
End If
End Sub
</script>