如何將一個項目添加到ListBox特定次數？

Question

我想根據輸入將項目添加到ListBox特定的次數。例如，如果我輸入5，它應該在列表框中添加5次「DOG」。到目前爲止我的代碼：

Dim number As Integer 
number = TextBox1.Text 
Dim add As String 
add = POS.DescriptionText.Text 
While number = add 
    POS.ListBox1.Items.Add(number) 
End While 

Answer 1

使用此代碼：

Dim text = "DOG" // maybe POS.DescriptionText.Text according to your code 
For X As Integer = 1 To Integer.Parse(TextBox1.Text) 
    POS.ListBox1.Items.Add(text) 
Next