Dim dt As DataTable Dim dc As DataColumn Dim dr As DataRow dt = New DataTable("TempTable") dc = New DataColumn("姓名", GetType(String)) dt.Columns.Add(dc) dc = New DataColumn("年龄", GetType(Integer)) dt.Columns.Add(dc) dc = New DataColumn("性别", GetType(String)) dt.Columns.Add(dc) dr = dt.NewRow dr("姓名") = "张三" dr("年龄") = 20 dr("性别") = "男" dt.Rows.Add(dr) For Each dr In dt.Rows For Each dc In dt.Columns Response.Write(dr(dc)) Next Next希望对你能有所帮助
Dim dc As DataColumn
Dim dr As DataRow dt = New DataTable("TempTable") dc = New DataColumn("姓名", GetType(String))
dt.Columns.Add(dc)
dc = New DataColumn("年龄", GetType(Integer))
dt.Columns.Add(dc)
dc = New DataColumn("性别", GetType(String))
dt.Columns.Add(dc) dr = dt.NewRow
dr("姓名") = "张三"
dr("年龄") = 20
dr("性别") = "男"
dt.Rows.Add(dr) For Each dr In dt.Rows
For Each dc In dt.Columns
Response.Write(dr(dc))
Next
Next希望对你能有所帮助
高手帮忙!