Listview move item
Last Updated: May 01 2011 19:03, Started by
vlad1m1r
, May 01 2011 16:55
·
0
#1
Posted 01 May 2011 - 16:55
Salut cum pot face niste butoane cu care sa mut itemele in sus si in jos.Pe google am gasit destule exemple dar nu merge nici unul pentru ca nu pot folosi ListView1.ListItems , nu il are, am visual bazic 2008 framework 3.5!
|
#3
Posted 01 May 2011 - 17:09
Acum imi da eroare la ListView1.SelectedItem.Index dar mai e ceva eu am SelectedItems cu s
Edited by vlad1m1r, 01 May 2011 - 17:13. |
#4
Posted 01 May 2011 - 17:42
pentru ca ListView iti permite selectie multipla, iar elementele selectate sunt in SelectedItems
nu stiu ce exemple ai gasit tu, dar e posibil sa se refere la vreo versiune beta de VS2008. vezi pe aici varianta actualizata a lui ListView: http://msdn.microsof...s.listview.aspx |
#5
Posted 01 May 2011 - 17:44
Private Sub button11_Click(sender As Object, e As EventArgs) 'sus If listView1.SelectedItems.Count > 0 Then Dim index As Integer = listView1.SelectedItems(0).Index If index > 0 Then Dim lvi As ListViewItem = listView1.SelectedItems(0) listView1.Items(index).Remove() listView1.Items.Insert(index - 1, lvi) End If End If End Sub Private Sub button13_Click(sender As Object, e As EventArgs) 'jos If listView1.SelectedItems.Count > 0 Then Dim index As Integer = listView1.SelectedItems(0).Index If index < listView1.Items.Count - 1 Then Dim lvi As ListViewItem = listView1.SelectedItems(0) listView1.Items(index).Remove() listView1.Items.Insert(index + 1, lvi) End If End If End SubAr trebui sa mearga perfect |
#6
Posted 01 May 2011 - 19:03
edy_3dz, on 1st May 2011, 18:44, said: Private Sub button11_Click(sender As Object, e As EventArgs) 'sus If listView1.SelectedItems.Count > 0 Then Dim index As Integer = listView1.SelectedItems(0).Index If index > 0 Then Dim lvi As ListViewItem = listView1.SelectedItems(0) listView1.Items(index).Remove() listView1.Items.Insert(index - 1, lvi) End If End If End Sub Private Sub button13_Click(sender As Object, e As EventArgs) 'jos If listView1.SelectedItems.Count > 0 Then Dim index As Integer = listView1.SelectedItems(0).Index If index < listView1.Items.Count - 1 Then Dim lvi As ListViewItem = listView1.SelectedItems(0) listView1.Items(index).Remove() listView1.Items.Insert(index + 1, lvi) End If End If End SubAr trebui sa mearga perfect Chiar asa e merge perfect tks |
Anunturi
Bun venit pe Forumul Softpedia!
▶ 0 user(s) are reading this topic
0 members, 0 guests, 0 anonymous users