Private Sub Command2_Click()
DataGrid1.AllowAddNew = True
Adodc1.RecordSource = "select * from b1"
With Adodc1.Recordset
.AddNew
.Fields(1) = Text1
.Fields(2) = Text2
.Fields(3) = Text3
.Update
End With
End Sub
不懂再追问
设置datagrid的datasorce属性为adodc1adodc1的adodc属性也要进行设置,连接到相应的表要想向datagrid中增加一行,则需要向数据库中的表中增加一行数据,datagrid才会增加一行。
Adodc1.Recordset.AddNew
Adodc1.Recordset.Fields(1) = “第一列的内容"
Adodc1.Recordset.Fields(2) = “第二列的内容"
Adodc1.Recordset.Update
我这几行代码表示在表中加入一行,有两个列值。分别对应两个文本框中的内容。
运行完了之后,你会发现datagrid中增加了一行
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)