Merhaba, hayırlı günler,
Aşağıdaki kod satırları ile iki ayrı listboxa veri eklemekteyim. Tek satırlık verileri listboxlara ekliyorum. Bu kodların işlevini aynı şekilde yapacak listview kodları nasıl olmalı. iki listbox yerine birtane listview kullanmak amacındayım. Ancak listview in with ile nasıl kullanıldığını anlamadım.
Aşağıdaki kod satırları ile iki ayrı listboxa veri eklemekteyim. Tek satırlık verileri listboxlara ekliyorum. Bu kodların işlevini aynı şekilde yapacak listview kodları nasıl olmalı. iki listbox yerine birtane listview kullanmak amacındayım. Ancak listview in with ile nasıl kullanıldığını anlamadım.
Kod:
If TextBox5.Value <> "" And TextBox6.Value <> "" Then
With ListBox1
.AddItem ComboBox1
.List(.ListCount - 1, 0) = ComboBox1.Value
.List(.ListCount - 1, 1) = TextBox1.Value
.List(.ListCount - 1, 2) = TextBox2.Value
.List(.ListCount - 1, 3) = TextBox3.Value
.List(.ListCount - 1, 4) = TextBox4.Value
.List(.ListCount - 1, 5) = TextBox5.Value
.List(.ListCount - 1, 6) = TextBox6.Value
End With
End If
If TextBox5.Value <> "" And TextBox6.Value <> "" Then
With ListBox2
.AddItem TextBox1.Text
.List(.ListCount - 1, 0) = TextBox7.Value
.List(.ListCount - 1, 1) = TextBox8.Value
.List(.ListCount - 1, 2) = TextBox9.Value
.List(.ListCount - 1, 3) = TextBox10.Value
.List(.ListCount - 1, 4) = TextBox11.Value
.List(.ListCount - 1, 5) = TextBox12.Value
.List(.ListCount - 1, 6) = TextBox13.Value
.List(.ListCount - 1, 7) = TextBox14.Value
.List(.ListCount - 1, 8) = TextBox15.Value
End With
End If
