Question

我试图从数据库中获取数据。在第一个循环中它可以获取数据，但在第二个循环中它会弹出一个错误说：

对象引用未设置为对象的实例。

继承我的代码：

        da = New SqlDataAdapter("SELECT refno, pono FROM transmital WHERE refname = '" & txtTransRefName.Text & "' ORDER BY refno", DB.DARConString)
        ds = New DataSet
        da.Fill(ds, "refnam")

        xlWb = xlApp.Workbooks.Add()

        For i = 0 To ds.Tables("refnam").Rows.Count - 1

            **'this line gets the error** refnum = ds.Tables("refnam").Rows(i).Item("refno").ToString.Trim
            ponum = ds.Tables("refnam").Rows(i).Item("pono").ToString.Trim
        Next

任何帮助都将受到高度赞赏。谢谢

Answer 1

查看您的代码，似乎您正在尝试从＆＃34; refnam＆＃34;桌子，对吗？然后，什么是＆＃34;传输＆＃34;？你的数据库名称？

da = New SqlDataAdapter("SELECT refno, pono FROM transmital WHERE refname = '" & txtTransRefName.Text & "' ORDER BY refno", DB.DARConString)
            ds = New DataSet
            da.Fill(ds, "refnam")

你的queryString应该看起来像＆＃34; SELECT refno，pono FROM refnam ...＆＃34;

    Dim Adpt As New SqlDataAdapter(queryString, SQLConn)
                Dim ds As New DataSet()
                Adpt.Fill(ds, "refnam")
    MyDataGridView.DataSource = ds.Tables(0)

如果要在保存到xls之前在datagridView上显示结果，则需要datagridView.columns.clear或非先前设置的列。

如何在vb.net中获取数据集中的数据

1 个答案: