如何动态的向DATAGRID中新增记录,而不是用DATASOURCE 如何动态的向DATAGRID中新增记录,而不是用DATASOURCE就像LISTVIEW中的ITEM.ADD,DATAGRID中有这样的方法吗?在代码里应该怎么写,谢谢大家了!!~~ 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 Dim rs As New ADODB.RecordsetPrivate Sub Form_Load() rs.Fields.Append "a", adVariant, adFldMayBeNull + adFldIsNullable + adFldUpdatable rs.Fields.Append "b", adBSTR, , adFldMayBeNull + adFldIsNullable + adFldUpdatable rs.Fields.Append "c", adBSTR, , adFldMayBeNull + adFldIsNullable + adFldUpdatable rs.Fields.Append "d", adBSTR, , adFldMayBeNull + adFldIsNullable + adFldUpdatableEnd SubPrivate Sub Command1_Click() rs.Open rs.AddNew rs(0) = "1" rs(1) = "2" rs(2) = "3" rs(3) = "4" rs.Update Set DataGrid1.DataSource = rsEnd Sub VB如何实现控制系统音量大小,以及实现系统静音? 关于MSFlexGrid控件的问题 急! faysky2进! 一对一的表,怎样添加记录? 关于数字签名问题 API 的键盘类消息。。。。。急 vb实现类似excel的Trimmean函数 在英文版的WindowsXP上使用CHR转换汉字的ASC码出错,例如CHR(-11087) 关于vb语法,知道的请说一下。谢谢!!! vb的控件使用! 不知道该数组的长度怎么定义啊 求救!InstallShield6.22如何进行调试?越详细越好. 请问这是什么控件呀?
Private Sub Form_Load()
rs.Fields.Append "a", adVariant, adFldMayBeNull + adFldIsNullable + adFldUpdatable
rs.Fields.Append "b", adBSTR, , adFldMayBeNull + adFldIsNullable + adFldUpdatable
rs.Fields.Append "c", adBSTR, , adFldMayBeNull + adFldIsNullable + adFldUpdatable
rs.Fields.Append "d", adBSTR, , adFldMayBeNull + adFldIsNullable + adFldUpdatable
End SubPrivate Sub Command1_Click()
rs.Open
rs.AddNew
rs(0) = "1"
rs(1) = "2"
rs(2) = "3"
rs(3) = "4"
rs.Update
Set DataGrid1.DataSource = rs
End Sub