Buton İle ComboBoxdaki Seçili Değeri Listboxda İlk boş satıra ekleme

[mhrcvk]

Merhabalar Arkadaşlar,

Butona tıklandığında comboboxda seçili veriyi listboxda ilk satıra yazdırmak istiyorum ama beceremedim yardımcı olabilir misiniz ? Aşağıdaki gibi bir şeyler denedim ama yapamadım.

Private Sub CommandButton6_Click()
    ListBox1.Clear
    ListBox1.ColumnCount = 6
    ListBox1.ColumnWidths = 30
    ListBox1.List(ComboBox2.Text,1)
End Sub

 

[Korhan Ayhan]

Deneyiniz.

Private Sub CommandButton1_Click()
    With ListBox1
        .Clear
        .ColumnCount = 6
        .ColumnWidths = 40
        .AddItem
        .List(0, 0) = ComboBox2.Text
    End With
End Sub

 

[mhrcvk]

Deneyiniz.

Private Sub CommandButton1_Click()
    With ListBox1
        .Clear
        .ColumnCount = 6
        .ColumnWidths = 40
        .AddItem
        .List(0, 0) = ComboBox2.Text
    End With
End Sub

Korhan Hocam Çok teşekkür ederim talep isteğimi tam anlamı ile karşıladı emeğinize sağlık.