搜索
Data数据控件在数据控件中使用SQL查询数据绑定控件小结和习题第7章使用控件访问数据库数据控件是VisualBasic访问数据库的一种利器,它通过MicrosoftJET数据库引擎接口实现数据访问。数据控件能够利用三种Recordset对象来访问数据库中的数据,数据控件提供有限的不需编程而能访问现存数据库的功能,允许将VisualBasic的窗体与数据库方便地进行连接。要利用数据控件返回数据库中记录的集合,应先在窗体上布置控件,再通过它的三个基本属性Connect、DatabaseName和Recordsource设置要访问的数据资源。7.1Data数据控件Data数据控件的常用属性Data数据控件常用的事件Data数据控件常用的方法数据控件的记录集（RecordSet对象）7.1Data数据控件Data数据控件的常用属性Connect属性DatabaseName属性RecordSource属性RecordsetType属性ReadOnly属性Exclusive属性EofAction和BofAction属性EofAction和BofAction属性该属性是当记录指针指向RecordSet对象的第一条记录前或最后一条记录后时，数据控件的EofAction和BofAction属性的设置或返回值决定了数据控件要采取的操作。其属性的取值如表8.1所示。7.1Data数据控件属性取值操作BofAction0(MoveFirst)将记录指针重定位到第一条记录1（Bof）移过记录集开始位，定位到一条无效记录，触发数据控件对第一条记录的无效事件ValidateEofAction0(MoveLast)将记录指针重定位到最后一条记录1(Eof)移过记录集结束位，定位到一条无效记录，触发数据控件对最后一条记录的无效事件Validate2(AddNew)向记录集加入新的空记录，可以对新记录进行编辑，移动记录指针新记录写入数据库7.1Data数据控件数据控件本身并不直接显示记录集中的数据，而是通过与它绑定的控件（也称绑定控件）来实现。常用的绑定控件有文本框、标签、复选框、图片框和图象框等。数据控件用于绑定数据库和数据库中的某个数据表，绑定控件先与数据控件进行绑定，再绑定数据表中的某个列。所以要使绑定控件能与数据库进行连接，必须设置它的两个属性：①DataSource属性：该属性通过指定一个有效的数据控件使绑定控件连接到一个数据库上。②DataField属性：该属性设置数据库有效的字段与绑定控件建立联系。程序设计界面7.1Data数据控件创建步骤：①选择“文件”菜单中的“新建工程”，在随后出现的“新建工程”对话框中选择“标准EXE”，单击“确定”按钮。②设置窗体的Caption属性为“StuInfo数据表基本信息浏览”。③在窗体中添加7个标签框、7个文本框和一个命令按钮，并按图8.1所示设置标签框和命令按钮的Caption属性。④在窗体上添加一个Data控件，并按表8.2设置属性。7.1Data数据控件属性值CaptionStuInfo表数据控件NameData1ConnectAccessRecordsetType1-DynasetDatabaseNameTuiMag.mdbRecordSourceStuInfoNameTextDataSourceDataFieldTxtID空Data1StuIDTxtName空Data1StuNameTxtSex空Data1StuSexTxtBirthDate空Data1StuBirthDateTxtClass空Data1StuClassTxtFrom空Data1StuFromTxtTel空Data1StuTelData控件的属性绑定控件文本框的属性7.1Data数据控件⑤设置绑定控件文本框的属性，如表7.3所示：⑥修改命令按钮的Name属性值为“退出”，程序代码如下：PrivateSub退出_Click()UnloadMeEndEndSub⑦运行该应用程序，出现如图8.2所示界面，单击Data控件上的左右箭头可以浏览“StuInfo”数据表中的记录。7.1Data数据控件程序运行界面7.1Data数据控件Data数据控件常用的事件Reposition事件Vaildate事件Errors事件7.1Data数据控件Data数据控件常用的事件[例7-2]修改例7-1的应用程序，编一Reposition事件过程，使得当单击数据控件对象上的箭头时，在数据控件的标题区显示记录的序号。创建步骤：添加Reposition事件过程运行该应用程序，出现如图8.3所示界面，单击Data控件上的箭头可以浏览“StuInfo”数据表及其记录序号7.1Data数据控件Data数据控件常用的事件[例7-3]在例7-2的应用程序中，添加Vaildate事件，使得用户在浏览“StuInfo”数据表时不能改变学号的位数。创建步骤：Vaildate事件的程序代码如下：PrivateSubData1_Validate(ActionAsInteger,SaveAsInteger)IfSaveAndLen(Trim(TxtID))6ThenMsgBox学号必须为6位！,vbCritical,警告框Action=0EndIfEndSub运行该应用程序时，如果用户改变了“StuInfo”数据表的学号位数，然后按了数据控件上的任一个按钮，会出现如右图所示的对话框。7.1Data数据控件Data数据控件常用的方法Refresh方法UpdateControls方法UpdateRecord方法7.1Data数据控件数据控件的记录集（RecordSet对象）RecordSet对象的常用属性RecordSet对象的常用方法7.1Data数据控件RecordSet对象的常用属性Enabled属性EOF（EndOfFile）属性BOF（BeginningOfFile）属性RecordCount属性7.1Data数据控件RecordCount属性该属性用于统计RecordSet对象的记录个数。[例7-5]修改例7-3的应用程序，当打开该应用程序时显示“StuInfo”数据表记录的个数。创建步骤：在窗体上添加两个标签，如右图所示。添加Activate事件过程，代码如下：PrivateSubForm_Activate()Data1.Recordset.MoveLastLabel9.Caption=Data1.Recordset.RecordCountEndSub运行该应用程序，“StuInfo”数据表记录个数显示在标签框中。7.1Data数据控件RecordSet对象的常用方法Move方法AddNew方法Delete方法Edit方法Update方法7.1Data数据控件Move方法本方法用于移动RecordSet对象的记录指针，有5种移动记录指针的方法：MoveFirst方法MoveLast方法MovePrevious方法MoveNext方法Move(n)方法7.1Data数据控件Move(n)方法Move方法的语法格式如下：数据控件名.RecordSet.Move方法名[例7-6]修改例7-3的应用程序，界面如图7.6所示，要求通过Move方法来移动该应用程序的记录。创建步骤：分为三部7.1Data数据控件AddNew方法本方法用于清除数据缓冲区中的信息，并将当前记录指针移到最后，为添加新记录作好准备。语法格式如下：数据控件名.RecordSet.AddNew调用AddNew方法。清空数据缓冲区，为增加数据作准备。给各个字段赋值。有两种方法可以使用：一种方法，直接在绑定控件中输入各字段的值；另一种方法，可使用语句：数据控件名.RecordSet.Fields(”字段名”)=值。调用Update方法。将数据缓冲区中的数据写入数据表。7.1Data数据控件Delete方法删除记录中的当前记录，但记录指针不动，它仍是当前记录语句格式如下：数据控件名.RecordSet.Delete定位被删除的记录使之成为当前记录。调用Delete方法，删除当前记录。移动记录指针。7.1Data数据控件Edit方法用于将当前记录复制到数据缓冲区以便编辑。语法格式如下：数据控件名.RecordSet.Edit注意：编辑一条记录需分四步完成：定位需编辑的记录使之成为当前记录。调用Edit方法。修改各需要修改的字段。调用Update方法，确定所做的修改。7.1Data数据控件Update方法将数据缓冲区的内容送到数据库中。语法格式如下：数据控件名.RecordSet.Update[例7-7]修改例7-6的应用程序，在窗口中增加五个命令按钮，界面如图7.7所示。命令按钮的事件过程要求如下：程序开始运行时，“确认”和“取消”按钮是不可用的；单击“添加记录”或“修改记录”按钮后，只有“确认”和“取消”按钮可用；单击“确认”或“取消”按钮后，按钮的状态又回到程序开始运行时的状态7.2在数据控件中使用SQL查询SQL语言以其丰富的功能、方便灵活的使用方法、简洁的语言等特点，赢得了广大计算机用户的欢迎。SQL语言的查询语句是SQL的精华所在，查询的动词只有一个SELECT，查询的语法也很简单。但是，通过改变查询条件和查询方式，SQL查询语句可以完成多种查询任务。7.2在数据控件中使用SQL查询在数据控件中可以通过将SELECT语句字符串赋给RecordSource属性来实现查询。查询过程可以通过以下步骤来完成：根据查询的条件，给出实现查询的SELECT语句字符串（一般赋值给某个变量）；将SELECT语句字符串赋值给数据控件的RecordSource属性；执行数据控件的Refresh方法。注意：当查询条件中包含变量时，该变量要用两个单引号括起来。7.2在数据控件中使用SQL查询[例7-8]修改例7-7的应用程序，在窗体中增加二个命令按钮，界面如图7.10所示。命令按钮的事件过程要求如下：程序开始运行时，“查询结束”、“确认”和“取消”按钮无效；单击“查询”按钮后，只有“查询结束”可用；单击“查询结束”按钮后，按钮的状态又回到程序开始运行时的状态；7.3数据绑定控件在VisualBasic6.0中数据控件本身不能直接显示记录集中的数据，必须通过可以与数据控件进行绑定的控件来实现。那些可以与数据控件进行绑定，并显示记录集中数据的控件称为数据绑定控件。常用的标准数据绑定控件有文本框、标签框、复选框、图片框和图象框等，另外VisualBasic6.0还提供了一些可添加到工程中的ActiveX数据绑定控件。7.3数据绑定控件Datasource属性Row属性Rows属性Col属性Cols属性FixedCols属性FixedRows属性RowHeight属性ColWidth属性GridLine属性Scrollbars属性Text属性Picture属性大多数数据绑定控件都是读者比较熟悉的常用控件，只需对DataSource和DataField这两个属性进行设置即可使用。ActiveX数据绑定控件Dblist和DBCombo同标准控件的列表框和组合框类似，可以给用户提供选项列表，只是其选项从记录集中获得。ActiveX数据绑定控件MSFlexGrid使用非常广泛，MSFlexGrid控件除具有Name、Caption、Visible等大多数控件都拥有的属性外，还具有以下几个与显示数据有关的属性：7.3数据绑定控件[例7-10]修改“例7-2”应用程序，在窗体中增加一个Data控件和MSFlexGrid控件，界面如图7.16所示。要求当StuInfo数据表记录发生变化时，在MSFlexGrid控件中显示该学生的课程成绩。图7.16“例7-10”初始界面修改步骤：三个步骤小结小结Data数据控件是VisualBasic6.0提供的一种访问数据库的对象，它是通过Jet数据库引擎接口实现数据访问的。Data数据控件可以将VisualBasic6.0的窗体与数据库方便地进行连接，并提供有效的、不需编程即能