案例集锦
38页1、案案 例例 集集 锦锦在前面的章节中讲述了使用 VB 创建数据库应用程序的几个范例,其实作为编程语言 来说,VB 易于掌握和提高,可以极为迅速和简洁的创建 Windows 应用程序,非常适合普 通的用户来编写符合自己需要的实用小程序。在接下来的内容中将向读者介绍几个用 VB 开发实用小程序的方法,并且结合实例向读者介绍 VB 编程中的许多技巧。案例一案例一 我的桌面小闹钟我的桌面小闹钟一、概述一、概述在本例中将创建一个可以自动跟随鼠标移动的小闹钟,实时地显示当前计算机的时间, 并且允许用户添加、删除和修改定时任务,这些任务将被保存在一个 Access 数据库中,在 设置的时间到达时,闹钟将用音乐警报,并弹出消息框来提示用户。其功能模块图如图 1.1 所示。图 1.1 系统的功能模块图二、数据库的准备二、数据库的准备通过 Access 或者 VB 可视化数据管理器创建一个 Access 数据库,在其中添加一个名为 “任务列表”的数据表。该数据表的结构如表 1.1 所示。表表 1.11.1 “任务列表任务列表”数据表的结构数据表的结构字段名称任务编号任务时间任务内容任务状态字段类型文本文本
2、文本文本字段大小151510010主键是否否否三、应用程序的编写三、应用程序的编写在 VB 中创建一个新的“标准 EXE”工程,将其命名为“我的小闹钟” 。 在工程默认的窗体 Form1 中添加一个图片控件,两个标签控件,一个时间控件,依表 11.2 至表 11.5 所示的内容设置窗体和控件的属性。案 例 集 锦2表表 1.2 窗体窗体 Form1 的属性的属性名称BorderStyleShowInTaskBarForm10-NoneFalse表表 1.3 图片控件的属性图片控件的属性名称AppearanceBackColorBorderStylePicture10-FlatData Source=“ “ 设置数据库连接字符串 musicname = App.Path Data Source=“ “ Adodc1.RecordSource = “select 日期,天气,心情,内容 from 日记表 Order by 日期 “ Adodc1.Refresh 变量的初始赋值 moveform = False newDiary = False OpenDiary = False 设置控件的
3、属性 LblMessage.Caption = “ 欢迎使用!“ Text1.Locked = True Combo1.Locked = True RichTextBox1.Locked = True For i = 1 To 1050 PicBox(0).Height = PicBox(0).Height - 1 Next i For i = 1 To 2000 PicBox(1).Height = PicBox(1).Height - 1 Next i End SubPrivate Sub DTPicker1_Change( )日期控件内容改变时 If newDiary = True Then编辑新日记Exit Sub退出过程 Else查找日记 If Adodc1.Recordset.RecordCount 0 Then存在日记文件时 搜索日记 Adodc1.Recordset.MoveFirst Adodc1.Recordset.Find “日期 = “ (3) 保存工程。 如果使用这种方法,可以从工程中把 Form 对象删除。运行该工程,其最后的结果显示如图 3.8 所示。案例
4、三 Access 数据库简单报表的创建33图 3.8 单层次结构报表结果显示三、多层次结构报表(单层次结构报表的扩展)三、多层次结构报表(单层次结构报表的扩展)在上边的单层次结构数据报表的基础上很容易将其扩展,并生成一个更加复杂的报表。 在下面的过程中,数据环境最先扩展 Order Details 和 Products 表,扩展的报表包括在一个 特定日期定货的产品名称。 扩展数据环境的具体步骤如下: (1) 在数据环境设计器中,右键单击“Orders”图标,然后单击“Add Child Command(添加子命令) ”显示“Command1”图标; (2) 右键单击“Command1”图标,选择“属性(Properties) ” ,弹出“Command1 属性” 对话框; (3) 参照表 3.5 各个数据设置“Command1 属性”对话框中相应属性的属性值;表表 3.5 “Command1 属性属性”属性表属性表属性属性值案 例 集 锦34Command NameDataBase ObjectObject NameOrderDetailsTableOrder Details(4) 单
《案例集锦》由会员206****923分享,可在线阅读,更多相关《案例集锦》请在金锄头文库上搜索。
人教版小学英语单词分类记忆汇总表excel版
人教版九年级全一册英语词汇
2019年开展垃圾分类的工作总结报告【五篇】
六年级英语绘本教案
外研版小学英语单词表全带音标(一年级起点1-12册)
最新国家开放大学电大投资学网络核心课形考网考作业及答案
初中人教版七年级下册生物复习提纲
高中英语语法大全高中英语语法系统全解word版
☆初中英语语法专项练习习题以及答案
初中英语常考近义词同义词辨析
高中物理选修3-5全套教案(人教版) (1)
英语绘本《WeatherReport》教学设计
防护功能平战转换设计专篇各专业
初中人教版七年级上册下册全册生物复习提纲21页 (1)
商务星球版七年级上册地理知识点归纳总结
初中人教版七年级上册下册全册生物复习提纲21页 (2)
高中高考语文作文词汇句型优美句子万能语句大全
中考地理选择题专项复习550题含答案
北师大版七年级数学上册第四章基本平面图形单元测试题含解析
人教版七年级数学上册第一章有理数单元检测题解析版
2024-03-21 1页
2024-03-21 1页
2024-03-15 2页
2024-03-01 2页
2024-03-01 2页
2024-02-28 118页
2024-02-28 152页
2024-02-28 87页
2024-02-28 92页
2024-02-28 96页