這是我OfficeEquipment.Frm調用函數要在運行Windows的形式使用
Public Function Loadfunction()
dt = Functions.LoadData()
End Function
,這是上面的代碼
警告1個功能「Loadfunction」不返回值的誤差在所有代碼路徑上。使用結果時,運行時可能會發生空引用異常。 C:\ Documents and Settings \ IJDinglasan \ My Documents \ Visual Studio 2008 \ 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
sir yourclass is the class1.vb? – ivandinglasan 2013-05-07 02:17:17
是的,任何類都包含你的功能。 – Codexer 2013-05-07 02:18:21
我把它命名爲它的功能 dim dt as datatable dt = functions.loadData但不起作用 – ivandinglasan 2013-05-07 02:21:16