listview点击进行排序

[额，饿了]

headertext = Array("id", "姓名", "科目", "状态") （每列的列名）（listview有对应的事件吗）
当点击 id 的时候 按照 id 进行排序
点击 姓名 的时候 按照 姓名 进行排序

[额，饿了]

[Quote=引用 11 楼 sihonglaoren 的回复:]
引用 10 楼 ni04730184 的回复:
引用 9 楼 ni04730184 的回复:
引用 8 楼 sihonglaoren 的回复:
我有个代码，要是ls不好用，我再给。

LS的可以是可以 就是不能在刷新了 一刷新数据出现问题

刷新的时候我按照id进行的排序

我的办法好，绝对没问题。
你给我充50个人人豆我就告诉你。
[/Quote]

没玩过人人网

[za099z]

这个我有现成的代码,不过不想为这里做任何有益的事情

[额，饿了]

[Quote=引用 1 楼 za099z 的回复:]
这个我有现成的代码,不过不想为这里做任何有益的事情
[/Quote]
454240657 你懂的

[杀神者]

[Quote=引用 1 楼 za099z 的回复:]
这个我有现成的代码,不过不想为这里做任何有益的事情
[/Quote]
你回帖不就是做了吗

[额，饿了]

[Quote=引用 3 楼 sunjs12345 的回复:]
引用 1 楼 za099z 的回复:
这个我有现成的代码,不过不想为这里做任何有益的事情

你回帖不就是做了吗
[/Quote]
来个人办点正事吧

[额，饿了]

怎么获得 点击的是哪个列头

[za099z]

管理员是学VB的,让她自己答吧
[Quote=引用 4 楼 ni04730184 的回复:]
引用 3 楼 sunjs12345 的回复:
引用 1 楼 za099z 的回复:
这个我有现成的代码,不过不想为这里做任何有益的事情

你回帖不就是做了吗

来个人办点正事吧
[/Quote]

[孤独剑_LPZ]

Private Sub listview_ColumnClick(ByVal ColumnHeader As MSComctlLib.ColumnHeader)
    '单击列表头排序
    With listview
      If (ColumnHeader.Index - 1) = .SortKey Then
         .SortOrder = (.SortOrder + 1) Mod 2
      Else
         .Sorted = False
         .SortOrder = 0
         .SortKey = ColumnHeader.Index - 1
         .Sorted = True
      End If
    End With
End Sub

[sihonglaoren]

我有个代码，要是ls不好用，我再给。

[额，饿了]

[Quote=引用 8 楼 sihonglaoren 的回复:]
我有个代码，要是ls不好用，我再给。
[/Quote]
LS的可以是可以 就是不能在刷新了 一刷新数据出现问题

[额，饿了]

[Quote=引用 9 楼 ni04730184 的回复:]
引用 8 楼 sihonglaoren 的回复:
我有个代码，要是ls不好用，我再给。

LS的可以是可以 就是不能在刷新了 一刷新数据出现问题
[/Quote]
刷新的时候我按照id进行的排序

[sihonglaoren]

[Quote=引用 10 楼 ni04730184 的回复:]
引用 9 楼 ni04730184 的回复:
引用 8 楼 sihonglaoren 的回复:
我有个代码，要是ls不好用，我再给。

LS的可以是可以 就是不能在刷新了 一刷新数据出现问题

刷新的时候我按照id进行的排序
[/Quote]
我的办法好，绝对没问题。
你给我充50个人人豆我就告诉你。