通过列值查找行

Question

Dim foundRows() As Data.DataRow
foundRows = DataSet1.Tables("Customers").Select("CompanyName Like 'A%'")

我没有尝试过这段代码，如果我尝试过该如何获取msgbox的答案...？或文本框

Answer 1

您需要遍历结果并显示它们-例如：

For Each dr As DataRow In foundRows
  'Output to Textbox
  Textbox1.text &= dr("CompanyName").ToString
Next