Kod:
Dim oLI As ListItem, oSI As ListSubItem, oCh As ColumnHeader Dim i As Integer, t As Integer Private Sub Form_Load() With ListView1 .CausesValidation = False .FullRowSelect = True .GridLines = True .HideSelection = False .LabelEdit = lvwManual .LabelWrap = False .View = lvwReport .Sorted = True .SortOrder = lvwAscending .ListItems.Clear Set oCh = .ColumnHeaders.Add() oCh.Text = "ID" oCh.Width = 600 Set oCh = .ColumnHeaders.Add() oCh.Text = "Sistem" oCh.Width = 2500 Set oCh = .ColumnHeaders.Add() oCh.Text = "Kullanıcı" oCh.Width = 2000 Set oCh = .ColumnHeaders.Add() oCh.Text = "Parola" oCh.Width = 1980 For i = 1 To 5 Set oLI = .ListItems.Add() Randomize t = Int(Rnd * 10) oLI.Text = i oLI.ListSubItems.Add().Text = Chr(90 - t) & "-" & t t = Int(Rnd * 20) oLI.ListSubItems.Add().Text = Chr(85 - t) & "-" & t t = Int(Rnd * 20) oLI.ListSubItems.Add().Text = Chr(115 - t) & "-" & t Next i End With End Sub
Ornek teşkil etmesi adına bole bi listviewde, Sorted = True yaptığımda ilk column na gore sıralama yapıyor, oysa ben diğer columnlarıda sıralatmak istiyorum, yani hangi columna gore sıralama yapacağını nasıl belirtmeliyim ?

Birde column başlığına tıklama olayı nasıl alınır bilen varsa şimdiden yardımlarınız icin teşekkurler...
__________________