- 1、本文档共30页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
第7章使用控件访问数据库 7.1 Data数据控件 Data数据控件的常用属性 Data数据控件常用的事件 Data数据控件常用的方法 数据控件的记录集(RecordSet对象) EofAction和BofAction属性 该属性是当记录指针指向RecordSet对象的第一条记录前或最后一条记录后时,数据控件的EofAction和BofAction属性的设置或返回值决定了数据控件要采取的操作。其属性的取值如表8.1所示。 7.1 Data数据控件 需要指出是,数据控件本身并不直接显示记录集中的数据,而是通过与它绑定的控件(也称绑定控件)来实现。常用的绑定控件有文本框、标签、复选框、图片框和图象框等。数据控件用于绑定数据库和数据库中的某个数据表,绑定控件先与数据控件进行绑定,再绑定数据表中的某个列。所以要使绑定控件能与数据库进行连接,必须设置它的两个属性: ①DataSource属性:该属性通过指定一个有效的数据控件使绑定控件连接到一个数据库上。 ②DataField属性:该属性设置数据库有效的字段与绑定控件建立联系。 7.1 Data数据控件 创建步骤: 选择“文件”菜单中的“新建工程”,在随后出现的“新建工程”对话框中选择“标准EXE”,单击“确定”按钮。 设置窗体的Caption属性为“StuInfo数据表基本信息浏览”。 在窗体中添加7个标签框、7个文本框和一个命令按钮,并按图8.1所示设置标签框和命令按钮的Caption属性。 在窗体上添加一个Data控件,并按表8.2设置属性。 7.1 Data数据控件 7.1 Data数据控件 ⑤设置绑定控件文本框的属性,如表7.3所示: ⑥修改命令按钮的Name属性值为“退出”,程序代码如下: Private Sub 退出_Click() Unload Me End End Sub ⑦运行该应用程序,出现如图8.2所示界面,单击 Data控件上的左右箭头可以浏览“StuInfo”数据表中的记录。 7.1 Data数据控件 7.1 Data数据控件 Data数据控件常用的事件 Reposition事件 Vaildate事件 Errors事件 7.1 Data数据控件 Data数据控件常用的事件 [例7-2] 修改例7-1的应用程序,编一 Reposition事件过程,使得当单击数据控件对象上的箭头时,在数据控件的标题区显示记录的序号。 创建步骤: 添加Reposition事件过程 运行该应用程序,出现如图8.3所示界面,单击Data控件上的箭头可以浏览“StuInfo”数据表及其记录序号 7.1 Data数据控件 Data数据控件常用的事件 [例7-3] 在例7-2的应用程序中,添加Vaildate事件,使得用户在浏览“StuInfo”数据表时不能改变学号的位数。 创建步骤: Vaildate事件的程序代码如下: Private Sub Data1_Validate(Action As Integer, Save As Integer) If Save And Len(Trim(TxtID)) 6 Then MsgBox 学号必须为6位!, vbCritical, 警告框 Action = 0 End If End Sub 运行该应用程序时,如果用户改变了“StuInfo”数据表的学号位数,然后按了数据控件上的任一个按钮,会出现如右图所示的对话框。 7.1 Data数据控件 Data数据控件常用的方法 Refresh方法 UpdateControls方法 UpdateRecord方法 7.1 Data数据控件 7.1 Data数据控件 7.1 Data数据控件 RecordCount属性 该属性用于统计RecordSet对象的记录个数。 [例7-5] 修改例7-3的应用程 序,当打开该应用程序 时显示 “StuInfo”数据表记录的个数。 创建步骤: 在窗体上添加两个标签,如右图所示。 添加Activate事件过程,代码如下: Private Sub Form_Activate() Data1.Recordset.MoveLast Label9.Caption = Data1.Recordset.RecordCount End Sub 运行该应用程序,“StuInfo”
您可能关注的文档
- 第6篇 T-SQL基础.ppt
- 第6篇 属性表编辑.pdf
- 第6篇 数据表的基本应用.ppt
- 第6篇 数据库设计_1.ppt
- 第6篇 数据完整性.ppt
- 第6篇 特许经营加盟模式设计.ppt
- 第6篇+图像处理.pptx
- 第6篇gcc编译器linux.ppt
- 第6篇常用标准控件.ppt
- 第6篇数据窗口对象.ppt
- 分析let s单元56ago2卷纸zheng unit56.pdf
- 塑胶材料其它分类原料pa9t 12.pdf
- md16x16数字媒体切换器设备.pdf
- 者参考项目发起人学科类型单位序列承包商修订页代码顺序典型.pdf
- 届世界天然气大会阿姆斯特丹2006add10288.pdf
- 期测试记录表每周weekly g1g6 journeys tests level 6 lesson26.pdf
- modernize-whitepaper现代化您应用程序白皮书.pdf
- anybackup产品典型案例分析.pdf
- 约克金融工程课程tfeslide32.pdf
- 广州市妇女儿童医疗中心历份教学药历01tjy.pdf
最近下载
- 2024年湖北省中考历史试题卷(含答案及解析).docx
- 爱护我们的五官幼儿主题班会PPT课件.pptx VIP
- 2020人教版二年级数学下册易错题型及答案.pdf VIP
- 2024届高考专题复习:小说叙述视角课件(共24张PPT) (1).pptx VIP
- 2024届高考专题复习:小说叙述视角.pptx VIP
- 《道德与法治》六年级下册全册知识点汇总.docx
- 测测达人版平台服务规则考试题库答案APP测测基础认证题.docx
- 江苏省苏州常熟市七年级数学下学期期末考试试题.docx VIP
- 建筑地基处理技术规范.pptx
- T_CACM 1270-2019 中医内科临床诊疗指南 脓毒症.docx
文档评论(0)