20-09-13, 11:00 AM
السلام عليكم
تفضل اخي العزيز الكود بعد التعديل:
باعتبار السبت اول عمود و الاحد ثاني عمود وباعتبار الاعمدة مضافة مسبقا
تفضل اخي العزيز الكود بعد التعديل:
كود :
Private Sub Button1_Click(sender As System.Object, e As EventArgs) Handles Button1.Click
Dim item As ListViewItem
For i = 0 To ListView1.Items.Count - 1
item = New ListViewItem()
item.Text = ListView1.Items(i).SubItems(0).Text
item.SubItems.Add(ListView1.Items(i).SubItems(1))
ListView2.Items.Add(item)
Next
End Subباعتبار السبت اول عمود و الاحد ثاني عمود وباعتبار الاعمدة مضافة مسبقا
