Stored procedures 如何使用DB2DB在Datagrid上显示数据集中的数据

我解决了数据不显示的问题，并更正了下面的代码

我需要用db2中存储过程中返回的值填充数据集。我已经编写了一些连接到数据库的代码，似乎执行了SP，正在填充数据集，但无法找到如何将数据集中的数据显示到网格中。现在它是空白的，网格中没有数据

Imports IBM.Data
Imports IBM.Data.DB2
Imports IBM.Data.DB2.DB2DataReader

'cs is the connection string you create in your application.

Dim conn As DB2Connection = New DB2Connection(cs)
conn.Open()


Dim trans As IDbTransaction = conn.BeginTransaction()
Dim cmd As IDbCommand = conn.CreateCommand()
Dim procName As String = "SP_Name"
cmd.Transaction = trans
cmd.CommandType = CommandType.StoredProcedure
cmd.CommandText = procName
Dim db2da As New DB2DataAdapter
Dim db2ds As New DataSet
db2da.SelectCommand = cmd
cmd.ExecuteNonQuery()
db2da.Fill(db2ds, "Tab1")

Dim introwcount As Integer = db2ds.Tables("Tab1").Rows.Count
Dim intColumncount As Integer = db2ds.Tables("Tab1").Columns.Count

dgvData.DataSource = db2ds.Tables("Tab1")

谢谢你的帮助

---

谢谢

您能尝试使用DB2Command代替IDB事务吗？我知道怎么做，但你的要求可能和我的不同

Dim conn As DB2Connection = New DB2Connection(cs)
Dim cmd As New DB2Command()
cmd.Connection = conn
cmd.CommandText = procName
cmd.CommandType = CommandType.StoredProcedure
Dim rdr AS DB2DataReader = Nothing

Try
     conn.Open()
     rdr = cmd.ExecuteReader()
     dgvData.DataSource = rdr
     dgvData.DataBind()
     rdr.Close()
Catch ex As DB2Exception
     ...
Finally
     conn.Close()
End Try