Visual Basic作业中ListBox赋值报错：&符号使用问题求助

嘿，别着急，我帮你排查下代码里的问题，很快就能搞定：

问题1：无用的ToString()语句 #

你写的这三行代码完全没有实际作用，因为ToString()返回的字符串没有被赋值给任何变量，直接删掉就行：

txtMake.ToString()
txtModel.ToString()
cbxColorCar.ToString()

问题2：ComboBox控件未取Text属性（这是&报错的核心原因） #

你直接写cbxColorCar是在引用控件对象本身，而不是它选中的文本内容。在Option Strict On的情况下（VB默认推荐开启），VB不允许直接把控件对象和字符串用&拼接，必须明确获取它的Text属性：

cbxColorCar.Text

问题3：缺少将结果添加到ListBox的步骤 #

你的代码只是把拼接后的字符串赋值给了resultsCars变量，但没有把这个变量添加到ListBox里，最后要加上添加项的语句。

修复后的完整代码 #

Private Sub btnCars_Click(sender As Object, e As EventArgs) Handles btnCars.Click
    'Assign car information to a string variable
    Dim resultsCars As String = txtMake.Text & " " & txtModel.Text & " " & cbxColorCar.Text & "."
    'Add the string to the ListBox
    resultsListBox.Items.Add(resultsCars) '这里把resultsListBox换成你实际的ListBox控件名
End Sub

额外说明 #

如果你的resultsCars是提前声明过的模块级变量，那可以去掉Dim resultsCars As String这部分，直接赋值就行。另外，开启Option Strict能帮你提前发现很多类型转换的问题，建议保持开启状态~

内容的提问来源于stack exchange，提问作者Chelsea Jorgenson