我试图从 VB.NET 对象函数返回数据集的一个非常简单的问题。
下面显示了我的函数,该函数在 SQL 查询运行后并且在创建新对象连接之前立即退出该函数。
此处调用编辑表单:
edit.Show()
在编辑表单中,运行以下命令以根据构造函数中设置的 ID 从“editEntry”方法的检索数据集检索数据库中所选数据的详细信息。
Private Sub edit_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim editDetails As New DBHandler(ID)
Dim returnedDetails As New DataSet
returnedDetails = editDetails.editEntry()
Dim nameReturned As Object = returnedDetails.Tables("editedTable").Rows(0)(1)
Dim firstNameEdit As String = nameReturned.ToString()
TextBox1.Text = firstNameEdit
这是发生问题的函数。查询没有返回任何内容
设置 ID 的构造函数:
Public Sub New(ByVal ID As Integer)
IDofFault = ID
End Sub
类的作用:
Public Function editEntry() As DataSet
Dim editDataSet As New DataSet
Dim editSql As String = "SELECT * FROM duraGadget WHERE _id = " + IDofFault + ""
'Exiting from the function here
Dim connectionEdit As New OleDbConnection(conString)
Dim editAdapter As New OleDbDataAdapter(editSql, connectionEdit)
connectionEdit.Open()
editAdapter.Fill(editDataSet, "editedTable")
connectionEdit.Close()
Return editDataSet
End Function
没有错误,它只是从函数中退出,我不知道为什么。