vb中datagrid问题

来源:百度知道 编辑:UC知道 时间:2024/05/16 11:09:11
各位兄弟姐妹,我在编一个小小的程序时,用到了datagrid控件,但是需要不绑定数据控件,因为我的datagrid字段不定个数和名称,现在问一下怎样添加新记录(行),我只会加字段,不会加新行,网上说用datatable,但这个怎么用呀

居然不需要绑定数据库里内容,你也可以借用记录集来绑定DataGrid来实现行的增加,如:
Private Sub Command1_Click()
Dim i As Integer
Dim adoRt As Object

'// 创建记录集对象
Set adoRt = CreateObject("ADODB.RecordSet")

With adoRt
'// 增加字段
.Fields.Append ("字段一"), 202, 20
.Fields.Append ("字段二"), 202, 20
.Open

'// 增加数据
For i = 1 To 10
.AddNew

.Fields(0).Value = "C1,R" & i
.Fields(1).Value = "C2,R" & i
Next

'// 绑定
Set DataGrid1.DataSource = adoRt
End With
End Sub