'假設dt1已有資料，宣告新的dt2
Dim dt2 As DataTable


'復製dt1的結構
dt2 = dt1.Clone


'從第一筆開始填入dt2
Dim x As Integer
For x = 0 To dt1.Rows.Count
    dt2.ImportRow(dt1.Rows(x))
Next

arrow
arrow
    全站熱搜

    pdyurfof 發表在 痞客邦 留言(0) 人氣()

    E-mail轉寄