高中信息技术第六章第二节程序的建立和运行教案浙教版

1、学习必备欢迎下载课题：程序的建立和运行教学时间 ：授课班级 ：教学目标 ：能够独立的建立一个简单的程序，并会调试它教学重点、难点：对象的属性的设置，原代码的编写教学过程 ：一、一个简单程序建立一个完整的VB应用程序，主要包括以下几个步骤： 建立应用程序界面； 设置对象的属性； 编写事件处理程序； 程序的运行和调试； 保存文件。下面通过一个简单的实例来说明这一实现过程。【例 6-3-1 】我们经常在电影或电视上看到一些字幕的动态变化特技。本例运用 VB的定时器控件定时改变标签控件的 Caption 属性的文字大小，实现文字的动态缩放效果。1 建立应用程序界面VB 中的一个应用程序即为一个工程。因

2、此，要建立新的应用程序，也就须建立一个新工程。单击“文件(F) ”菜单中“新建工程(N) ”命令，弹出一个与图6-8 相似的对话框，提示选择应用程序的类型，一般选择“标准 EXE ”，单击“确定” 按钮后出现窗体设计器窗口。 一个新工程只包含一个窗体， 缺省名为例共使用了两个控件：标签和定时器。标签控件用来在窗体中显示文字，定时器控件用于实现定时缩放。使用工具箱中的 、 在窗体建立好这两个控件，建立好的程序界面如图 6-9 所示。Form1 。对象框排序标签属性列表图 6-92 设置对象的属性图 6-10界面设计好后，必须设置对象的属性。对象的大多数属性可采用缺省值，设置属性的目的是为了使对象

3、更符合应用程序界面的需要。一个窗体对应一个属性窗口，在工程资源管理器窗口中选定窗体Form1 ，单击“视图 (V) ”菜单中的“属性窗口(W) ”命令，就可打开Form1 的属性窗口，如图6-10 所示。在 Form1学习必备欢迎下载窗体上设计的所有控件均存于该窗口的对象框中。设置属性的方法：在对象框中选择对象，在属性列表中选定某属性，在右列中输入或选定新的属性值。有的属性有预定义的设置值清单，单击设置框右边的向下的箭头，可以显示这个清单。完成本程序界面需要设置的属性如表6-3。表 6-3缺省的对象名设置的对象名属性设置值Form1frmZoomCaptionFrmZoomLabel1lblZ

4、oomCaption空白ForeColor红色Timer1tmrClockEnabledFalseInterval1003 编写事件处理程序属性设置好后，程序仍不能正常工作，还要考虑用哪些事件触发对象完成相应的功能，想让对象响应某个事件时， 就把代码写入这个事件的事件过程之中。定时器控件 （ tmrClock ）能有规律地以一定的时间间隔（ Interval ）触发计时器事件 （ Timer ），本例通过对Timer 事件过程进行编码，定时改变标签控件lblZoom的Caption属性的文字大小，来实现文字的动态缩放。一个窗体对应一个代码编辑器窗口，在工程资源管理器窗口中选定窗体frmZoom

5、 ，从“视图 (V) ”菜单选取“代码窗口 (C) ”命令， 就可打开一个如图6-11 所示的代码编辑器窗口。代码窗口的左边 “对象列表框”列出了该窗体的所有对象，右边的“过程列表框”列出了选定对象的所有事件。在对象列表框中选择一个对象，在过程列表框中选择指定对象的事件，代码框中自动给出事件过程的定义语句，此时，在 Sub 和 EndSub 语句之间输入完成功能的代码。'字幕特技对象列表框过程列表框代码框图 6-11Dim s As StringDim size As Integer, deltasz As Integer'程序的初始化过程学习必备欢迎下载'设置有关变量

6、的初始值Private Sub Form_Load()tmrClock.Enabled = TruelblZoom.Visible = Trues = " 欢迎使用Visue Basic"size = 8: deltasz = 5End SubPrivate Sub tmrClock_Timer()size = size + deltaszIf size > 50 Then'当文字大小达到最大值时,deltasz = -5'将文字大小缩放量设为负值,End If'来实现动态缩小If size < 8 Thensize = 8deltasz

7、 = 5End IflblZoom.Left = (frmZoom.Width - lblZoom.Width) / 2lblZoom.Top = (frmZoom.Height - lblZoom.Height) / 2lblZoom.Caption = sEnd Sub从这个简单的程序可以看出： Visual Basic 的事件过程由一系列程序行组成，程序行由语句组成。 通常一个程序行只写一个语句， 但也可以将两个或多个语句写在同一行，此时，语句间用冒号分隔。 在程序中可以添加一些适当的注释，用以说明程序的目的与功能，注释内容应写在注释符（'）后。注释可以和语句在同一行并写在语句的

