Dear efendy chen,
Untuk ngakalin LV biar di edit di LV, saya juga belum
dapat, jadi saya lempar ke textboxt, untuk sorting
klik di headernya, buat function di module seperti
dbwh ini :
Public Function Sort_List(LV As ListView, ColumnHeader
As ColumnHeader)
If LV.Sorted And ColumnHeader.index - 1 =
LV.SortKey Then
LV.SortOrder = 1 - LV.SortOrder
Else
LV.SortOrder = lvwAscending
LV.SortKey = ColumnHeader.index - 1
End If
LV.Sorted = True
End Function
kemudian di form yang ada listview, pilih event
columnclick, ketikan syntax seperti dibawah ini :
Private Sub LV1_ColumnClick(ByVal ColumnHeader As
MSComctlLib.ColumnHeader)
Call Sort_List(ListView1, ColumnHeader)
End Sub
Semoga bermanfaat.............
Best Regard,
Riyan Sugara
--- efendy chen <[EMAIL PROTECTED]> wrote:
> Hai rekan2,
> Mungkin ada yg pernah mencoba mengakalin listview
> sehingga seolah2 bisa kita rubah isinya bagi2 dong
> ilmunya. Terus cara sorting sehingga cukup klik
> headernya saja bisa langsung mengurutkan secara
> ascending.
> Terima kasih,
>
> Efendy
>
>
> ---------------------------------
> Yahoo! Messenger
> Show us what our next emoticon should look like.
> Join the fun.
__________________________________
Yahoo! Messenger
Show us what our next emoticon should look like. Join the fun.
http://www.advision.webevents.yahoo.com/emoticontest
Untuk keluar dari millis ini, kirim email kosong ke:
[EMAIL PROTECTED]
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/programmer-vb/
<*> To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
