将项添加到列表

时间:2016-03-21 23:18:59

标签: vb.net

我正在尝试获取用户输入的字符串并将其传输到列表中。当我单击添加按钮时列表清除。这是代码。谢谢你的帮助

Const ModelPrompt As String = "Input Car Model"
Const ModelTitle As String = "Car Model"

Const PricePrompt As String = "Input Car MSRP"
Const PriceTitle As String = "Car MSRP"


carModel = InputBox(ModelPrompt, ModelTitle)
carPrice = InputBox(PricePrompt, PriceTitle)

Do While carModel <> String.Empty _
AndAlso carPrice <> String.Empty

    carListBox.Items.Add(carModel)
    msrpListBox.Items.Add(carPrice)

Loop

1 个答案:

答案 0 :(得分:0)

这是我朋友的代码

aaptOptions {
        additionalParameters "--no-version-vectors"
    }