你传参数的时候使用了Me.ListBox1.SelectedItem.ToString
,所以只使用了一个选中项进行查询。
在循环中构建一个包含所有选定项的字符串,并将它作为参数传递给查询。
Dim selectedItems As New List(Of String)
For Each selectedItem As Object In ListBox1.SelectedItems
selectedItems.Add(selectedItem.ToString())
Next
' 构建参数字符串
Dim parameterString As String = String.Join(",", selectedItems)
' TODO: 将参数字符串传递给查询
Me.DataTable1TableAdapter.Fill(Me.DataSet1.DataTable1, parameterString)
如果答案是正确的,请点击“接受答案”并点赞。 如果您对此答案还有其他疑问,请点击“评论”。注意:如果您想接收相关电子邮件,请按照我们的文档中的步骤启用电子邮件通知。