VB 教案 第 14 次课教案
vb-14
• 在窗体的QueryUnload 事件过程中添加相关代码 • QueryUnload在关闭窗体之前发生的事件，该事件的发生在 unload之前
添加状态栏StatusBar 添加状态栏StatusBar
• 1、状态栏跟通用对话框控件一样，没有显示在工具箱中， 如需使用，应先通过【工程】——【部件】，添加MicroSoft windows common control • 工具箱中多了状态栏，工具栏、进度条等控件 • 这一类控件都是ActiveX控件P294
子窗体的排列
• 相关内容——主窗体的Arrange方法 – 是子窗体按照一定的规律排列P271 – 格式：主窗体名.Arrange <参数> • 操作：主窗体中添加新菜单“窗口”win，包含命令“层 叠”wincas、“水平平铺”winhor、“垂直平铺”winver，单 击该菜单项，子窗体安要求排列
• 4、保存文件的基本思路 • 保存位置的处理： – If savestate(Val(Screen.ActiveForm.Tag)) = False Then – – – – – On Error Resume Next monDialog1.FileName = Screen.ActiveForm.Caption & ".txt" monDialog1.ShowSave If Err = 32755 Then Exit Sub strfilename = monDialog1.FileName
什么是多文档界面
• 多文档界面由主窗体和子窗体组成，主窗体称MDI窗体. • 如在VB的工作界面,VB窗口就是主窗体,而其中的每一个窗体 和模块就是子窗体
(完整版)VB教案(详细教案共82课时)
第1、2课时课题：VB程序开发环境教学目的：1、了解VB的发展概况、特点、版本和功能2、学会VB的安装、启动及退出3、熟悉VB程序开发环境教学重难点:1、VB的特点、版本和功能2、VB的启动及退出3、VB程序开发环境教学方法: 多媒体教学教学过程：Ⅰ、引入VB是一种功能强大的可视化的计算机语言，利用VB可以设计出界面漂亮又实用的应用程序，目前在国内外应用特别广泛.Ⅱ、新课一、VB简介1。
VB的发展概况（四阶段）：1)64～74：Basic语言问世2)75~85:微机上固化的Basic语言3）86～90：结构化的Basic语言4）91至今:VB（微软推出）2.VB的特点及功能VB是一种可视化的、面向对象和采用事件驱动方式的结构化高级程序设计语言.1）可视化编程2）面向对象的程序设计3）结构化的程序设计语言4）事件驱动编程机制5）支持多种数据库系统的访问6)Active技术7）VB6在开发环境上、网络功能等的增强8）完备的help联机帮助功能3.VB的版本1)学习版使编程人员轻松开发 Windows的应用程序.该版本包括所有的内部控件连同网格(Grid）控件、Tab 和数据绑定（Data_Bound)控件。
2)专业版为专业编程人员提供了一整套进行开发的功能完备的工具。
该版本包括学习版的全部功能连同 ActiveX 控件，还包括 Internet 控件和 Crystal Report Writer。
3)企业版使得专业编程人员能够开发功能强大的组内分布式应用程序.该版本包括专业版的全部功能连同自动化管理器、部件管理器、数据库管理工具、Microsoft Visual SourceSafe（TM）面向工程版的控制系统等。
二、VB的安装、启动及退出1.VB的安装2。
启动1）开始/程序2）我的电脑或资源管理器3）开始/运行4）双击VB6.0的快捷方式3.VB的启动界面新建、现存、最新选项卡4.VB的退出1）文件/退出2）Alt+Q3)Alt+F44）右上角的“×"按钮三、VB集成开发环境Visual Basic集成开发环境是一个功能非常强的操作界面，在这里用户可以新建程序、设置属性、编写代码、调试程序、生成Exe等。
VB教案(详细教案共82课时)
第1、2课时课题：VB程序开发环境教学目的:1、了解VB的发展概况、特点、版本和功能2、学会VB的安装、启动及退出3、熟悉VB程序开发环境教学重难点：1、VB的特点、版本和功能2、VB的启动及退出3、VB程序开发环境教学方法：多媒体教学教学过程：Ⅰ、引入VB是一种功能强大的可视化的计算机语言，利用VB可以设计出界面漂亮又实用的应用程序，目前在国内外应用特别广泛。
Ⅱ、新课一、VB简介1.VB的发展概况（四阶段）：1）64~74：Basic语言问世2）75~85：微机上固化的Basic语言3）86~90：结构化的Basic语言4）91至今：VB（微软推出）2.VB的特点及功能VB是一种可视化的、面向对象和采用事件驱动方式的结构化高级程序设计语言。
1）可视化编程2）面向对象的程序设计3）结构化的程序设计语言4）事件驱动编程机制5）支持多种数据库系统的访问6）Active技术7）VB6在开发环境上、网络功能等的增强8）完备的help联机帮助功能3.VB的版本1）学习版使编程人员轻松开发 Windows的应用程序。
该版本包括所有的内部控件连同网格（Grid）控件、Tab 和数据绑定（Data_Bound）控件。
2）专业版为专业编程人员提供了一整套进行开发的功能完备的工具。
该版本包括学习版的全部功能连同 ActiveX 控件，还包括 Internet 控件和 Crystal Report Writer。
3）企业版使得专业编程人员能够开发功能强大的组内分布式应用程序。
该版本包括专业版的全部功能连同自动化管理器、部件管理器、数据库管理工具、Microsoft Visual SourceSafe(TM) 面向工程版的控制系统等。
二、VB的安装、启动及退出1.VB的安装2.启动1）开始/程序2）我的电脑或资源管理器3）开始/运行4）双击VB6.0的快捷方式3.VB的启动界面新建、现存、最新选项卡4.VB的退出1）文件/退出2）Alt+Q3）Alt+F44）右上角的“×”按钮三、VB集成开发环境Visual Basic集成开发环境是一个功能非常强的操作界面，在这里用户可以新建程序、设置属性、编写代码、调试程序、生成Exe等。
VBNET第14课
如果提示是这句话错，请查看前面的各种设置条件
2
Visual 程序设计
第十四课
数据库编程之记录显示
3
界面设计
Button1、2、3、4
CheckBox1 HScrollBar1 ProgressBar1
StatusBar1
4
Hale Waihona Puke 例说明 用到Access数据库TestQ.Mdb，里面有两张表“客户”和“地 址”，我们主要用“客户”表
5
添加数据源
6
7
8
将Customer拉入窗体中，调整文本框大小 在代码窗口中会自动出现一些代码，大家运行一下程序，发现导航条上的功能都能实现
9
使用BindingContext 对象浏览数据记录
添加四个按钮
Position 属性
数据集当前记录的位置序号
第一条记录：0 最后一条记录： Count 属性值-1
滚动条的ValueChanged事件代码
通过滚动条来改变定时器的时间间隔， 从而改变浏览速度
14
定时器的Tick事件
15
练习
完成示例程序
改变可执行文件的图标为Q.ico
设计状态栏
16
考虑：进度条如何显示？
进度条的范围应该是记录的范围 最小值为第一条记录序号0，最大值为最后一条记录的记录序号
BindingContext(Me.CustomerBindingSource).Count - 1
通过value值改变
13
自动浏览复选框CheckedChanged事件代码
注意：当需要自动浏览的时候需要设置进度 条的最大最小值
12
考虑：怎样才能自动浏览？
2024年VB程序设计课程教案
VB程序设计课程教案教案VB程序设计课程教案一、教学目标1.让学生了解VB程序设计的基本概念、原理和方法，掌握VB 编程的基本技能。
2.培养学生运用VB程序设计语言解决实际问题的能力，提高学生的逻辑思维和创新能力。
3.培养学生良好的编程习惯和团队协作精神，提高学生的综合素质。
二、教学内容1.VB程序设计概述：介绍VB的发展历程、特点和应用领域，让学生对VB程序设计有一个整体的认识。
2.VB集成开发环境：讲解VB集成开发环境（IDE）的组成、功能和使用方法，使学生熟练掌握VB编程工具。
3.VB编程基础：包括数据类型、变量、常量、运算符、表达式、控制结构（顺序、选择、循环）等基本概念和语法。
4.VB窗体和控件：介绍窗体和控件的属性、事件和方法，使学生能够设计出具有良好用户界面的应用程序。
5.VB过程和函数：讲解过程和函数的定义、调用和参数传递，使学生掌握模块化编程的方法。
6.VB文件操作：介绍文件的概念、分类和操作方法，使学生能够进行文件的读写、创建和删除等操作。
7.VB数据库编程：讲解数据库的基本概念、SQL语言和数据库访问技术，使学生能够开发简单的数据库应用程序。
8.VB多媒体应用：介绍多媒体编程的基本方法，使学生能够开发具有音频、视频等多媒体功能的应用程序。
9.VB网络编程：讲解网络编程的基本概念、协议和编程方法，使学生能够开发简单的网络应用程序。
10.VB程序调试与优化：介绍程序调试和优化的方法，提高学生的编程能力和程序质量。
三、教学方法1.讲授法：讲解VB程序设计的基本概念、原理和编程方法，为学生提供理论支持。
2.案例分析法：通过分析典型实例，让学生了解VB程序设计在实际应用中的具体运用。
3.实践操作法：安排适量的上机实践，让学生动手编写程序，巩固所学知识。
4.小组讨论法：组织学生进行小组讨论，培养学生的团队协作能力和沟通能力。
5.课后作业法：布置课后作业，让学生独立完成，检验学生的学习效果。
VB教案14(1)
在关闭窗体或结束应用程序之前发生. 在关闭窗体或结束应用程序之前发生.
2010-6-29 5
14.2.2
Dim语句和WindowState属性 Dim语句和WindowState属性 语句和WindowState
1.Dim语句 Dim语句 语句可以增加子窗体, 用Dim语句可以增加子窗体,格式为: 语句可以增加子窗体 格式为: Dim 对象变量 对象变量 To ]对象变 对象变量[([对象变量 对象变量1 对象变 量2)] As [New] 对象名或对象类型 WindowState属性 2.WindowState属性 用来设置窗口的操作状态
2010-6-29 10
14. 14.5.2 程序举例 建立一个含有3个按钮的工具条 个按钮的工具条, 例14.5 建立一个含有 个按钮的工具条, 并显示ToolTips. 并显示 .
例14.5
2010-6-29
11
�
例14.4 在MDI父窗体上建立菜单,通过菜 单命令实现子窗体的建立及排列操作.
例14.4
2010-6-29
9
MDI建立工具条 14.5 用MDI建立工具条 MDI建立工具条的一般步骤 14.5.1 用MDI建立工具条的一般步骤 1.建立MDI窗体 2.建立MDI窗体控制区,即工具条 3.建立工具条按钮 4.设置属性 5.编写代码
设计阶段MDI子窗体的特性 1.查看MDIChild属性 2.查看工程资源管理器中的不同窗体图标 运行期间MDI子窗体的特性
2010-6-29
3
MDI窗体与MDI子窗体 窗体与MDI 14.1 MDI窗体与MDI子窗体
运行期间MDI子窗体的特性 子窗体的特性 运行期间 1.移不出父窗体 移不出父窗体 2.子窗体最小化的图标出现在 子窗体最小化的图标出现在MDI窗体上 子窗体最小化的图标出现在 窗体上 3.子窗体最大化时,其标题与 子窗体最大化时, 子窗体最大化时 其标题与MDI标题合并 标题合并 4.Autoshowchildren属性设置 属性设置 5.菜单显示在 菜单显示在MDI的菜单栏中 菜单显示在 的菜单栏中
VB教案
2 学时
教学重点、难点： 重点：Do 语句的格式、功能、使用方法。 难点：Do 循环的循环条件；多重循环的编程方法。
教学组织(含课堂教学内容、教学方法、 辅助手段、师生互动、时间分配、板书设计等)： 教学内容： 5.4 Do 循环结构程序设计 5.5 多重循环 5.6 程序举例 教学方法： 利用多媒体课件讲解流程图和语句的语法，进入 VB 集成开发环境中讲解 Do 语句的使用。 时间分配： 前两节内容用 1 学时，后一节内容用 1 学时。 板书设计： 讲解 Do 语句的语法规则和多重循环时可使用板书配合课件，其余内容可根据需要随时使
内蒙古工业大学 教案
2005 / 2006 学年第二学期
学 院 信息工程学院 系 别 校计算中心 课程名称 高级语言程序设计（VB） 授课对象 食品 05-1 等 13 个班 主讲教师 安琪、刘莉、袁振波、萨智海 职 称 副教授 课程学时 60
内蒙古工业大学教案(课程)
课程名称 课程类别
教案编写时间：2006-5-3
高级语言程序设计（VB）
课程代码 020403008
学时
60
公共课 ( ) 基础课 ( ) 专业课( ) 技术基础课(√ ) 专业选修课( ) 公共选修课( )
总学时：60 讲课： 30 上机： 30 实验：
其他：
学时 学时 学时 学时 学时
授课对象 全校除文科类及信息工程学院、机械学院、轻纺学院等所有专业的本科学生
1
内蒙古工业大学教案(课次)
第 1 次课 2 学时 授课题目：
第一章 Visual Basic 概述、第二章 Visual Basic 程序设计概述 教学目的、要求：
VB教学教学教案(全套
1、设计程序界面
1.1创建新工程
1.2 设计窗体：两个标签控件，两个个命令控件，一个文本框控件
2、修改对象属性
对象
属性
属性值
Form1
（名称）
欢迎加入
Label1
（名称）
Lblname
Caption
请输入姓名：
Label2
（名称）
Lbldisplay
Caption
同学，欢迎你！
执行“视图——代码窗口”命令，打开“代码”窗口
输入一些代码后，把光标定位到某个关键词中
敲f1键，就显示出关于这个关键词的信息
三、运行帮助中的代码实例
新建一个标准exe工程后，选定窗体，然后在“属性”窗口中选定“fillcolor”属性，敲f1键，打开“帮助”窗口
单击其中的“示例”打开 fillcolor属性示例的帮助窗口
启动vb后，在“帮助”菜单中选择“内容”“索引”或“搜索”命令，打开MSDN Library visual 6.0窗口。
任务1、利用“搜索”选项卡查看关于标签控件的用法
启动vb，在“新建工程”对话框中选择“标准exe”选项，然后单击“打开”按钮。
执行“帮助——内容”命令，打开MSDN Library visual 6.0窗口。
选定其中的代码部分，用复制，粘贴将其写到另外的程序中
运行程序
形成性测试
1、利用MSDN Library visual Studio 6.0窗口的“搜索”选项卡查看“窗体”的信息。
小 结
这节课我们学习了vb中的相关帮助：MSDN Library在线帮助、上下文帮助。
板书设计
第四课 使用联机帮助
一、MSDN Library在线帮助
vb14第14章 多媒体控件
13.2.2 画线、矩形方法（Line） 画线、矩形方法（ ） object.Line [Step] (x1, y1) [Step] (x2, y2), [color], [B][F] 功能： 功能：在对象的指定两点之间用一定的颜色画线或矩形 object—窗体、图片框 窗体、 窗体 Step—可选的，指定相对于由 CurrentX 和 可选的， 可选的 CurrentY 属性提供的当前图形位置的坐标 (x1, y1) —直线或矩形的起点坐标。如果省略， 直线或矩形的起点坐标。 直线或矩形的起点坐标 如果省略， 线起始于由 CurrentX 和 CurrentY 指示的 位置。 位置。 Step—可选的，指定相对于起点的终点坐标 可选的， 可选的 (x2, y2) —直线或矩形的终点坐标。 直线或矩形的终点坐标。 直线或矩形的终点坐标 Color —可选的，画线时用的 RGB 颜色。 可选的， 颜色。 可选的 B —可选的。利用对角坐标画出矩形。 可选的。 可选的 利用对角坐标画出矩形。 F—可选的。规定矩形以矩形边框的颜色填充。 可选的。 可选的 规定矩形以矩形边框的颜色填充。 不能不用 B 而用 F。 。 9
6
例13-4 13-
用PSet方法在窗体上绘制一条如下图所示的星 PSet方法在窗体上绘制一条如下图所示的星 形曲线,曲线由以下参数方程决定: 形曲线,曲线由以下参数方程决定: x=sin2t*cost y=sin2t*sint 其中t的取值范围为 的取值范围为0≤t≤2π 其中 的取值范围为 π
10
例13-6：在窗体上以随机的颜色从外向里画矩形，每隔 13在窗体上以随机的颜色从外向里画矩形， 一秒画一个。 一秒画一个。 Dim X1, Y1, X2, Y2, DX, DY Private Sub Form_Load() X1 = 0 Y1 = 0 X2 = ScaleWidth Y2 = ScaleHeight DX = ScaleWidth / 20 DY = ScaleHeight / 20 DrawWidth = 8 Randomize 11 End Sub
vb14
实验十四过程（续）【实验目的】1、掌握自定义子过程以及函数过程的定义和调用方法;2、掌握形参和实参对应关系；3、掌握值传递和地址传递的传递方式以及区别。
【实验内容】1、编写一个包含多个窗体及多个模块的工程：窗体1：主窗体，放置按扭,准备调用其他窗体；窗体2：输入一个数，显示它是否幸运数；幸运数:指前两位数字之和等于后两位数字之和的数。
窗体3：输入两个数，显示它们之间的所有幸运数；窗体4：输入一个数，显示比它小的最大幸运数；【提示】编写判断一个四位数是否幸运数的函数过程sum（返回值是逻辑型），放在主窗体中。
注意，函数过程是必须是全局级的（即在函数定义时加Public或者缺省，但一定不能加Private），否则其他窗体不能调用，调用时要在函数名前加窗体名，如：Form1.sum(text1.text)先添加几个窗体并分别设置相应的控件及属性，并正确设置启动窗体。
程序代码中利用多窗体的语句和方法将需要的窗体载入内存，不需要的窗体可隐藏或从内存中删去。
运行代码:运行界面:2、编写一函数过程FunMax( a( ) )，求一维数组a中的最大值。
主调程序随机产生10个-100到100之间的整数，调用FunMax函数过程，显示数组的最大值。
运行界面和代码:3、编写一子过程ProcMin，求一维数组a中的最小值，子过程的形参自己确定。
主调程序随机产生10个100到200之间的整数，调用ProcMin子过程，显示数组的最小值。
运行界面和代码:4、运行下面程序段，体会过程调用过程中传值和传址的区别。
Private Sub test(ByVal p%, ByVal m%, n())p = p + 1: m = m + 1n(1) = 999Print "Sub:"; p; m; n(1)End SubPrivate Sub Command1_Click()Dim c()a% = 1: b% = 2c = Array(1, 2, 3)Call test(a, b + 3, c)Print "Main:"; a; b; c(1)End Sub●运行程序，分析结果。
VB程序设计教程 第14章
标准模块bas 窗体模块frm
工程vbp…
闲置循环与doevents语句
闲置:无事件在触发时 忙碌:正在执行某事件触发程序 闲置循环:idle loop:在空闲时用一个循环来执行其他操作,就是在闲 置情况执行的循环.闲置循环时,cpu全部占用,要夺回cpu控制权,用 doevents来实现. Doevens 即可作为语句,也可作为函数置工程的启动窗体,如果没有启动窗体或过程的话,工程将无法运行, 执行方法如下: 工程 工程1属性,打开如下窗口,在其中选择启动对象.
注意:可以从最新 和现存中选择,以最快 速度地找到你的工程文 件
保存多窗体:在新建工程中直接保 存即可(要同时保存工程和窗体) 装入工程,打开工程即可,无须每 个窗体打开一次. 工程的扩展名vbp 窗体的扩展名frm
程序代码(form4)
Private Sub Command1_Click() Form1.Show Unload Me End Sub Private Sub Form_Click() MouseIcon = LoadPicture("f:\djks\ppt\on.ico") End Sub Private Sub Picture1_Click() picture1.Picture = LoadPicture("f:\djks\ppt\hn.jpg") End Sub
Sub main() Form1.Show Do While DoEvents() If mand2.Left <= Form1.Width Then Private Sub Command1_Click() mand2.Left = FontSize = 12 Print "执行按钮1的单击事件过程" mand2.Left + 1 Beep For i = 1 To 10000 Else x=x*2 mand2.Left = Next i Form1.Left End Sub End If Loop Private Sub Command3_Click() End Sub End End Sub
《新编Visual Basic程序设计教程》课件 第14章
Visual Basic中的Clipboard对象提供了访问系统资源剪贴板的方法。Clipboard 对象用于操作剪贴板上的文本和图形，它使我们能够复制、剪切和粘贴应用程 序中的文本和图形。
序，甚至还要能够发送一些键盘消息来控制其他应用程序的执行。因此， Visual Basic为我们提供了以下几种语句来完成上面提到的程序功能，其中包 括：Shell、AppActivate和SendKeys三个函数（语句）。
前面章节中曾经介绍过，Visual Basic可以定义和调用自己的程序过程。 实际上，在VB中我们不仅可以调用通用过程，而且还可以调用其他的应用 程序。这一功能是通过Shell函数实现的，其语法形式如下：
Clipboard.Clear
'清除剪贴板内原有数据
Clipboard.SetData Picture1.Picture '将图片框Picture1的图像数据装入剪
贴板
Picture1.Picture = LoadPicture("") '清除图片框Picture1的图像
Command1.Enabled = False
在以上程序的注释语句中已经详细说明了使用Cilpboard对象处理图形数 据的方法，望读者详细阅读。
前面曾经提到过，Windows环境下的应用程序并不象DOS时代用C语言编 制出的“程序孤岛”，而是Windows环境下的动态组成部分。因此， Windows环境下运行的应用程序在其自身运行时往往还需要激活其他应用程
Windows的剪贴板支持不同格式的几块数据同时存放在Clipboard上。其中， Clipboard的GetData和SetData方法允许处理图形数据格式。
VB14 常量1
(3）一条语句行的长度不能超 加 深 学 生 答 老 师 或
过1023个字符。
的记忆） 同 学 的 问
(4）通常，输入语句应该一行
题
一句，每条语句以回车键结束。
通过阅读 教材，学 生能够理 解和掌握 教材中的 知识点、 概念、事 件等内 容。设计 意图可以 明确希望 学生通过 阅读教材 能够准确 理解其中 的信息， 并能够运 用到相关 的学习任 务中。
语句本身的功能。如省略，则 符
默认为缺省值。
{} 包 含 多
{}包含多中取一的各项。
中取一的
|为多中取一表示符。竖线分隔 各项。
多个选项，必须选择其中之一。 | 为 多 中
还目的重复出现。
取一表示
，···表示同类项目重复出 符。
观察教师 操作步骤 和讲解内 容 学生专注 听老师讲 解，理解 课堂内 容，并做 好相关笔 记。 根据自己 的理解提 出问题，
类。 (1) Integer （整型）。整型 数是不带小数点和指数符号的
数据类型 数据类型 计目的之
数 值 型 数 知识点 一 是 激 发
据内容回
学生的思
数，每个整型数占 2 字节（16 位）的存储空间，其类型声明 符为"%"，其取值范围为﹣
答几个问 明确教师 考 和 参
题；
提 出 的 问 与。
1. 整 型 数 题 在 书 中 通 过 提 出
2．语句书写规则
学生更好 好相关笔
调动思维 (1）在同一行上可以书写多行 地 理 解 和
探究新知 语句，语句间用冒号":"分隔。 记 忆 知 识 （知识点 1） (2）单行语句可以分多行书写， 点 。 （ 讲
在本行后加续行符：空格和下 的 同 时 进
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
第14 次课教案
2005年10月19日星期三
章节：第四章常用控件
第八节图片框和图像框
教学任务：
掌握：图片框和图像框常用属性及常用方法和事件
理解：图片框和图像框的区别
了解：图片框和图像框的特殊事件
重点及难点：
重点：图片框和图像框常用属性
难点：图片框和图像框的区别
教学内容提要：
一、图片框
1.图片框的常用属性
2.向图片框中插入图片的三种方法
3.图片框的事件
二、图像框
1、图像框的常用属性
2、图像框与图片框的区别
【例4.21】
Private Sub Command1_Click()
Image1.Width = Image1.Width + 100
Image1.Height = Image1.Height + 100 End Sub
Private Sub Command2_Click()
Image1.Left = 1800
Image1.Width = 2655
Image1.Height = 1815
Image1.Top = 240
End Sub
Private Sub Command3_Click()
End
End Sub
三、布置作业
复习思考题、作业、参考书目：
作业：
复习图片框和图像框的属性、方法和事件预习下一节的内容
课后小结：。