8、后面，也可单独占据一整行。 采用缩进格式，突出程序的层次结构，避免所有行都从同一列开始，一般情况下，每个层次缩进一个制表位。在输入源程序和调试程序的过程中，常需要对程序作某些修改。Visual Basic 提供了功能较强的“文本编辑”功能。 Visual Basic 的编辑功能与Word 的编辑功能非常相似，这里不再详述。一个大型应用程序可包括多个窗体和模块，分别单击“工程（P）”菜单中的“添加窗体（F）”“添加模块（ M ）”命令，可建立新的窗体和模块。4 运行程序单击“运行 (R) ”菜单中“启动 (S) ”命令， 或直接按F5 键，运行当前程序，VB 标题行上显示 “ Microsoft

9、Visual Basic 运行 ”，表示进入运行模式。程序运行后，启动frmZoom 窗体，自动触发窗体的Load 事件，在 Load 事件的事件过程中，定时器tmrClock 控件的 Enabled 被设置为True，所以，本例的frmZoom 窗体启动后，定时器就已开始工作，定时触发Timer 事件，运行界面如图6-12 所示。若程序运行过程中出错，系统显示出错信息，自动进入“中断”模式，回到代码窗口提示修改代码，图 6-12学习必备欢迎下载修改好后再次运行程序，直到正确为止。实践与探索单击“运行（R）”菜单中“启动（S）”命令或按F5 键运行程序，只能看到程序的运行效果，关闭 VB 系统

10、，程序便无法运行。 VB 还可将应用程序的源代码编译生成 .EXE 可执行文件，关闭系统后，可象任何 Windows 应用程序那样，双击程序图标就可运行。请你把本例程序编译成可执行文件， 说明具体操作步骤？并思考下述问题： 生成的可执行文件是否可在任何环境下运行？为什么？如不行，请尝试找出解决办法。5 保存工程在程序编写过程中或运行结束后，应及时将有关文件保存到磁盘上，此便以后需要时调用。选择“文件(F) ”菜单上“保存工程(V) ”命令，屏幕上依次显示出输入窗体文件、工程文件对话框，在“文件名(N) ”框中输入一个合法的文件名，如可把本例中的窗体文件命名不lt6-3-1.frm ，工程文件命

11、名为lt6-3-1.vbp 。至此，一个完整的VB 程序编制完成，如果需要将过去已存盘的工程重新调入内存，可选择 “文件 (F)”菜单上 “打开工程 (O) ”命令， 屏幕上显示出当前目录下的全部工程清单，选定某个工程后，单击“打开 (O) ”按钮，就可把磁盘上的文件调入内存修改或运行。二、常用控件界面设计是程序设计中的一个很重要的工作，程序是否简便易用，与界面的质量有着很大关系。VB 共提供了 20 个标准控件用于设计界面，每个控件都有一组自己的属性、方法和事件，本节仅介绍使用使用得最多的四个控件。1 基本控件属性每一控件都有自己的属性，改变控件的属性时，控件的行为和外观相应的发生变化。大多

12、数属性可以采用缺省设置，也可以根据程序的需要设置新的属性。不同的控件有许多相同的属性，也有许多不同的属性。下面介绍一些控件的基本属性。(1) Name（名称）属性Name是所创建对象的名称。 VB 在创建控件时自动提供一个缺省名称，如 Form1、Command1等，在属性窗口的“名称”栏设置 Name属性。(2) Height、 Width 、 Top、 Left 属性Height 、 Width 属性决定控件的宽度和高度。Top、 Left 属性决定控件在窗体中的位置。其中Top 表示控件距窗体顶部的距离，Left 表示控件距窗体左边的距离。(3) Enabled 属性Enabled 属性

13、决定控件是否有效，能否对用户的事件作出反应。缺省值为 True，控件有效。当设置为 False 时，控件无效。(4) Visibled 属性学习必备欢迎下载Visibled 属性决定控件是否可见。缺省值为 True，运行时可见。设置为 False 时，运行时隐藏控件，但控件实际存在。(5) Font 属性设置控件所显示文字的字体、字型和字号，单击 Font 属性右侧带有省略号的按钮，可打开一个字体设置对话框。(6) BackColor 、 ForeColor 属性BackColor 属性用来设置控件的背景颜色，ForeColor 属性用来设置控件的前景颜色，即控件中文字的显示颜色。(7) Bo

