Ⅲ、小结
本次课学生应该熟悉Visual Basic的一些基本的概念，对象及其三要素属性、方法、事件等。掌握窗体的常用属性的用法。 Ⅳ、作业
1、简述激活属性窗口的方法。 2、P30一、1、2、5、6
第5～6课时
课题：对象及其操作（二） 教学目的：
1、掌握窗体的属性与事件
2、掌握常用控件类型、命名、基本操作 教学重难点：
1、窗体的属性与事件
2、控件类型、命名、基本操作 教学方法：多媒体教学 教学过程：
Ⅰ、复习上节内容 1、对象的三要素 2、对象属性设置
3、Caption属性和Name属性，Enabled属性和Visible属性 Ⅱ、新课 三、窗体
6）Font属性组：改变文本的外观 其中：FontName字体、FontSize字体大小、FontBold粗体、FontItalic斜体、FontStrikethru删除线、FontUnderline下划线
7）Forecolor、Backcolor前景背景颜色属性 设置或返回控件的前景背景颜色（十六进制数) 在设计阶段设置颜色: 在属性窗口设置 在运行阶段设置颜色:
例如，将窗体Form1的背景色设置为红色，则可使用下面三种情况： Form1.BackColor = RGB(255, 0, 0) RGB(红,绿,蓝) Form1.BackColor = &HFF& Form1.BackColor = vbRed 颜色常量：
vbBlack 黑色 vbRed 红色 vbGreen 绿色 vbYellow 黄色 vbBlue 蓝色 vbMagenta 洋红色 vbCyan 青色 vbWhite 白色 8）Backstyle背景风格属性
9）BorderStyle边框风格属性（有6种）
0-None：无边框；
1-Fixed Single：单线边框，不可以改变窗口大小； 2-Sizable：双线边框，可以改变窗口大小；
3-Fixed Double：固定对话框，不可以改变窗口大小。
- 6 -
4-Fixed Tool Window:窗体外观与工具条相似。有关闭按钮 ，不可以改变窗口大小。 5-Sizable Tool Window：窗体外观与工具条相似。有关闭按钮 ，可以改变窗口大小。 10）Alignment属性：控件上正文水平对齐方式 11）Picture：窗体上显示的图片。（在属性窗口中用delete键删除已设置的图片） 12）MaxButton和MinButton属性
控制窗体右上角有最大化按钮和最小化按钮的显示 13）ControlBox属性
控制窗体左上角控制菜单框是否出现，当无控制菜单框时，同时窗体也无最大化按钮和最小化按钮，即使MaxButton属性和MinButton属性设置为Ture。 14）Icon属性
设置窗体左上角显示或最小化时显示的图标。
注意：此属性必须在ControlBox属性设置为Ture才有效。
15）WindowState：窗体的初始状态。0——正常状态、1——最小化状态、2——最大化状态 16）AutoRedraw属性
该属性决定窗体被隐藏或被另一窗口覆盖之后重新显示，是否重新还原该窗体被隐藏或覆盖以前的画面。即是否重画如Circle、Line、Pset和Print等方法的输出。
当为True时，重新还原该窗体以前的画面。 当为False时，则不重画AutoRedraw属性。 2、窗体事件 1）click
用鼠标单击窗体发生Click事件 2）dblclick
双击窗体触发该事件。 3）load、unload
load事件发生在窗体装入内存运行的时候，unload发生在窗体卸载的时候。 4）Activate、Deactivate 5）Paint 3、窗体方法
Print方法：在对象上输出信息。
Cls方法：运行时清除窗体(或图形框)中显示的文本或图形。 四、控件
1、常用类型：标准控件、ActiveX控件 、可插入对象 2、控件的命名 3、控件值
控件值是默认属性，程序运行时，可以改变某控件的值，而不必指定该控件的哪个属性。
控 件 文本框 命令按钮 单选按钮 默认属性 Text Default Value 控 件 标签 图形、图像框 复选框 默认属性 Caption Picture Value 例如，下面两条语句是等价的： Text1.Text=\Text1 =\4、控件的画法
画多个相同的控件：Ctrl+单击控件→画多个控件
- 7 -
5、控件的基本操作 1）控件的缩放和移动 2）控件的复制和删除
3）通过属性窗口改变对象的位置和大小 4）选择控件
选定多个控件: Shift(或Ctrl)+单击；拖动鼠标 5）控件布局: 选定多个控件→格式→?? Ⅲ、小结
本次课学生应该熟悉Visual Basic的一些基本的概念如对象及其三要素属性、方法、事件等。掌握窗体的常用属性与事件及控件的类型、命名、基本操作。 Ⅳ、作业
P30一、3、4、7 二、1～6
第7、8课时
实验一：Visual Basic环境和程序设计初步 实验目的：
1、熟悉Visual Basic窗口界面
2、掌握Visual Basic的启动和退出方法
3、掌握建立、编程和运行一个Visual Basic程序的方法和步骤 实验内容及步骤：
1、 熟悉Visual Basic窗口界面
2、 在一个窗体中建立两个按钮和一个标签，程序启动后，只显示两个按钮，“英文”和
“中文”，单击“英文”按钮显示“GOOD BYE”，否则显示“再见”。 要求：对于按钮和标签的属性自行设置。 步骤：
1） 建一个工程
2） 窗体中添加控件：两个按钮和一个标签，并分别设置属性 3） 设置事件代码：
Private Sub Form_Load() '加载窗体时让标签的值为空 Label1.Caption = \End Sub
Private Sub Command1_Click()
Label1.Caption = \ '让标签的值为GOOD BYE End Sub
Private Sub Command2_Click()
Label1.Caption = \再见\让标签的值为再见 End Sub
第9～10课时
课题：简单程序设计（一） 教学目的:
1、掌握VB中的基本语句
2、掌握编写简单的VB应用程序
- 8 -
教学重难点：
1、VB中的赋值语句、注释语句、暂停语句、结束语句 2、开发应用程序的一般步骤 教学方法： 多媒体教学 教学过程：
Ⅰ、复习上节内容 1、窗体的属性与事件 2、常用控件类型 3、控件命名及操作 Ⅱ、新课 一、VB语句
VB中的语句是执行具体操作的指令，每个语句以回车键结束。 1、通常情况下，一行一条语句；
2、允许将多个语句放在同一行中，各语句间用冒号(:)隔开； 3、一个语句行最大长度不得超过1023个字符；
4、使用续行符下划线(_)可将一行语句放在几行中，续行符前至少有一空格。 二、基本语句 1、赋值语句LET
赋值语句的一般格式为：[Let]〈名称〉=〈表达式〉 功能：将表达式的值赋给指定的变量或对象的属性。 说明：1）赋值语句兼有计算与赋值双重功能。 2）在赋值语句中，“=”是赋值号，与数学上的等号意义不一样。 3）名称与表达式的数据类型必须一致。
4）每一个赋值语句可以单独放在一行中，也允许多个语句放在同一行中，用冒号隔开。 5）以关键字Let开头，也称为Let 语句。Let可以省略。
例：交换两个变量中的数据。 设计步骤如下：
1） 建立应用程序用户界面。选择“新建”工程，进入窗体设计器，增加一个命令按钮
Command1、2个标签Label1和Label2。 2）设置对象属性， 3）编写程序代码。
编写命令按钮Command1的Click事件代码： Private Sub Command1_Click() t = Label1.Caption
Label1.Caption = Label2.Caption Label2.Caption = t End Sub
练习：已知长和宽，求矩形的面积。 设计步骤如下：
? 设计程序界面。选择“新建”工程，然后在窗体中增加一个标签Label1，一个命令按钮Command1和一个文本框Text1。 ? 设置对象属性。如下表所示。
- 9 -
属性设置
对象 Label1 Text1 Command1 属性 Caption Text Caption 属性值 已知：长=5，宽=7 则矩形面积=
? 编写事件代码。
命令按钮Command1的Click事件代码为： Private Sub Command1_Click()
Dim a As Single,b As Single,area As Single a=5 b=7 area=a*b
Text1. Text=Str(area)
End Sub
2、注释语句
语法格式为：Rem〈注释内容〉或'〈注释内容〉
说明：1）注释语句是非执行语句，仅对程序的有关内容起注释作用。 2）任何字符都可以放在注释行中作为注释内容。 3）注释语句不能放在续行符的后面。 例如：s = pi * r ^ 2 '计算圆的面积 v = 4 / 3 * pi * r ^ 3 : Rem 计算球的体积 3、暂停语句
其语法格式为：Stop 4、结束程序
其语法格式为：End 5、Unload语句
Unload语句的语法格式为：Unload 对象名 例：使用命令关闭程序窗体：
只需在上例中增加一个命令按钮Command2（关闭），并且编写Command2的Click事件代码：
Private Sub Command2_Click() Unload Me End Sub
三、编写简单的VB应用程序 1、建立用户界面
2、设置窗体和控件的属性 3、编写代码
打开代码窗口的方法： 1）双击已建好的控件 2）视图/代码窗口 3）按F7键
4）单击“工程资源管理器”窗口的“查看代码”按钮。
例：从工具箱往窗体上添加三个标签控件、一个文本框控件、两个命令按钮控件。按图示布
- 10 -