文章作者 100test 发表时间 2007:03:26 17:25:51
来源 100Test.Com百考试题网
三、使用Recordset对象
Recordset(记录集)对象代表你在程序中使用的数据。
在上面的程序中,曾使用一个名为RecordsetType(记录集类型)的数据属性指明数据库信息为一个表。在Visual Basic中,Recordset(记录集)是一个代表你正在程序中使用的数据库部分的对象。当把数据控件的RecordSource属性设置为表或查询的名称时,就定义了一个新的名为Recordset的对象。Recordset对象有它自己的一套特殊属性和方法,使你能查找、排序、添加和删除记录。
在下面的练习中,将使用Recordset对象在zgda.mdb数据库中按编号查找项目,并将它们显示出来。
1、在zgda.mdb中查找数据
在修改程序之前,为保护原始程序,请先以新文件名将它存盘。
1) 在文件菜单中,单击另存为窗体、另存为工程菜单项。以MyFindRec.frm、MyFindRec.vbp为文件名分别保存窗体和工程。
2)在窗体的左下方创建两个命令按钮对象,Caption属性分别设置为“查找”、“结束”。
3)添加代码。
Option Explicit
Dim prompt As String, searchSearchStr As String
Private Sub Command1_Click()
prompt$ = "输入要查找的编号:"
searchSearchStr$ = InputBox(prompt$, "搜索记录")
Data1.Recordset.Index = "Primarykey"