- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
数据库软件管理的开发 数据库 服务器 应用 界面 VB应用程序 SQL Server 数据库访问接口 VB数据库访问控件 数据库应用系统结构 案例—教务管理系统的开发 实例目标 首先创建一个名为“教务”的数据库,然后使用Vb程序浏览和访问数据库。 技术要点 静态查询和SQL语言的使用; 使用ToolBar和ImageList控件制作工具栏。 实现步骤 创建数据库 创建主窗体 添加工具栏按钮控件:ToolBar和ImageList控件 添加数据库连接控件 添加数据显示控件 编写代码 建立教务数据库 创建登陆模块 Private Sub Command1_Click() Ad1.RecordSource = team: Ad1.Refresh Ad1.Recordset.MoveFirst Ad1.Recordset.find 姓名= + Text1.Text + If Ad1.Recordset.EOF Then x = MsgBox(没有该用户,重新输入吗?, vbYesNo, 错误!) If x = vbYes Then Exit Sub Else End End If If Ad1.Recordset.Fields(1) = Text2.Text Then Unload Form1: Form2.Show: Exit Sub x = MsgBox(密码错误,重新输入吗?, vbYesNo, 错误!) If x = vbYes Then Exit Sub Else End End Sub 创建主窗体 首先添加ToolBar和ImageList控件到工具箱; 步骤: 1.工程/部件?选“Microsoft Windows Common Control 6.0” 2. ToolBar控件包含用来创建工具栏的按钮对象集合; ToolBar可以拥有文本和相关联的ImageList提供的图像; 创建工具栏 3.ImageList控件的属性创中选择图像标签; 4.设置按钮属性:索引(1),标题(第一个),关键字(First),样式(0-tbrDefault),工具提示文本(单击此按钮查看第一个记录),图像(1)。 5.根据题意添加8个按钮 创建工具栏 在ImageList控件中添加图象 ImageList控件不单独使用,专门为其它控件提供图像库。 索引(Index)、 关键字(Key) 在ToolBar中引用 图象文件的扩展名为: .ico、.bmp、.gif、.jpg等 在ToolBar控件中添加按钮 1.为工具栏连接图象 ToolBar与 ImageList的连接 工具栏样式 2.为工具栏增加按钮 索引(Index)、关键字(Key)每个按钮的编号、标识,ButtonClick事件中引用; 图象(Image) ImageList对象中的图象值可以是Key或Index 样式(Style),共6种 除菜单按钮(5)外的5种样式 三、 响应ToolBar控件事件 ToolBar控件常用的事件有两个:ButtonClick和ButtonMenuClick。前者对按钮样式为0-2,后者对样式为5的菜单按钮。 (1)用索引Index确定按钮 (2)用关键字Key确定按钮 Private Sub Toolbar1_ButtonClick(Byval Button As ComctlLib.Button) Select Case Button.Index Case 1 FileNewProc Case 2 FileOpenProc …… End Select End Sub 注意:第1个按钮的Index值为1。用Index还是用Key比较,Key 可读性好,可维护性好。 Select Case Button.Key Case TNew FileNewProc Case TOpen FileOpenProc ..... 加入数据连接控件 1、数据连接控件(ADODC) ADODC控件(可以连接所有数据库) 设置参数:Connection—选择数据库驱动程序和数据库名 RecordSource—连接的数据源类型 加入数据显示控件 1、添加标签控件Label,说明显示内容; 2、添加文本控件Text,先是数据库中的内容; 3、根据数据库中表的属性内容,分别添加10个Label和9个Text。其中性别使用Checkbox控件。 4、分别设置Text的Datasource(数据源属性)为Data
文档评论(0)