ASP.NETを使用してdatatable1からdatatable2に行を追加する方法は？

Question

I need to append a row from databla1 to datatable2 that has already rows, I tried to importrow(), clone(), but I cant' find the solution: 

The datatable1 has this structure: 

name | surname | iddepartment | address | phone1 | phone2 | country | cp | birthdate | 

そしてdatatable2は、クラス内で作成、公開データテーブルである：

Public Shared datable2 As New DataTable 

私はこのコードを持っている：

Dim datatable1 As DataTable = getdata("myQuery") 

私はこれを実行しようとしましたが、私はエラーを取得：

Dim newRow= datatable1.Rows(0) 

myClass.datatable2.rows.add(newRow) 

どうすればいいですか？ありがとう

Answer 1

私が理解する限り。

VB.NETサンプル：

'db query result' 

    table.Columns.Add("Name", GetType(String)) 
    table.Columns.Add("surname", GetType(String)) 
    table.Columns.Add("iddepartment", GetType(Integer)) 
    table.Columns.Add("phone1", GetType(String)) 
    table.Columns.Add("phone2", GetType(String)) 
    table.Columns.Add("country", GetType(String)) 
    table.Columns.Add("cp", GetType(String)) 
    table.Columns.Add("birthdate", GetType(DateTime)) 

    'column set' 
    Dim table2 As DataTable = table 

    Dim i As Integer = 0 

    'add dummy data' 
    For index = 1 To 10 
     'instance new dataRow ' 
     Dim dr As DataRow = table2.NewRow 
     dr("Name") = "Jack" 
     dr("surname") = "Daniels" 
     dr("iddepartment") = i 
     dr("phone1") = "099999" 
     dr("phone2") = "09999" 
     dr("country") = "USA" 
     dr("cp") = "-" 
     dr("birthdate") = New DateTime 

     table2.Rows.Add(dr) 

     i = i + 1 
    Next 

    'each table2 rows' 
    For Each rowItem As DataRow In table2.Rows 

     Console.WriteLine(rowItem("Name")) 
     Console.WriteLine(rowItem("surname")) 
     Console.WriteLine(rowItem("iddepartment")) 
     Console.WriteLine(rowItem("phone1")) 
     Console.WriteLine(rowItem("phone2")) 
     Console.WriteLine(rowItem("country")) 
     Console.WriteLine(rowItem("cp")) 
     Console.WriteLine(rowItem("birthdate")) 

    Next 
    Console.Read() 

DataTableの例ソースリンク：https://www.dotnetperls.com/datatable-vbnet