建立DataTable并加入数据

现在的位置: 首页 > 综合 > 正文

2013年04月22日 ⁄ 综合 ⁄ 共 727字 ⁄ 字号小中大 ⁄ 评论关闭

Dim dt As DataTable = New DataTable("notepad")

Dim dc1 As DataColumn = New DataColumn("id", Type.GetType("System.Int16"))

Dim dc2 As DataColumn = New DataColumn("title", Type.GetType("System.String"))

Dim dc3 As DataColumn = New DataColumn("content", Type.GetType("System.String"))

dt.Columns.Add(dc1)

dt.Columns.Add(dc2)

dt.Columns.Add(dc3)

Dim i As Integer

For i = 0 To 10

Dim dr As DataRow = dt.NewRow()

dr("id") = 1

dr("title") = "Test My Program"

dr("content") = "Hello world!"

dt.Rows.Add(dr)

'删除行

'方法1:

dt.Rows(0).Delete()

dt.AcceptChanges()

'方法2:

dt.Rows.RemoveAt(0)

抱歉!评论已关闭.

返回首页

（其他合作也可洽谈）