datagridview to datatable

參考 
-- 
     Dim RptTable As New DataTable
     RptTable.Columns.Add("機台號碼")
     RptTable.Columns.Add("模號")
     RptTable.Columns.Add("模數")
     RptTable.Columns.Add("料別")
     RptTable.Columns.Add("生產數")
     RptTable.Columns.Add("訂單號碼")
     RptTable.Columns.Add("生產者")
     RptTable.Columns.Add("製程編號")
     RptTable.Columns.Add("不良數")
     RptTable.Columns.Add("單號")
     RptTable.Columns.Add("移交數量")
     RptTable.Columns.Add("開始日期")
     RptTable.Columns.Add("生產加總數")
--
     Dim RptTable As New DataTable
    RptTable = ds.Tables("abc").Copy