c#和vb.net创建datatable
Asp.net DataTable添加列和行的方法
方法一:
DataTable tblDatas = new DataTable("Datas");
DataColumn dc = null;
dc = tblDatas.Columns.Add("ID", Type.GetType("System.Int32"));
dc.AutoIncrement = true;//自动增加
dc.AutoIncrementSeed = 1;//起始为1
dc.AutoIncrementStep = 1;//步长为1
dc.AllowDBNull = false;//
dc = tblDatas.Columns.Add("Product", Type.GetType("System.String"));
dc = tblDatas.Columns.Add("Version", Type.GetType("System.String"));
dc = tblDatas.Columns.Add("Description", Type.GetType("System.String"));
DataRow newRow;
newRow = tblDatas.NewRow();
newRow["Product"] = "大话西游";
newRow["Version"] = "2.0";
newRow["Description"] = "我很喜欢";
tblDatas.Rows.Add(newRow);
newRow = tblDatas.NewRow();
newRow["Product"] = "梦幻西游";
newRow["Version"] = "3.0";
newRow["Description"] = "比大话更幼稚";
tblDatas.Rows.Add(newRow);
方法二:
DataTable tblDatas = new DataTable("Datas");
tblDatas.Columns.Add("ID", Type.GetType("System.Int32"));
tblDatas.Columns[0].AutoIncrement = true;
tblDatas.Columns[0].AutoIncrementSeed = 1;
tblDatas.Columns[0].AutoIncrementStep = 1;
tblDatas.Columns.Add("Product", Type.GetType("System.String"));
tblDatas.Columns.Add("Version", Type.GetType("System.String"));
tblDatas.Columns.Add("Description", Type.GetType("System.String"));
tblDatas.Rows.Add(new object[]{null,"a","b","c"});
tblDatas.Rows.Add(new object[] { null, "a", "b", "c" });
tblDatas.Rows.Add(new object[] { null, "a", "b", "c" });
tblDatas.Rows.Add(new object[] { null, "a", "b", "c" });
tblDatas.Rows.Add(new object[] { null, "a", "b", "c" });
方法三:
DataTable table = new DataTable ();
//创建table的第一列
DataColumn priceColumn = new DataColumn();
//该列的数据类型
priceColumn.DataType = System.Type.GetType("System.Decimal");
//该列得名称
priceColumn.ColumnName = "price";
//该列得默认值
priceColumn.DefaultValue = 50;
// 创建table的第二列
DataColumn taxColumn = new DataColumn();
taxColumn.DataType = System.Type.GetType("System.Decimal");
//列名
taxColumn.ColumnName = "tax";
//设置该列得表达式,用于计算列中的值或创建聚合列
taxColumn.Expression = "price * 0.0862";
// Create third column.
DataColumn totalColumn = new DataColumn();
totalColumn.DataType = System.Type.GetType("System.Decimal");
totalColumn.ColumnName = "total";
//该列的表达式,值是得到的是第一列和第二列值得和
totalColumn.Expression = "price + tax";
// 将所有的列添加到table上
table.Columns.Add(priceColumn);
table.Columns.Add(taxColumn);
table.Columns.Add(totalColumn);
//创建一行
DataRow row = table.NewRow();
//将此行添加到table中
table.Rows.Add(row);
//将table放在试图中
DataView view = new DataView(table);
dg.DataSource = view;
dg.DataBind();
public static DataTable getDate()
{
DataTable td = new DataTable();
td.Columns.Add("id");
td.Columns.Add("city");
string[] str = { "北京市", "天津市", "河北省", "山西省", "内蒙古", "辽宁省", "吉林省", "黑龙江", "上海市", "江苏省", "安徽省", "福建省", "江西省", "山东省", "河南省", "湖北省", "湖南省", "广东省", "海南省", "广西", "甘肃省", "陕西省", "新疆", "青海省", "宁夏", "重庆市", "四川省", "贵州省", "云南省", "西藏", "台湾省", "澳门", "香港 " };
for (int i = 0; i < str.Length; i++)
{
DataRow r = td.NewRow();
r[0] = i;
r[1] = str[i];
td.Rows.Add(r);
}
return td;
}
--------------------------
Public Class CreateDataTB
Public Shared Function NewTB() As DataTable
Dim tb As New DataTable
tb.Columns.Add("序號")
tb.Columns.Add("名稱")
tb.Columns.Add("類型")
tb.Columns.Add("日期")
tb.Columns.Add("備註")
tb.Rows.Add("1", "aaa", "bigg", "ggggss", "sssss")
tb.Rows.Add("2", "bbb", "smll", "llllll", "44444")
tb.Rows.Add("3", "ccc", "dogss", "sssss", "k6666")
tb.Rows.Add("4", "eee", "yyyr", "343as", "y78ghj")
Return tb
End Function
End Class
-------------------------
Dim ds As DataSet
Dim dt As DataTable
Dim dc As DataColumn
Private Sub Create_DataTable()
dt = New DataTable( "PtIn ")
dc = New DataColumn
dc.DataType = System.Type.GetType( "System.Int32 ")
dc.ColumnName = "ID "
dc.Unique = True
dt.Columns.Add(dc)
dc = New DataColumn
dc.DataType = System.Type.GetType( "System.String ")
dc.ColumnName = "全宗号 "
dt.Columns.Add(dc)
......
ds = New DataSet
ds.Tables.Add(dt)
DataGridPtIn.DataSource = ds.Tables( "PtIn ")
End Sub
Private Sub FormPtIn_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Create_DataTable()
End Sub
Private Sub BtnPtIn_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnPtIn.Click
For i = 0 To 4
Dim dr As DataRow
dr = dt.NewRow
dr( "ID ") = i
dt.Rows.Add(dr)
Next
End Sub