VB教案(详细教案共82课时)

Label2.Caption = Time$ ztime = ztime - 1

Label1.Caption = \离考试结束还有\秒\ If ztime = 0 Then End End Sub 三、框架控件

1、框架控件的属性 1) Caption

该属性用来设置/返回框架控件的标题中的文本,是一个字符串,输入了以“&”开头的字符,则按Alt键加该字符键可以将焦点移到该框架中的控件上 2) BorderStyle

该属性用来设置/返回框架控件的边框样式

0-None 框架控件无边框,此时标题也会消失。 1-Fixed Single框架控件有固定的单线边框。(默认) 2、框架控件的事件

框架控件具有所有的鼠标事件。 3、框架控件的方法

框架控件具有Move和Refresh方法 4.框架控件的应用

1)必须要先画出框架,然后在框架内添加控件

2)框架外画其它的控件 ,需要先选中这些控件,然后执行“剪切”,将光标定位在框架内执行“粘贴” 四、焦点顺序

当对象得到焦点时,会触发GotFocus事件;而当对象失去焦点时,会触发LostFocus事件 。SetFocus方法可以将焦点转移到某个可以接收焦点的对象

焦点只能移动到可视的并且有效的对象上即Enabled和Visible属性都为True 控件属性中与焦点有关的属性 1) TabIndex 2) TabStop Ⅲ、小结

本次课学习了滚动条、时钟、框架控件,要会应用滚动条控件、时钟控件、框架控件的属性、事件、方法。 Ⅳ、作业

P152 一、18 二、8,9,13 三、6

第45、46课时

实验五 常用控件的使用 一、实验目的:

1、通过实验进一步掌握VB6.0的控件使用技术。 2、掌握滚动条、计时器和框架的用法 二、实验内容

1、课本例题、练习上机调试。

2、设计一个计时器,要求一秒一次跳动。 3、利用滚动条来控制一个标签的名称。

- 49 -

第47~50课时

课题:选择控制结构 教学目的:

1、掌握顺序结构的格式与用法 2、掌握选择结构的格式与用法 教学重难点:

1、选择结构的格式与用法

2、选择结构中的if块结构及if嵌套 教学方法: 多媒体教学 教学过程: Ⅰ、引入

VB采用的是结构化程序设计,有三种控制结构:顺序结构 、选择结构、循环结构,本节课讲解顺序结构、选择结构。 Ⅱ、新课 一、顺序结构 1、赋值语句LET

赋值语句的一般格式为: [Let]<名称>=<表达式>

1) “Let”是可选项,完成赋值功能只需“=” 2) “名称”是变量或属性的名称 3) “表达式”可以是算术、字符串、关系或逻辑型表达式,赋值号两边的数据类则必须一致

2、Unload语句

结束应用程序而从内存中卸载窗体 语法格式: Unload 对象名 Unload me 3、End语句

强迫结束一个程序或程序块的执行,可以被放入过程中的任何位置,程序正常结束应该卸载所有的窗体。 二、选择结构

选择结构:当设定条件成立时执行某些语句,条件不成立时则跳过这些语句或执行其它的语句。

选择结构中要使用选择语句,在VB中提供了两种语句:If语句和Select Case语句 1、单行结构条件语句

If 条件 Then 语句部分1 [Else 语句部分2] 简化:If 条件 Then 语句部分

说明:1)条件一般为关系表达式、逻辑表达式,也可以为算术表达式,非0为True,0为False;

2)语句块可以是一句或多句,若多句,语句间需用冒号分隔,而且必须在一行上书写。 3)If...Then 的单行格式不用 End If 语句。 例1:Private Sub Command1_Click() Dim a as integer

a = InputBox(\请输入a=\

If a / 3 = Int(a / 3) Then Print \能被3整除\

- 50 -

联系客服:779662525#qq.com(#替换为@)