调用要在windows窗体上使用的函数
这是在我的OfficeEquipment.Frm中
Public Function Loadfunction()
dt = Functions.LoadData()
End Function这是上述代码的错误
警告1函数“Loadfunction”未在所有代码路径上返回值。当使用结果时，可能会在运行时发生空引用异常。C：\文档和设置\IJDinglasan\My Documents\Visual Studio2008\Projects\电子办公设备历史记录\电子办公设备历史记录\更新办公设备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回答 1
Stack Overflow用户
发布于 2013-05-07 10:12:53
基本上只使用你拥有的类和函数……
Dim dt As DataTable
dt = yourclass.LoadData()现在dt就是您的表，您可以在您喜欢的地方使用它。
MrCoDeXeR
编辑
只要你有你的函数(LoadData)，你就需要引用那个类和函数。例如:假设我的主类是: frmMain.vb，包含我的函数的类是: frmStudents，我想要获取该函数。
所以..。在frmMain.vb上，您需要声明另一个DataTable并为其赋值...见下文..。
Dim dt As DataTable
dt = frmStudents.LoadData()我们从frmStudents调用该函数，并用数据填充我们的新表。您需要做的是在: dt = frmStudents.LoadData()上设置一个断点，然后运行您的解决方案。当你到达这一行的时候，按下F-11，看看它是否会跳转到其他有你的函数的类上。然后按F-11并继续单步执行，查看是否抛出错误。在你的:在你的函数中返回dt，如果它到了这么远，将鼠标悬停在上面，点击放大镜，看看数据是否存在或者是否有你的列名，如果是，你可以继续...
https://stackoverflow.com/questions/16409688
复制相似问题
腾讯云开发者
Copyright © 2013 - 2026 Tencent Cloud. All Rights Reserved. 腾讯云 版权所有
深圳市腾讯计算机系统有限公司 ICP备案/许可证号：粤B2-20090059 
粤公网安备44030502008569号
腾讯云计算（北京）有限责任公司 京ICP证150476号 | 京ICP备11018762号