Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Private ds As DataSet New DataSet
Dim dt As DataTable = Me.ds.Tables("tableSample")
Dim row As DataRow = dt.NewRow
Dim str As String = String.Empty
For Each row In dt.Rows
For i As Integer = 0 To row.ItemArray.Length - 1
str = str & (row.ItemArray(i).ToString)
str = str & ","
Next
str = str.Remove(Len(str) - 1, 1)
str = str & vbCrLf
Next
MessageBox.Show(str)
End Sub

该篇博客展示了如何在VB.NET中操作DataSet,通过Button点击事件获取DataTable 'tableSample' 的内容,遍历每一行数据,将每行数据的每个字段用逗号连接,并在最后去除多余的逗号,结果显示在MessageBox中。
最低0.47元/天 解锁文章

被折叠的 条评论
为什么被折叠?



