只向ADODB.Recordset写数据，不更新数据库

　

adodb.recordset

option explicit

Dim Rs As New ADODB.Recordset

'比如给第3列增加内容3

Private Sub command1_Click()

 Dim i As integer

 Rs.MoveFirst

 For i = 0 To 3

' Rs.AddNew '加四条记录,即为 DataGrid 添加四空行

Rs(2) = "test"

Rs.MoveNext

Next i

End Sub

Private Sub Form_Load()

Dim i As Integer

For i = 0 To 2  '为Recordset三个字段,即为 DataGrid 添加三列

Rs.fields.APPend "第" & i & "列", adVariant, , adFldMayBeNull + adFldIsNullable + adFldUpdatable

Next i

  

Rs.Open

For i = 0 To 3

Rs.AddNew '加四条记录,即为 DataGrid 添加四空行

Next i

Set DataGrid1.datasource = Rs '绑定 DataGrid 的数据源

Rs.MoveFirst

End Sub

相关阅读

安装MSDE2000数据库教程

下载CHS_MSDE2000A，具体下载地址 下载之后双击CHS_MSDE2000A，解压到c盘根目录 为了预防出现安装MSDE2000，提示“为了安全起见，要求

GridView绑定数据并分页

使用VS 2015版本1、使用Gridview绑定数据2、GridView分页3、更改表头名字控件步骤如下：创建GridView，点击右上角的小三角，弹出菜单，有

淘宝营销工具数据魔方怎么用（如何使用、常见问题分析）

数据魔方淘宝的一款很强大的数据分析工具。受到众多卖家的青睐，但是有些卖家对于如何使用数据魔方获得淘词还存在疑惑,淘宝营销工

百度开源 FAQ 问答系统（AnyQ）|FAQ数据集的添加

1.FAQ 所谓FAQ(Frequently Asked Questions)问答，指的是通过构建一个数量巨大的问题答案库来作为语料库，当输入一个问题时，通过计算

Python 爬取 Yahoo! Finance 数据问题总结

在《Python for Data Analysis》的第五章 Pandas 入门中，有一段分析 Yahoo! Fiannce 的股票价格和成交量的代码，此代码年代已久，如果