如何将二维数组转换成DataTable

Question

DataTable无非就是DataColumn和DataRow的组合，你用for循环两次就可以了。

Answer 1

没想到还有这么多分留给我，楼主赶快结贴。
 Dim str As String(,) = {{"0", "1", "6d5325ds"}, {"2", "3", "452dfg"}}
        Dim mytab As New DataTable("mytab")
        Dim myrow As DataRow
        Dim mycol As DataColumn
        mycol = New DataColumn("field1", GetType(System.String))
        mytab.Columns.Add(mycol)
        mycol = New DataColumn("field2", GetType(System.String))
        mytab.Columns.Add(mycol)
        mycol = New DataColumn("field3", GetType(System.String))
        mytab.Columns.Add(mycol)
        Dim i, j As Integer
        For i = 0 To 1
            myrow = mytab.NewRow
            For j = 0 To 2
                'Response.Write(str(i, j))
                myrow(j) = str(i, j)
            Next
            mytab.Rows.Add(myrow)
        Next
        DataGrid1.DataSource = mytab
        DataGrid1.DataBind()

Answer 2

我想楼主要的是如下代码：DataTable dt=new DataTable("result");
DataSet ds=new DataSet();
ds.Tables.Add(dt);System.Data.DataRow dr;for(i=0;i<20;i++)
{
 dt.Columns.Add(nstr[0,i],System.Type.GetType("System.String"));
}for(i=0;i<20;i++)
{
dr=ds.Tables["result"].NewRow();
for(j=0;j<lnum;j++)
{
 dr[j]=nstr[i,j];
}
ds.Tables["result"].Rows.Add(dr);
}