关于listview的排序问题

[firesky67]

我窗体上有个listview,把listview属性设置成控制面板那样的图标排列.还有三个radiobox,分别对应“升序”、“降序”和“不排序”。但是排序操作只在第一次选中某个radiobox的时候才执行。我哪里错了？请大家指点一下。
这三个radiobox对应的程序如下：
Private Sub RadioButton1_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RadioButton1.CheckedChanged
ListView1.Sorting = SortOrder.Ascending
End Sub

Private Sub RadioButton2_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RadioButton2.CheckedChanged
ListView1.Sorting = SortOrder.Descending
End Sub
Private Sub RadioButton3_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RadioButton3.CheckedChanged
ListView1.Sorting = SortOrder.None
End Sub

[TonyTonyQ]

在RadioButton的Click事件里写你那些代码，不要在CheckedChanged事件里写。

[ljmay168]

先判斷一下再排序,如:
Private Sub RadioButton1_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RadioButton1.CheckedChanged
if RadioButton1.Checked Then
ListView1.Sorting = SortOrder.Ascending
End If
End Sub

[Montaque]

' ColumnClick event handler.
Private Sub ColumnClick(ByVal o As Object, ByVal e As ColumnClickEventArgs)
' Set the ListViewItemSorter property to a new ListViewItemComparer object.
Me.listView1.ListViewItemSorter = New ListViewItemComparer(e.Column)
' Call the sort method to manually sort the column based on the ListViewItemComparer implementation.
listView1.Sort()
End Sub

End Class

' Implements the manual sorting of items by columns.
Class ListViewItemComparer
Implements IComparer

Private col As Integer

Public Sub New()
col = 0
End Sub

Public Sub New(ByVal column As Integer)
col = column
End Sub

Public Function Compare(ByVal x As Object, ByVal y As Object) As Integer _
Implements IComparer.Compare
Return [String].Compare(CType(x, ListViewItem).SubItems(col).Text, CType(y, ListViewItem).SubItems(col).Text)
End Function
End Class

[firesky67]

还是不起作用 啊