0

これは私のOfficeEquipment.Frmにあります

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

これは上記のコードのエラーです

警告 1 関数 'Loadfunction' は、すべてのコード パスで値を返すわけではありません。結果が使用されると、実行時に null 参照例外が発生する可能性があります。C:\Documents and Settings\IJDinglasan\My Documents\Visual Studio 2008\Projects\電子事務機器履歴\電子事務機器履歴\更新事務機器プロファイル.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
4

1 に答える 1

0

基本的には、あなたが持っているクラスと関数を使用するだけです....

 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 を返します。これまでのところ、これにカーソルを合わせて虫眼鏡をクリックし、データが存在するか、列名があるかどうかを確認します。

于 2013-05-07T02:12:53.287 に答える