一、vb中 recordset如何使用和理解
rs= Server.CreateObject("ADODB.RecordSet")\x0d\x0ars.Open(sqlStr,conn,1,A)\x0d\x0a注：A=1表示读取数据；A=3表示新增、修改或删除数据。\x0d\x0a在RecordSet组件中，常用的属性和方法有：\x0d\x0ars.Fields.Count：RecordSet对象字段数。\x0d\x0ars(i).Name：第i个字段的名称，i为0至rs.Fields.Count-1\x0d\x0ars(i)：第i个字段的数据，i为0至rs.Fields.Count-1\x0d\x0ars("字段名")：指定字段的数据。\x0d\x0ars.Record.Count：数据记录总数。\x0d\x0ars.EOF：是否最后一条记录。\x0d\x0ars.MoveFirst：指向第一条记录。\x0d\x0ars.MoveLast：指向最后一条记录。\x0d\x0ars.MovePrev：指向上一条记录。\x0d\x0ars.MoveNext：指向下一条记录。\x0d\x0ars.GetRows：将数据放入数组中。\x0d\x0ars.Properties.Count：ADO的ResultSet或Connection的属性个数。\x0d\x0ars.Properties(item).Name：ADO的ResultSet或Connection的名称。\x0d\x0ars.Properties：ADO的ResultSet或Connection的值。\x0d\x0ars.close()：关闭连接。
二、adodb.recordset对象的属性
Recordset对象是基于连接数据库的数据表或通过Command对象执行结果获取的记录集。要通过ADO对象模型对数据库中的数据进行操作，经常需要使用该对象。本文介绍使用Recordset对象的属性来获取数据库字段的方法。本文使用微软Access自带的“罗斯文2007”数据库文件，程序将开启其中的“运货商”数据表记录集，将返回记录集记录总数及有关字段。
1、新建Excel工作簿，打开Visual Basic编辑器，在工程资源管理器中插入一个模块，在模块的“代码”窗口中输入如下代码：
Dim conn As New ADODB.Connection
conn.Provider="Microsoft.ACE.OLEDB.12.0"'设置提供者名称
conn.ConnectionString="data source="&_ThisWorkbook.Path&"\罗斯文2007.accdb"'设置连接字符串
conn.Mode=adModeReadWrite'设置数据库读写模式
rs.CursorLocation=adUseClient'设置游标引擎位置
rs.Open"运货商",conn,adOpenForwardOnly,adLockOptimistic'打开“运货商”数据表记录集
Debug.Print"记录总数："&rs.RecordCount'输出记录集记录数
Do Until rs.EOF'遍历记录集所有记录
Debug.Print rs.AbsolutePosition&vbTab&rs.Fields("公司")'输出当前记录位置及“公司”字段
rs.MoveNext'移动到下一条记录
2、按F5键运行该过程，此时可以在“立即窗口”中获取指定数据库中的字段记录
三、vb中“recordset”如何使用
1、rs= Server.CreateObject("ADODB.RecordSet")
2、注：A=1表示读取数据；A=3表示新增、修改或删除数据。
3、在RecordSet组件中，常用的属性和方法有：
4、rs.Fields.Count：RecordSet对象字段数。
5、rs(i).Name：第i个字段的名称，i为0至rs.Fields.Count-1
6、rs(i)：第i个字段的数据，i为0至rs.Fields.Count-1
7、rs("字段名")：指定字段的数据。
8、rs.Record.Count：数据记录总数。
9、rs.MoveFirst：指向第一条记录。
10、rs.MoveLast：指向最后一条记录。
11、rs.GetRows：将数据放入数组中。
12、rs.Properties.Count：ADO的ResultSet或Connection的属性个数。
13、rs.Properties(item).Name：ADO的ResultSet或Connection的名称。
14、rs.Properties：ADO的ResultSet或Connection的值。
好了，文章到此结束，希望可以帮助到大家。
