ListBox ta bilgiler yana yana

[teksen]

Private Sub CommandButton1_Click()
ListBox1.AddItem Label1.Caption
ListBox1.AddItem TextBox1.Text

End Sub


Arkadaşlar,yukarıdaki kodlarla LİstBox1 e bilgileri gönderiyorum ama alt alta yazıyor.

yan yana yazması için ne yapmam gerekir acaba?

 

[Explorer]

Private Sub CommandButton1_Click()
   ListBox1.AddItem Label1.Caption & TextBox1.Text
End Sub

Ya da

Private Sub CommandButton1_Click()
   ListBox1.AddItem Label1.Caption & vbTab & TextBox1.Text
End Sub

 

[Tarkan VURAL]

Sub ListboxBilgiler()
With ListBox1
    .AddItem "Excel"
    .ColumnCount = 2
    .List(0, 1) = "VBA.Net"
End With
End Sub