|
2011/03/29(Tue) 23:00:42 編集(投稿者)
2011/03/29(Tue) 23:00:36 編集(投稿者)
■No58249 (キメラ さん) に返信
>
> コードにあるobjTEST, objTEST2, objTBTESTや、質問文にあるobjTBTEST2が何のクラスなのか、
> それぞれどのような関係なのか、提示されたコードでは全く分からないので、まずはそれを説明してください。
急いでおり肝心な説明がぬけていました。
大変申し訳ございません。
下記の通り訂正しました。
よろしくお願い致します。
-------------------------------------------
Public objTEST As New Data.DataTable
'ロード
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Dim objTEST2 As New Data.DataTable
For i=0 To 2
Dim Result AS Boolean=GetDatatable()
IF Result = True Then
'objTESTにマージする
objTEST.Merge(objTEST2, True)
objTEST.AcceptChanges()
objTEST2=Nothing
End IF
NEXT
(ファンクション)
Private Function GetDatatable()As Boolean
Dim objDataTable AS New Data.DataTable
'取得したデータテーブルをobjTEST2に格納する
objTEST2=objDataTable
End Function
|