14、rderStyle 属性该属性用来设置控件的边框风格。2 命令按钮在 VB 程序中，使用户与程序交互的最简便的方法是提供一个按钮，无论何时，只要单击按钮，就会调用Click事件过程，将代码写入Click事件过程，执行想要执行的动作。用VB提供的命令按钮（CommandButton ）控件，来创建自己的“按钮”。(1) 属性除了上述一些控件的共同属性之外，命令按钮还有三个十分重要的属性：Caption属性：用于设置命令按钮上显示的文字，如“确定”“取消”等。Default属性：每个窗体上都可选择一个命令按钮作为缺省的命令按钮，也就是说，不管窗体上的哪个控件有焦点，只要用户按ENTER 键，就相当

15、于用鼠标器单击该按钮。为了指定一个缺省命令按钮，应将其 Default 属性设置为True。Cancel 属性： Cancel 属性用于指定缺省的取消按钮。在把命令按钮的 Cancel 属性设置为 True 后，不管窗体的哪个控件有焦点，按 ESC 键，相当于单击此按钮。(2) 事件对命令按钮来说，最基本、最重要的事件是 Click 事件，即鼠标单击。单击命令按钮时将触发按钮的 Click 事件并调用已写入 Click 事件过程中的代码。3 标签标签控件（ Label ）通常用来在窗体中显示一些提示信息和注释。标签控件只能显示静态文本，其中的文字内容只能用属性值设置和修改，不能直接在窗体上编辑

16、。(1) 属性标签控件的几个重要属性为：学习必备欢迎下载Caption属性：设置标签控件中显示的文本。Alignment属性：对齐属性，缺省值为Left Justify（0）， Caption 中的文本左对齐；设置为Right Justify(1) 时，文本右对齐；设置为Center (2) 时，文本居中。AutoSize 属性：缺省值为 False，当输入到Caption 属性的文本超过控件宽度时，超出部分将被裁剪掉。设置为True时，控件可水平扩充以适应Caption 属性内容。(2) 事件标签控件可以响应Click （单击）、Dbclick （双击） Change（改变）等事件。4 文本

17、框文本框 (TextBox) 的作用是建立一个文本编辑区域，可在该区域输入、编辑、显示一些信息。(1) 属性Text 属性：程序执行时，通过键盘在文本框内输入的信息存放在Text 属性中，初始设置一般为空白，以使文本框不显示任何信息。MaxLength 属性：文本框能够输入的文本内容的最大长度。MultLine 属性：MultiLine属性设置为True，文本框可以输入或显示多行文本，同时具有自动换行功能。ScrollBars属性：为文本框加滚动条，必须在MultLine 属性设置为 True 时，该属性值才有效。0 None：无滚动条1 Horizontal ：加水平滚动条2 Vertica

18、l ：加垂直滚动条3 Both ：同时加水平和垂直滚动条当加入了水平滚动条后，文本框内的自动换行功能自动消失，只有按Enter键才能回车换行。SelStart、 SelLength和 SelText 属性：该属性在设计阶段无效，在程序运行过程中，对文本内容进行选择操作时，用来标识选中的哪部分文本。SelStart：选定的文本的开始位置，第一个字符的位置为0。SelLength：选定的文本长度。SelText ：选定的文本内容。设置了 SelStart、SelLength 属性后， VB 会自动将它们设定的文本送入SelText。这些属性一般用于设置插入点的范围，选择和清除字符串等，并且经常与剪

19、贴板一起使用，完成文本信息的剪切、复制及粘贴功能。(2) 方法文本框最常用的方法是SetFocus，它的作用是把光标移到指定的文本框，以便接收输入数据，此时，我们就称该文本框具有焦点，SetFocus 的格式如下： 对象 .SetFocus(3) 事件Change：在文本框的Text 属性即文本的内容发生变化时，触发本事件。LostFocus：当文本框失去焦点时，触发本事件。LostFocus 事件过程主要是用来对更新进行验证和确学习必备欢迎下载认。KeyPress：当按下并且释放键盘上的某一个键时，触发焦点所在控件的KeyPress 事件，常用于测试击键的有效性或在字符输入时对其进行格式处理。5 定时器定时器控件 (Timer) 用于有规律地以一定的时间间隔触发定时器事件。在程序运行期间，定时器控件并不显示在屏幕上。Enabled 和 Interval 是定时器控件的两个最基本属性。当 Enable 设置为 True 时，定时器开始工作，为 False 时，定时器停止工作。 Interval 表示两个定时器事件之间的时间间隔， 单位为 ms，取值范围为 065535。定时器只有一个 Timer 事件， 定时器每隔 Interval 指定的时间间隔发生一个定时器事件，并执行其中的代码。实践与探索程序设计学习的一个很重要的方法