Question

这是在我的OfficeEquipment.Frm

中

Public Function Loadfunction()
dt = Functions.LoadData()
End Function

这是上述代码的错误

警告1功能'Loadfunction'不会在所有代码路径上返回值。使用结果时，可能会在运行时发生空引用异常。 C：\ Documents and Settings \ IJDinglasan \ My Documents \ Visual Studio 2008 \ Projects \ Electronic Office Equipment History \ Electronic Office Equipment History \ Update Office Equipment Profile.vb 9 5电子办公设备历史

这是我的模块函数

Private Function LoadData() As DataTable

Using sqlconn = New SqlClient.SqlConnection("server = SKPI-APPS1;" & _
                                             "Database = EOEMS;integrated security=true")
Dim dt As New DataTable
sqlconn.Open()
Dim da As New SqlDataAdapter("SELECT * FROM tblOfficeEquipmentProfile", sqlconn)
da.Fill(dt)
Return dt
End Using
End Function

Answer 1

基本上只使用你拥有的类和函数....

 Dim dt As DataTable
 dt = yourclass.LoadData()

现在dt是你可以随意使用的桌子。

MrCoDeXeR

EDITS

无论你有什么功能（LoadData），你都需要引用那个类和函数。例如：说我的主要类是：frmMain.vb和我的功能是我的类：frmStudents我想要获得该功能。

所以....在frmMain.vb上你需要声明另一个DataTable并分配它....见下文......

 Dim dt As DataTable
 dt = frmStudents.LoadData()

我们从frmStudents调用函数并用我们的数据填充我们的新表。你需要做的是设置一个断点：dt = frmStudents.LoadData（）并运行你的解决方案。当你到达那条线时按F-11并查看它是否会跳到你的其他具有你功能的类。然后按F-11并继续逐步执行并查看是否抛出错误。在你的：你的函数中返回dt，将鼠标悬停在此处，如果它到达这一点并点击放大镜，看看数据是否存在或列名是否正确，如果有的话，你可以去...

调用要在Windows窗体上使用的函数

1 个答案: