计算机二级VisualBasic6.0考试专用

上传人:cn****1 文档编号:569361561 上传时间:2024-07-29 格式:PPT 页数:152 大小:2.11MB
返回 下载 相关 举报
计算机二级VisualBasic6.0考试专用_第1页
第1页 / 共152页
计算机二级VisualBasic6.0考试专用_第2页
第2页 / 共152页
计算机二级VisualBasic6.0考试专用_第3页
第3页 / 共152页
计算机二级VisualBasic6.0考试专用_第4页
第4页 / 共152页
计算机二级VisualBasic6.0考试专用_第5页
第5页 / 共152页
点击查看更多>>
资源描述

《计算机二级VisualBasic6.0考试专用》由会员分享,可在线阅读,更多相关《计算机二级VisualBasic6.0考试专用(152页珍藏版)》请在金锄头文库上搜索。

1、VB自学考试课程自学考试课程第一讲:第一讲:VBVB程序设计初步程序设计初步一、引例一、引例二、二、VBVB集成开发环境集成开发环境三、几个重要概念三、几个重要概念四、建立简单的程序四、建立简单的程序一、一、 例例1引入:引入:引入:引入:(1 1)VBVB的启动;的启动;(2 2)VBVB的工作环境;的工作环境;(3 3)几个重要概念。)几个重要概念。二、二、 VB集成开发环境集成开发环境主窗口工具箱窗口工程资源管理器窗口属性窗口窗体设计窗口代码窗口三、几个概念三、几个概念1. 1. 对象对象 对象:客观存在的一个实体。对象:客观存在的一个实体。 VB中常用的对象有:窗体、控件等。中常用的对

2、象有:窗体、控件等。 2. 2. 类类 类是创建类是创建对象对象的模板的模板, 是对象的集合。是对象的集合。3. 3. 对象的三要素对象的三要素 (1 1)属性)属性 用来描述和反映对象特征的参数。(属性有属性名和属性值),属性值可通过:用来描述和反映对象特征的参数。(属性有属性名和属性值),属性值可通过:属性窗口设置属性窗口设置代码设置代码设置 对象名对象名.属性名属性名=属性值属性值 如:如:Label1.Visible=True (2 2)事件)事件 对象所能识别和响应的动作称为事件,它发生在用户与应用程序交互时。如单对象所能识别和响应的动作称为事件,它发生在用户与应用程序交互时。如单击

3、控件、鼠标移动、键盘按下等。击控件、鼠标移动、键盘按下等。 事件过程:事件触发时所执行的代码事件过程:事件触发时所执行的代码 (3 3)方法方法 对象所能执行的动作,如窗体有对象所能执行的动作,如窗体有Show、Hide方法等。方法等。 4. VB4. VB程序的执行步骤如下:程序的执行步骤如下:(1)启动应用程序,装载和显示窗体;)启动应用程序,装载和显示窗体;(2)等待事件的触发;)等待事件的触发;(3)事件触发时,执行对应的事件过程;)事件触发时,执行对应的事件过程;(4)重复执行步骤()重复执行步骤(2)和()和(3) ;(5) 直到遇到直到遇到END结束语句结束程序的运行;结束语句结

4、束程序的运行; 或按或按“结束结束”强行停止程序的运行。强行停止程序的运行。至此可以总结出至此可以总结出VB的特点:可视化、面向对象、事件驱动。的特点:可视化、面向对象、事件驱动。例例1拓展拓展1例例1拓展拓展2四、建立简单的应用程序四、建立简单的应用程序例例2 21.1.效果:效果:3.3.分析:分析:(1 1)布局:)布局:一个标签控件、两个命令按钮、一个时钟控件。一个标签控件、两个命令按钮、一个时钟控件。(2 2)控制逻辑:)控制逻辑:单击单击“开始开始”按钮,标签移动;单击按钮,标签移动;单击“停止停止”按钮,标签静止;按钮,标签静止; 2.引入:引入:建立建立VB程序的步骤。程序的步

5、骤。1.界面设计:界面设计:添加对象添加对象设置属性设置属性2.代码设计:代码设计:哪个对象哪个对象哪个事件哪个事件什么代码什么代码3. 运行和调试;运行和调试;4. 保存文件;保存文件;5. 编译成编译成.exe文件。文件。例例2拓展拓展1 例例2拓展拓展2 例例2拓展拓展3创建创建vb 程序的步骤:程序的步骤:一、掌握几个操作:一、掌握几个操作: VB工作环境的设置、添加控件、设置属性、添加代工作环境的设置、添加控件、设置属性、添加代 码、码、 运行、调试程序、保存文件;运行、调试程序、保存文件;二、理解几个概念:二、理解几个概念: 对象、属性、事件、方法对象、属性、事件、方法 可视化、面

6、向对象、事件驱动可视化、面向对象、事件驱动三、识别几个保留字三、识别几个保留字: Form1 Label1 Command1 Form1 Label1 Command1 Caption Visible Left Top FontSize Caption Visible Left Top FontSize Click 回顾回顾第二讲:第二讲: 窗体和基本控件窗体和基本控件一、窗体一、窗体窗体是其它对象的容器,是程序运行时呈现给用户的界面。窗体是其它对象的容器,是程序运行时呈现给用户的界面。例例31.效果:效果:2.引入:引入:窗体的属性、事件、方法窗体的属性、事件、方法3.分析:分析: 界面分析

7、界面分析:略略 代码分析代码分析:略略4.设计设计思考题思考题11、窗体的基本属性:、窗体的基本属性:属性属性默认值默认值含义含义(名称)(名称)NameFormN名称,是区分对象的标志,用以引用对象名称,是区分对象的标志,用以引用对象BackColor背景颜色背景颜色BorderStyle2边框式样边框式样CaptionFormN标题标题ControlBoxTrue是否有控制图标是否有控制图标Font字体:字体、字型、字号字体:字体、字型、字号Height高度高度Icon控制图标控制图标MaxButtonTrue是否有最大化按钮是否有最大化按钮MinButtonTrue是否有最小化按钮是否有

8、最小化按钮Picture图片图片StartUpPosition3开始位置开始位置Width宽度宽度WindowState0状态状态2.事件事件 Click、DblClick、Load Load 当装入窗体时激发,通常用于对属性和变量初始化 注意:在注意:在load事件中使用事件中使用Print方法,要修改其方法,要修改其AutoRedraw属性属性 从启动窗体到显示窗体其实有三个事件发生:从启动窗体到显示窗体其实有三个事件发生: Initialize Load Activate演示演示3.方法方法 Show、Hide、Print、Cls等 注意注意:卸载卸载(Unload)和隐藏和隐藏(Hid

9、e)的区别的区别 二、标签二、标签标签主要用来在窗体某个固定位置上显示提示信息。标签主要用来在窗体某个固定位置上显示提示信息。例例4 1.效果:效果: 2.引入:标签引入:标签的属性、事件、方法、用途的属性、事件、方法、用途3.分析:分析:(1)界面:略)界面:略(2)代码:)代码:略略4.设计:设计:例例4思考题思考题 例例4拓展题拓展题1 1、标签的主要、标签的主要属性属性属性属性默认值默认值含义含义Alignment0文本对齐方式文本对齐方式AutosizeFalse是否自动改变大小是否自动改变大小Backstyle0是否透明是否透明BorderStyle0边框样式边框样式Caption

10、LabelN标题标题Font字体:字体、字型、字号字体:字体、字型、字号ForeColor前景颜色前景颜色Height高度高度Left左位置左位置Top顶端位置顶端位置VisibleTrue是否可见是否可见Width宽度宽度2.2.事件事件 3.3.方法方法 回顾回顾主要介绍主要介绍窗体窗体、标签标签两个对象。两个对象。重点把握对象的应用、属性、事件和方法重点把握对象的应用、属性、事件和方法1、窗体:、窗体: Caption Font(FontName、FontSize FontBold、FontItalic) ForeColor AutoRedraw Picture Load Click D

11、bclick Print Cls Show Hide Unload2、标签:标签: Alignment AutoSize Caption BorderStyle Font ForeColor Left Top Visible三、文本框三、文本框文本框主要用来接收数据、编辑数据、显示数据。文本框主要用来接收数据、编辑数据、显示数据。例例51.效果:效果:2.引入:引入:文本框的属性、事件和方法、用途文本框的属性、事件和方法、用途3.分析:分析:(1)界面:略)界面:略(2)代码:略)代码:略4.设计:设计:例例5拓展题拓展题 思考题思考题第三讲:窗体和基本控件第三讲:窗体和基本控件例例61.效果

12、:效果:2.引入:引入:文本框的属性和事件文本框的属性和事件3.分析:分析:(1)界面:略)界面:略(2)代码:略)代码:略4.设计:设计:1 1、文本框的主要属性、文本框的主要属性属性属性默认值默认值含义含义Alignment0文本对齐方式文本对齐方式BorderStyle0边框样式边框样式Font字体:字体、字型、字号字体:字体、字型、字号ForeColor前景颜色前景颜色LockedFalse是否可编辑是否可编辑MultilineFalse是否可接受多行文本是否可接受多行文本MaxLength最大字符数最大字符数Height高度高度PasswordChar掩码掩码ScrollBars0是

13、否有滚动条(是否有滚动条(Multiline为为T)TextTextN显示的内容显示的内容Width宽度宽度VisibleTrue是否可见是否可见2.2.常用事件常用事件 Change:当改变文本框的Text属性时会引发该事件。 KeyPress(KeyAscii As Integer):按下并松开键时触发。可返回一个KeyAscii参数:即所按的键的Ascii值。 KeyAscii 为为13,回车键,回车键;为为0 禁止键入。禁止键入。 LostFocus:当控件失去焦点时发生。 GotFocus: 当控件获得焦点时发生。3.3.常用方法常用方法 对象.SetFocus:获得焦点,即插入点光

14、标移到该文本框中。2四、命令按钮四、命令按钮例例7命令按钮:命令按钮:通常用来在它的单击事件中完成一种特定的通常用来在它的单击事件中完成一种特定的程序功能程序功能 。1.效果:效果:2.引入:引入:命令按钮的属性、事件、用途命令按钮的属性、事件、用途3.分析:略分析:略4.设计:略设计:略思考题思考题思考题思考题1 1、命令按钮的主要属性、命令按钮的主要属性属性属性默认值默认值含义含义CaptionCommandN标题标题EnabledTrue是否有效是否有效Font字体:字体、字型、字号字体:字体、字型、字号Height高度高度Style0外观外观Picture显示图形(显示图形(Style

15、为为1)Width宽度宽度VisibleTrue是否可见是否可见2、事件:、事件:Click 3、方法:略、方法:略 五、工程的管理及环境的设置五、工程的管理及环境的设置1 1、工程的组成、工程的组成 工程文件包含了一个应用程序的所有文件的信息工程文件包含了一个应用程序的所有文件的信息:窗体文件窗体文件(.frm):控件及属性、事件过程和自定义过:控件及属性、事件过程和自定义过程程;窗体的二进制数据文件窗体的二进制数据文件(.frx),自动产生同名,自动产生同名.frx文件文件;标准模块文件标准模块文件(.bas);类模块的文件类模块的文件(.cls);资源文件资源文件(.res);Activ

16、eX控件的文件控件的文件(.ocx).2 2、创建、打开和保存工程、创建、打开和保存工程3 3、添加、删除和保存文件、添加、删除和保存文件(1) 窗体名和窗体文件名概念窗体名和窗体文件名概念 窗体名:窗体的窗体名:窗体的Name属性,属性,在代在代码中用来引用中用来引用该窗体,同一窗体,同一工程不能有相同的窗体名;工程不能有相同的窗体名; 窗体文件名:窗体存放在磁窗体文件名:窗体存放在磁盘上的文件名,上的文件名,该文件包含了文件包含了该窗体的窗体的所有控件属性和代所有控件属性和代码,同一文件,同一文件夹不能有相同的文件名。不能有相同的文件名。(2) 在工程中添加在工程中添加现存的窗体存的窗体时

17、,只是,只是对该窗体文件的引用窗体文件的引用纳入工程。入工程。因此,如果更改窗体并保存它,会影响包含此窗体文件的任何工程。因此,如果更改窗体并保存它,会影响包含此窗体文件的任何工程。(3) 在工程中在工程中删除窗体除窗体时,仅将此窗体从工程里将此窗体从工程里删除掉,但是窗体文除掉,但是窗体文件仍存在于磁件仍存在于磁盘上。但是,如果在上。但是,如果在VB之外之外删除一个窗体文件,除一个窗体文件,VB不能不能更新此工程文件,当打开此工程更新此工程文件,当打开此工程时,将,将显示一个文件示一个文件丢失的失的错误信息。信息。(4) 对窗体文件改名方法对窗体文件改名方法 “另存另存为Form”实现文件的

18、复制。文件的复制。 窗体文件名窗体名六、生成可执行文件和制作安装盘六、生成可执行文件和制作安装盘1. 1. 生成可执行文件生成可执行文件 文件文件/生成生成*.exe文件,然后文件,然后关闭关闭Visual Basic6.0。2. 2. 制作安装盘制作安装盘在向导的指导下运行在向导的指导下运行V B6.0中文版工具中文版工具“Package & Deployment”;“打包打包”:把工程中用到的各种类型的文件进行打包压缩后,存:把工程中用到的各种类型的文件进行打包压缩后,存放到特定的目录下。放到特定的目录下。“展开展开”:再把这些打包的文件展开到用户可以携带的安装介质:再把这些打包的文件展开

19、到用户可以携带的安装介质软盘、光盘等。软盘、光盘等。3. 3. 检测安装程序检测安装程序 在没有在没有VB 6.0系统的环境下,执行安装盘中的系统的环境下,执行安装盘中的Setup.exe文件,将发文件,将发行盘进行安装。行盘进行安装。七、程七、程 序序 调调 试试1 1、错误类型、错误类型 (1 1)编辑错误)编辑错误在在编编辑辑代代码码时时,VB会会对对键键入入的的代代码码直直接接进进行行语语法法检检查查。当当发发现现代代码码存存在在打打字字错错误误,遗遗漏漏关关键键字字或或标标点点符符等等语语法法错错误误,VB 在在Form窗窗口口中中弹弹出出一一个个子子窗窗口口,提提示示出出错错信信息

20、息,出出错错的的那那一一行行变变成成红红色色。这这时时,用用户户必必须须单单击击“确确定定”按按钮钮,关关闭闭出出错错提提示窗,然后对出错行进行修改。示窗,然后对出错行进行修改。(2 2)编译错误)编译错误 编编译译错错误误指指按按了了“启启动动”按按钮钮,VB开开始始运运行行程程序序前前,先先编编译译执执行行的的程程序序段段时时,产产生生的的错错误误。此此类类错错误误由由于于用用户户未未定定义义变变量量、遗遗漏漏关关键键字字等等原原因因产产生生。这这时时,Visual Basic也也弹弹出出一一个个子子窗窗口口,提提示示出出错错信信息息,出出错错的的那那一一行行被高亮度显示。被高亮度显示。(

21、3 3) 运行错误运行错误运行时错误指运行时错误指VB在编译通过后,运行代码时发生的错误。在编译通过后,运行代码时发生的错误。这类错误往往是指令代码执行了一非法操作引起的。例这类错误往往是指令代码执行了一非法操作引起的。例如类型不匹配、试图打开一个不存在的文件等。如类型不匹配、试图打开一个不存在的文件等。(4 4) 逻辑错误逻辑错误程程序序运运行行后后,得得不不到到所所期期望望的的结结果果,这这说说明明程程序序存存在在逻逻辑辑错错误误。这这类类错错误误往往往往是是程程序序存存在在逻逻辑辑上上的的缺缺陷陷所所引引起起。例例如如,运运算算符符使使用用不不正正确确、语语句句的的次次序序不不对对、循循

22、环环语语句句的的起起始始、终终值值不不正正确确等等。通通常常,逻逻辑辑错错误误不不会会产产生生错错误误提提示示信信息息,故故错错误误较较难难排排除除,需需要要程程序序员员仔仔细细地地阅阅读读分分析程序以及调试。析程序以及调试。2 2、调试错误、调试错误 (1)VB(1)VB的三种模式的三种模式 设计模式设计模式设计设计 进行程序的界面设计、属性设置、代码编写等。进行程序的界面设计、属性设置、代码编写等。 运行模式运行模式运行运行 执行执行“运行运行/启动启动”命令,可以查看程序代码,但不能修改。命令,可以查看程序代码,但不能修改。 中断模式中断模式中断中断 当在运行模式,按了当在运行模式,按了

23、“中断中断”命令或当程序出现运行时错误命令或当程序出现运行时错误时进入中断模式。可以查看代码、修改代码、检查数据。时进入中断模式。可以查看代码、修改代码、检查数据。 (2)(2)调试窗口调试窗口 有三个调试窗口,它们是:有三个调试窗口,它们是:“立即立即”窗口、窗口、“监视监视”窗口、和窗口、和“本地本地”窗口。可单击视图菜单中的对应命令打开这些窗口。窗口。可单击视图菜单中的对应命令打开这些窗口。(3 3)设置断点和逐语句跟踪)设置断点和逐语句跟踪 断断点点是是告告诉诉VB挂挂起起程程序序执执行行的的一一个个标标记记,当当程程序序执执行行到到断断点点处处即即暂暂停停程程序序的的运运行行,进进入

24、入中中断断模模式式。设设置置或或删除断点的步骤:删除断点的步骤: 中中断断模模式式下下,直直接接查查看看某某个个变变量量的的值值,只只要要把把鼠鼠标标指指向向所所关关心心的的变变量量处处,稍稍停停一一下下,就就在在鼠鼠标标下下方方显显示示该该变变量的值。量的值。断点标记当前行八、常八、常 见见 错错 误误1. 使用中文标点符号使用中文标点符号 系统产生系统产生“无效字符无效字符”,以红色显示。,以红色显示。2. 字母和数字形状相似字母和数字形状相似 小写字母小写字母“l”和数字和数字“1”形式相同、小写字母形式相同、小写字母“o”与数字与数字“0”。3. 对象名称对象名称(Name)写错写错4

25、. 对象的属性名、方法名、标准函数名写错对象的属性名、方法名、标准函数名写错 尽量使用自动列出成员功能。正确的系统按规定的大小写表示。尽量使用自动列出成员功能。正确的系统按规定的大小写表示。5. 无意形成控件数组无意形成控件数组 建立控件时小心使用建立控件时小心使用“复制复制”、“粘贴粘贴”按钮。按钮。6. 打开工程时找不到对应的文件打开工程时找不到对应的文件 保存文件时先保存窗体保存文件时先保存窗体.frm文件、再保存文件、再保存.vbp文件,注意路径。文件,注意路径。总结:总结:(1)通过示例介绍)通过示例介绍VB的工作环境(的工作环境(IDE););(2)理解对象、类、属性、事件、方法、

26、面向对象、)理解对象、类、属性、事件、方法、面向对象、事件驱动概念。事件驱动概念。(3)介绍窗体和标签、文本框、命令按钮的属性、事)介绍窗体和标签、文本框、命令按钮的属性、事件、方法。件、方法。(4)掌握简单)掌握简单VB程序的设计、文件的保存、打开。程序的设计、文件的保存、打开。练习一、填空题一、填空题(1)VB是一种面向()的可视化程序设计语言,采取了()的编程机制。是一种面向()的可视化程序设计语言,采取了()的编程机制。(2)VB的对象主要有()、()两大类。的对象主要有()、()两大类。(3)在)在VB中,用来描述一个对象外部特征的量称为对象的()。中,用来描述一个对象外部特征的量称

27、为对象的()。(4)在)在VB中,设置或修改一个对象的属性的方法有两种,它们是()、()。中,设置或修改一个对象的属性的方法有两种,它们是()、()。(5)在)在VB中每个对象响应事件的响应方式是通过执行一个与之对应的()来实现的。中每个对象响应事件的响应方式是通过执行一个与之对应的()来实现的。(6)在)在VB中事件过程的名字由()、()所构成。中事件过程的名字由()、()所构成。(7)若将窗体)若将窗体Form1隐藏起来,可调用其方法()来实现,隐藏起来,可调用其方法()来实现,(8)若用户单击了窗体)若用户单击了窗体Form1,此时被执行的事件过程的名字应为(),此时被执行的事件过程的名

28、字应为()(9)在)在VB集成开发环境中,运行应用程序的方法有两种,分别是()、()集成开发环境中,运行应用程序的方法有两种,分别是()、()二、选择题二、选择题(1)下列()项不能作为安装)下列()项不能作为安装VB6.0所需的操作平台。所需的操作平台。A.DOS7.0 B.Windows95 C.Windows98 D.WindowsNT(2)用代码改变)用代码改变Form1的的“Caption”属性设置为属性设置为“时钟时钟”,正确的书写形式是(),正确的书写形式是()A.Form1.Caption“时钟时钟” B.Form1.Caption=“时钟时钟”C.Caption=“时钟时钟”

29、 D.Form1.Caption(“时钟时钟”)(3)VB的标准控件位于的标准控件位于IDE中的()项窗口内。中的()项窗口内。A.工具栏工具栏 B.工具箱工具箱 C.对象浏览器对象浏览器 D.窗体设计器窗体设计器(4)保存文件时,窗体文件的扩展名是(),整个工程文件的扩展名是()保存文件时,窗体文件的扩展名是(),整个工程文件的扩展名是()A.*.PRG B.*.Frm C.*.VBP D.*.EXE(5)以下叙述中正确的是()以下叙述中正确的是()A.窗体的窗体的Name属性指定窗体的名称,用来标识一个窗体。属性指定窗体的名称,用来标识一个窗体。B.窗体的窗体的Name属性值是显示在标题栏

30、中的文本。属性值是显示在标题栏中的文本。C.可以在运行期间改变对象的可以在运行期间改变对象的Name属性的值。属性的值。D.对象的对象的Name属性值可以为空。属性值可以为空。三、应用题三、应用题设计如图所示界面,单击设计如图所示界面,单击“确定确定”按钮,显示第二个标签,其按钮,显示第二个标签,其标题是文本框中的姓名和标题是文本框中的姓名和“编写的程序编写的程序”。第四讲第四讲 VB语言基础语言基础一、数据一、数据二、运算符和表达式二、运算符和表达式三、常用函数三、常用函数四、编码规则四、编码规则 一、一、数数 据据能被计算机接收和处理的符号的集合。能被计算机接收和处理的符号的集合。是程序的

31、重要组成部分,是程序的重要组成部分,也是程序处理的对象和处理的结果。也是程序处理的对象和处理的结果。 1、常见数据类型常见数据类型数据类型数据类型关键字关键字类型符类型符举例举例整型整型Integer %123,-123,123%长整型长整型Long&123&,-1234567&单精度单精度Single!1230.0!, 1.23E3双精度双精度Double#1230.0#, 1.230D3字符型字符型String$ VB , 程序设计程序设计 , 12逻辑型逻辑型Boolean无无True, False日期型日期型Date无无#03/02/2010#, #10:30#变体型变体型Varian

32、t无无2、变量与常量变量与常量s = 3.14 * r 2变量变量:在程序运行中用来存储数据,且其值可以改变:在程序运行中用来存储数据,且其值可以改变的量,其实质是在内存中开辟的临时存储单元。的量,其实质是在内存中开辟的临时存储单元。常量:在程序运行中其值不改变的量。常量:在程序运行中其值不改变的量。 a. 以字母或汉字开头,其后可跟汉字、字母、数字或下划以字母或汉字开头,其后可跟汉字、字母、数字或下划 线,长度不超过线,长度不超过255个字符;个字符; b. 不要使用不要使用VB中的关键字;中的关键字; c. 变量名中的字母不区分大小写;变量名中的字母不区分大小写;(1)变量名的命名规则)变

33、量名的命名规则(2)变量声明变量声明:变量的名称、类型:变量的名称、类型a a、用用Dim Dim 显式声明变量显式声明变量 形式:形式:Dim 变量名变量名 AS 类型类型 Dim 变量名变量名类型符类型符 例例 Dim i As integer , s As single 等价于等价于 Dim i%, s!注意:变量类型的确定,需一一说明注意:变量类型的确定,需一一说明变量的赋值变量的赋值 变量名变量名= =表达式表达式将值赋给已定义类型的变量时,系统会将数值转化成变量的类型将值赋给已定义类型的变量时,系统会将数值转化成变量的类型未经定义类型的变量的数据类型是由赋给它的值的类型决定未经定义

34、类型的变量的数据类型是由赋给它的值的类型决定b b、隐式声明隐式声明 未进行上述的声明而直接使用,其类型为 Variant 类型。 建议不使用。注意注意: 在通用声明处加在通用声明处加 Option Explicit 语句可强制显式声明语句可强制显式声明 变量。变量。(3)常量 a a、直接常量直接常量 100100,100%100%, TrueTrue, #3:45#3:45# , vbvb程序设计程序设计 vb vb 程序设计程序设计 &o23,&H3D &o23,&H3D b b、用户声明常量用户声明常量 形式: Const 常量名 AS 类型 = 表达式 省略 AS 类型 ,常量的类型

35、由表达式值的类型决定。 为使与变量名区分,一般常量名使用大写字母。 例 Const MAX=100 c c、系统提供的常量系统提供的常量 系统定义常量位于对象库中,可通过“对象浏览器”查看。 例: VbRed、VbCrLf等练习1、说明下列哪些量是、说明下列哪些量是VB合法的直接常量,分别属于什么类型。合法的直接常量,分别属于什么类型。(1)100.0 (2)%100 (3)1E1 (4)123D3 (5)123,46(6)ASDF (7)1234 (8)#2000/10/7#(9)100# (10)&O100 (11)True (12) T(13)-123! (14) VB $ (15) 姓

36、名姓名 (16) 姓名姓名 2、下列符号中,哪些是、下列符号中,哪些是VB合法的变量名合法的变量名(1)A123 (2)A12_3 (3)123A (4)A 123(5)Integer (6)XYZ (7)False (8)SIN(X)(9)SINX (10)变量名变量名 (11)abcd 3二二 、 运算符和表达式运算符和表达式1、算术运算符及算术表达式运算符运算符含义含义优先级优先级实例实例结果结果乘方乘方1224-取负取负2-5-5*乘乘32*510/自然除自然除39/33整除整除41033Mod取模取模510 Mod 31+加加6-5+1+51-减减65-502、 字符串运算符及字符串

37、表达式字符串运算符及字符串表达式 、+ 字符串连接 123 + 456 结果 123456 123 & 456 结果 123456 要注意两者的区别 abcdef & 12345 结果为 abcdef12345 abcdef + 12345 出错“+”不仅是字符串运算符,还是算术运算符不仅是字符串运算符,还是算术运算符 123 & 456 结果为 123456 123 + 456 结果为 579 123 + True 结果为 122 True转换为数值-1,False转换为数值0 3、关系运算符及关系表达式、关系运算符及关系表达式 将两个操作数进行大小比较,结果为逻辑量。 西文字符串比较,实际

38、是按字符的ASCII码值从左到右一一比较,先大为大。 例: ABCDE ABRA 结果为 False 4、 逻辑运算符及逻辑表达式逻辑运算符及逻辑表达式 将操作数进行逻辑运算,结果是逻辑值:将操作数进行逻辑运算,结果是逻辑值: 表达式书写举例(1+xy)6(1+x*y)6单位招聘员工:单位招聘员工:年龄年龄小于小于40岁岁,法律法律专业专业,学历学历专科或本科专科或本科 年龄年龄=0 and x=100 正确的正确的VB表达式:表达式: 3=x And x =7 错误的错误的VB表达式:表达式: 3=x=7 或或 3=x Or x 3 ?123 3 ?1234512345 & ABC x 为偶

39、数:为偶数: VB函数是:能完成一定运算并将结果(函数是:能完成一定运算并将结果(有且只有且只有一个有一个)返回的程序,有)返回的程序,有标准函数标准函数和和用户自定义用户自定义函数函数两种。两种。函数的构成:函数的构成:函数名函数名(参数表参数表)如:如:Abs(-3) Time( )注意:函数不是语句,大部分函数调用的时候必注意:函数不是语句,大部分函数调用的时候必须作为语句的组成部分,而不能直接出现。须作为语句的组成部分,而不能直接出现。如:如: a=Abs(-3) ?Abs(-3) Abs(-3) 第五讲第五讲 VBVB语言基础语言基础三、常用内部函数三、常用内部函数1、数学函数数学函

40、数函数名函数名举例举例结果结果Abs(N)Abs(-4)4Int(N)Int(3.56)Int(-3.56)3-4Fix(N)Fix(3.56)Fix(-3.56)3-3Round(N1,N2)Round(3.56)Round(-3.56)Round(3.56,1)4-43.6Sqr(N)Sqr(9)3Exp(N)Exp(1)2.71828Log(N)Log(2.71)1Sgn(N)Sgn(-3)-1Sin(N)Sin(90*3.14/180)1Rnd(N)Rnd( )0,1)注意注意:(1)Int(),Fix(),Round()的区别的区别(2)Sin(N)、Cos(N)、Tan(N)、At

41、n(N) 三角函数中三角函数中参数参数N为弧度表示为弧度表示(3)Rnd()产生的是产生的是0到到1(包括包括0,但不包括但不包括1)之间的之间的随机小数随机小数. 若要每次运行程序产生的随机数序列不同,应在调用若要每次运行程序产生的随机数序列不同,应在调用Rnd函数的语句前,执行函数的语句前,执行Randomize语句语句若要产生若要产生A,B之间的随机数可用之间的随机数可用Int(Rnd()*(B-A+1)+A如如: Int(Rnd()*31)+20 产生的是产生的是 20,50举例2、字符串函数、字符串函数函数名函数名举例举例结果结果Left(C,N)Left(ABCD,2)“AB”Ri

42、ght(C,N)Right(ABCD”,2)“CD”Mid(C,N1,N2)Mid(“ABCD,2,2)Mid(ABCD,2)“BC”“BCD”Len(C )Len(ABCD)Len(学习学习VB)44Ltrim(C )Len(Ltrim( VB)2Rtrim(C)Len(Rtrim(VB )2Trim(C)Len(TRIM( VB )2Space(N)Len(Space(3)3String(N,C)String(2, VB)“VV”4注意注意:(1)Len(),返回的是字符串的字数返回的是字符串的字数,Lenb()返回的是字符串的返回的是字符串的字节数字节数(2)Mid(C,N1,N2)省略

43、省略N2表示从第表示从第N1位开始取位开始取,取到最后取到最后3、日期和时间函数、日期和时间函数函数名函数名举例举例结果结果Date()Date()2010-03-31Time()Time()02:30:15Now()Now()2010-03-31 02:30:15Year(D)Year(Date()20104、转换函数、转换函数函数名函数名举例举例结果结果Val(C)Val(23)+2Val(23A2)+223A2+2Val(A23)+2A23+2Val(2e1) + 22525出错出错2出错出错22Str(N)Str(123)+123Str(123)+123Str(123) & 123“1

44、23123”246“123123”Asc(C)Asc(A)65Chr(N)Chr(65)AUcase(C)Ucase(Abcd)“ABCD”Lcase(C)Lcase(Abcd)“abcd”举例注意:注意:(1)Val( )只能将数字字符转换成数值只能将数字字符转换成数值,遇到非数字字符停止遇到非数字字符停止转换转换(2)Str( )转换成字符时转换成字符时,最前面留有一位符号位最前面留有一位符号位5、测试函数、测试函数函数名函数名举例举例结果结果TypeName(X)TypeName(10)TypeName(10.0)IntegerDoubleIsNumeric(X)IsNumeric(23

45、 )TrueIsDate(X)IsDate(02/02/2004 )True6、格式输出函数、格式输出函数函数名举例结果FormatPrint Format(12345.9, 0000.0 )Print Format(123.78, 0000.0 )Print Format(123.9, 0000.00 )12345.90123.80123.90Print Format(123.9, #.# )Print Format(123.78, #.# ) 123.9123.8Print Format(Date, yy-mm-dd ) 04-03-02Print Format( ABCD , )abcd

46、7、Shell函数函数Shell(Calc.exe )调用计算器Shell(Notepad.exe )调用记事本例题四、四、 编码规则编码规则1.语句的一般形式:语句的一般形式: 语句体语句体 Dim a As Integer a=3 Print a2. VB代码不区分字母的大小写代码不区分字母的大小写 系统保留字自动转换每个单词的首字母为大写;系统保留字自动转换每个单词的首字母为大写; 用户自定义以第一次为准。用户自定义以第一次为准。3. 语句书写自由语句书写自由 一行可书写几句语句一行可书写几句语句,之间用之间用冒号冒号分隔;分隔;如:如:A=1:B=2:C=3一条语句可分若干行书写,用续

47、行符一条语句可分若干行书写,用续行符(空格(空格 _)连接,一行连接,一行=0 AND A+CB+3 Or Not D的值是的值是( )(3)Int(-3.5),Int(3.5),Fix(-3.5),Fix(3.5),Round(-3.5),Round(3.5)的值分的值分别是别是:(4)表达式表达式Ucase(Mid( ABcdefgh ,3,4)的值是的值是( )(5)在在VB中字符常量应使用中字符常量应使用( )将其括起来将其括起来,日期日期/时间型常量应使用时间型常量应使用( )符号将其括起来符号将其括起来(6)VB6.0中中,字符是采用字符是采用( )编码形式来表达和存储的编码形式来

48、表达和存储的,在该编码方案下在该编码方案下,一个汉字或一个英文字符均被看做一个汉字或一个英文字符均被看做( )个字符个字符,每个字符用每个字符用()个字节个字节编码编码(7)函数函数Int(10*Rnd)的结果是在的结果是在( )范围内的整数范围内的整数第六讲第六讲 基本控制结构基本控制结构 语言元素组成语句,语句组成程序,语句需要按语言元素组成语句,语句组成程序,语句需要按一定的顺序执行才能实现既定功能,而语句的执行顺一定的顺序执行才能实现既定功能,而语句的执行顺序由控制结构控制,任何问题的解决只需三种结构:序由控制结构控制,任何问题的解决只需三种结构: 顺序结构顺序结构分支结构(选择结构)

49、分支结构(选择结构)循环结构(重复结构)循环结构(重复结构)理解控制结构是如何控制程序的执行顺序理解控制结构是如何控制程序的执行顺序的,从而掌握如何根据功能需要用控制结的,从而掌握如何根据功能需要用控制结构来组织所需要的语句。构来组织所需要的语句。一、顺一、顺 序序 结结 构构顺序结构即按语句的先后,顺序执行程序。顺序结构即按语句的先后,顺序执行程序。顺序结构没控制语句,主要涉及顺序结构没控制语句,主要涉及赋值语句、赋值语句、Print方法、方法、InputBox和和MsgBox函数(函数(MsgBox过程)。过程)。例例8 输入半径输入半径,求圆面积和球体积。求圆面积和球体积。1 1、 In

50、putBoxInputBox函数(函数(输入数据输入数据) 注意:函数返回的数据是注意:函数返回的数据是字符类型字符类型。函数形式:变量函数形式:变量=InputBox(提示提示,标题标题,默认值默认值)r= InputBox(请输入半径r:, 输入数据, 4)2、 MsgBoxMsgBox函数和函数和MsgBoxMsgBox过程(过程(输出提示信息输出提示信息)函数形式:变量变量 = MsgBox(提示提示,图标图标+按钮按钮,标题,标题)a = MsgBox(密码错误!密码错误!, 16 + 1, 登录登录)过程形式:Call MsgBox (提示提示,图标图标+按钮按钮,标题标题)Msg

51、Box 提示提示,图标图标+按钮按钮,标题标题图标类型图标类型参数值参数值红色红色Stop标志标志16询问信息询问信息 ?32警告信息警告信息 !48信息信息 I 64按钮按钮参数值参数值012345按下的按钮按下的按钮返回值返回值1234567 思考思考 例例8 输入半径输入半径,求圆面积和球体积。求圆面积和球体积。二二 、分支结构、分支结构简单分支简单分支双分支双分支多分支多分支如果五一节放假,那么,我就去旅游。如果五一节放假,那么,我就去旅游。如果五一节放假,那么如果五一节放假,那么 我就去旅游,我就去旅游,否则,否则, 我到机房做我到机房做vb作业。作业。如果假期是如果假期是 清明节:

52、去濮塘;清明节:去濮塘; 五一节:去采石;五一节:去采石; 端午节:回老家;端午节:回老家; 暑暑 假:去上海。假:去上海。 1. If1. IfThenThen语句语句( (单分支结构单分支结构) ) If Then 语句块语句块 End If 或或 If Then 问题问题 :输入两个数存放在输入两个数存放在x和和y中中 ,比较大小,保证大数放在比较大小,保证大数放在x中,小的中,小的数放在数放在Y中。中。2. If2. IfThenThenElseElse语句语句( (双分支结构双分支结构) ) If Then Else End If If Then Else 问题:问题:判断一个整数的

53、奇偶性判断一个整数的奇偶性注意:单分支和双分支如果写成注意:单分支和双分支如果写成块块形式,形式,If和和End If必须成对出现,写成必须成对出现,写成行行形式就不形式就不能带能带End If例例10 帐号和密码帐号和密码(1)运行效果)运行效果(2)目的:分支结构及分支结构的嵌套)目的:分支结构及分支结构的嵌套(3)分析:)分析:布局:两个标签,两个文本框和两个命令按钮布局:两个标签,两个文本框和两个命令按钮控制逻辑:略控制逻辑:略(4)设计:)设计:5思考思考2:判断一个数是整数还是小数,如果判断一个数是整数还是小数,如果 是整数再判断其奇偶性是整数再判断其奇偶性 。思考思考1:设计最多

54、可输入设计最多可输入3次校验密码的程序。次校验密码的程序。1、赋值语句赋值语句2、InputBox()()3、MsgBox()、()、MsgBox过程过程4、Print方法方法注意:标点符号(分号、逗号)和注意:标点符号(分号、逗号)和Tab()、Space()函数的()函数的使用使用5、分支结构、分支结构单分支、双分支、分支嵌套单分支、双分支、分支嵌套回顾回顾Y=0.8x (x=100元元)0.7x (x=200元元)0.5x (x300元元)第七讲第七讲 基本控制结构基本控制结构 问题:书店优惠售书问题:书店优惠售书 (x:合计金额,:合计金额,y:实付金额):实付金额)If x = 10

55、0 Then y = 0.8 * x Else If x = 200 Then y = 0.7 * x Else If x = 300 Then y = 0.5 * x Else y = 0.3 * x End If End IfEnd If3. 多分支语句多分支语句(情况语句情况语句) Select Case 变量变量Case 表达式列表表达式列表1 语句块语句块1Case 表达式列表表达式列表2 语句块语句块2Case Else 语句块语句块n+1 End SelectCase后的表达式有四种形式:表达式 一个数: 2枚举表达式(用逗号分隔) 多个数:2,4,6,8 表达式1 To 表达式

56、2 一个范围 60 To 100Is 关系运算符表达式 一个范围 Is 60例例11 书店优惠售书书店优惠售书思考:思考:设计一个计程车收费程序设计一个计程车收费程序思考:思考: 书店优惠售书书店优惠售书If x = 100 Then y = 0.8 * xIf x = 200 Then y = 0.7 * xIf x 300 Then y = 0.3 * x 思考:设计一个测属相程序思考:设计一个测属相程序 1. For循环语句循环语句 (用于循环次数已知)形式 For 循环变量初值循环变量初值 to 终值终值 Step 步长步长 循环体循环体 Next 循环变量循环变量思考思考 :输入输入

57、10个数,输出偶数之和。个数,输出偶数之和。思考思考 :输入输入10个数,输出偶数平均值。个数,输出偶数平均值。三、三、 循循 环环 结结 构构u步长为正步长为正1时,步长可省略;若终值时,步长可省略;若终值初值,步长应为负值;初值,步长应为负值;问题问题: 输入输入10个数,输出累加之和。个数,输出累加之和。例例12 求求S=1+2+3+100 思考:思考:求求S=1+3+5+99 思考:求思考:求s=1+1/2+1/3+1/102. DoLoop循环语句循环语句(用于控制循环次数未知用于控制循环次数未知)形式形式2:Do 循环体循环体Loop While|Until 注意:注意:形式形式1

58、是是先判断后执行先判断后执行,形式,形式2是是先执行后判断先执行后判断,所以形式,所以形式1中,循环中,循环体有可能体有可能1次都不执行次都不执行,形式,形式2中,循环体中,循环体至少执行一次至少执行一次。While 方式是条件成立的时候执行循环体方式是条件成立的时候执行循环体,until是条件不成立的时候是条件不成立的时候执行循环体。执行循环体。S=1+22+32+102,计算并输出,计算并输出s例例13 S=1+22+32+n2,问问n为多少时,为多少时,s的值大于的值大于100000?形式形式1: Do While|Until 循环体循环体 Loop要注意:要注意:v 出了循环,循环控制

59、变量值的问题。出了循环,循环控制变量值的问题。 例程序段:例程序段: For i=2 To 13 Step 3 Print i , Next i Print I=; i 25811I=14v在循环体内对循环控制变量可多次引用;在循环体内对循环控制变量可多次引用;但最好不要对其赋值,否则影响原来的循但最好不要对其赋值,否则影响原来的循环控制规律。环控制规律。例. 循环控制变量的改变对循环的影响。Private Sub Command1_Click() j = 0 For i = 1 To 10 Step 2 i = i + 3 j = j + 1 Print 第第; j; 次循环次循环i=; i

60、 Next i Print 退出循环后退出循环后i=; i End Sub第第1次循环次循环i=4第第2次循环次循环i=9退出循环后退出循环后i=113. 循环的嵌套循环的嵌套 一个循环体内又包含了一个完整的循环结构称为循环的嵌套. 对于循环的嵌套,要注意以下事项:内循环变量与外循环变量不能同名; 外循环必须完全包含内循环,不能交叉;不能从循环体外转向循环体内,反之则可以。 For ii =1 To 10 For jj=1 To 20 Next ii Next jj For ii =1 To 10 For ii=1 To 20 Next ii Next ii For ii =1 To 10 F

61、or jj=1 To 20 Next jj Next ii For ii =1 To 10 Next ii For ii =1 To 10 Next ii 四、其他辅助控制语句四、其他辅助控制语句 1. Go To 语句语句 形式形式: Go To 标号标号|行号行号 作用:无条件地转移到标号或行号指定的那行语句. 标号是一个字符序列,行号是一个数字序列. 2.Exit语句语句 多种形式: Exit For、Exit Do、Exit Sub、Exit Function等。 作用:退出某种控制结构的执行。 3. End语句语句 多种形式: End、 End If、 End Select、 End

62、 With、 End Type、 End Sub、 End Function、 作用:End结束一个程序的运行;其余表示某个结构的结束,与对应的结构语句配对出现。上讲回顾上讲回顾1、多分支语句多分支语句Select Case 变量变量 Case 情形情形1 语句块语句块1 Case 情形情形2 语句块语句块2 Case 情形情形N 语句块语句块N 【Case Else 语句块语句块N+1】End Select 2、计数循环计数循环For 循环变量循环变量=初值初值 To 终值终值 【Step 步长步长】 循环体循环体Next 循环变量循环变量3、Do Loop循环循环Do while 循环体循

63、环体LoopCase后的表达式有四种形式:表达式 一个数: 2枚举表达式(用逗号分隔) 多个数:2,4,6,8 表达式1 To 表达式2 一个范围 60 To 100Is 关系运算符表达式 一个范围 Is Max Then End If Next i Print Print 最大值最大值=; MaxEnd SubMax = 100Max = xInt(Rnd * 101 + 100)思考题思考题:输入十个数,输出其中的最大数和最小数输入十个数,输出其中的最大数和最小数思考题思考题: 7个裁判给选手打分个裁判给选手打分,要求去掉最高分和最低分要求去掉最高分和最低分,求求平均分。平均分。6、计数、

64、计数(1)统统计计1100之间能被之间能被3整除和能被整除和能被7整除的数各有多少个整除的数各有多少个?(2)统计字符串中字母统计字符串中字母“A”出现的次数出现的次数(不区分大小写不区分大小写)思考题思考题:统计字符串中大写字母、小写字母、数字字符的个数:统计字符串中大写字母、小写字母、数字字符的个数分别是多少?分别是多少?7、简单图形输出简单图形输出思考题:思考题:求求M,N的最大公约数和最小公倍数的最大公约数和最小公倍数4.6 4.6 常常 见见 错错 误误1. 不循环或死循环的问题不循环或死循环的问题 主要是循环条件、循环初值、循环终值、循环步长的设置有问题。2. 循环结构中缺少配对的

65、结束语句循环结构中缺少配对的结束语句 For 少 配对的Next 3. 循环嵌套时循环嵌套时,内外循环交叉内外循环交叉4. 累加、连乘时,存放累加、连乘结果的变量赋初值问题累加、连乘时,存放累加、连乘结果的变量赋初值问题 (1)一重循环 在一重循环中,存放累加、连乘结果的变量初值设置应在循环语句前。(2)多重循环 这要视具体问题分别对待。第十讲第十讲 数数 组组一、一、 数组的引入数组的引入二、二、 程序举例(三)程序举例(三)一、数组的引入一、数组的引入1.1.引例引例例例 求求10个学生某门课的平均成绩,统计高于平均分的人数。个学生某门课的平均成绩,统计高于平均分的人数。按以前简单变量的使

66、用和循环结构相结合,求平均成绩程序段如下:按以前简单变量的使用和循环结构相结合,求平均成绩程序段如下: S = 0 For i = 1 To 10 X = Val(InputBox(输入第输入第 & i & 位学生的成绩位学生的成绩) S = S + X Next i aver = S / 10请注意:x里存放的是最后一个同学的成绩!能不能给多个变量起相同的名字呢?能不能给多个变量起相同的名字呢?2、什么是数组什么是数组数组是有数组是有相同名称相同名称的的一组一组变量的集合。这些变量称为数组的元素,变量的集合。这些变量称为数组的元素,每个数组元素都有一个编号,这个编号叫下标。每个数组元素都有一

67、个编号,这个编号叫下标。 4、数组的声明、数组的声明3、数组的分类、数组的分类 根据下标个数根据下标个数 :1维,维,2维维 根据元素个数是否确定:静态数组,动态数组根据元素个数是否确定:静态数组,动态数组动态数组动态数组Dim 数组名数组名( ) as 类型类型ReDim 数组名数组名(变量变量)静态数组静态数组格式:格式:Dim 数组名数组名(常量常量) as 类型类型如:如:Dim x(10) As Integer Dim x(1 to 10) As Integer Dim x(3,5)5、数组赋值数组赋值数组赋值是指给数组元素赋值,不能给数数组赋值是指给数组元素赋值,不能给数组名赋值。

68、组名赋值。 说明:说明:(1)系统默认下标下限是)系统默认下标下限是0,也可以在通用声明段用,也可以在通用声明段用 option base 1 限制下标从限制下标从1开始开始(2)和数组有关的函数:)和数组有关的函数:Array(), LBound(), UBound()67875678955674694566解决刚才的问题:解决刚才的问题:第一步第一步:定义一个数组定义一个数组 :Dim x(1 TO 10)x(1) x(2) x(3) x(4) x(5) x(6) x(7) x(8) x(9) x(10)第二步第二步:输入成绩存入数组输入成绩存入数组,求总分,平均分求总分,平均分S=0Fo

69、r i=1 to 10 x(i)=val(InputBox(请输入第 & I & 个同学成绩) S=S+x(i)Next Iaver=S/10 第三步第三步:求高于平均分的人数求高于平均分的人数n=0 For i=1 to 10 If x(i)aver then n=n+1 End ifNext iprint 成绩高于平均分的人有 & n & 个Form1二、程序举例(三)二、程序举例(三)例例 输出一个输出一个55矩阵,该矩阵主对角线元素为矩阵,该矩阵主对角线元素为1,其余,其余元素为元素为0。思考:输出一个思考:输出一个55矩阵,该矩阵主对角线和辅对角线元矩阵,该矩阵主对角线和辅对角线元素

70、为素为1,其余元素为,其余元素为0。例:例:随机产生随机产生10个个1100之间的之间的 整数,并按从小整数,并按从小到大到大顺序输出顺序输出。例:例:求求nn矩阵每行元素之和(矩阵每行元素之和(n值由键盘输入,矩值由键盘输入,矩阵元素随机产生,范围在阵元素随机产生,范围在20-50之间。之间。思考:思考:输入输入10个同学个同学3门课成绩,求每个同学的门课成绩,求每个同学的总分,并按总分从高到低顺序输出。(每个同总分,并按总分从高到低顺序输出。(每个同学名次)学名次)思考:思考:输出一个输出一个55矩阵的每行最大元素,及最大元矩阵的每行最大元素,及最大元素的下标值。该矩阵每个元素为素的下标值

71、。该矩阵每个元素为1,100之之间的随机整数。间的随机整数。第十一讲第十一讲 过过 程程一、通用过程一、通用过程二、参数传递二、参数传递三、变量作用范围、变量作用范围引例引例 求求某个程序段在一个程序中需要反复执行但不好用循环控某个程序段在一个程序中需要反复执行但不好用循环控制,通常是把该程序段独立出来,需要的时候调用它,这个有制,通常是把该程序段独立出来,需要的时候调用它,这个有独立功能的程序段叫通用过程独立功能的程序段叫通用过程。85C=8!/(3!*5!)一、通用过程一、通用过程通用过程和事件过程合称为过程通用过程和事件过程合称为过程事件过程是当事件触发时系统自动执行,而通用过程被事件过

72、程是当事件触发时系统自动执行,而通用过程被其它程序调用时才执行。所以编写通用过程的程序,其它程序调用时才执行。所以编写通用过程的程序,既要编写既要编写该过程该过程,又要编写调用该过程的主程序又要编写调用该过程的主程序(一般是事件过程,该一般是事件过程,该事件过程包含调用通用过程的语句事件过程包含调用通用过程的语句)。通用过程又可根据其是否返回值分为通用过程又可根据其是否返回值分为Sub过程过程和和Function过程过程。Sub过程不返回值,而过程不返回值,而Function过程返回一个值。过程返回一个值。Sub过程和过程和Function过程除了在返回值上有区别外,在过程除了在返回值上有区别

73、外,在结构结构和和调用方式调用方式上也有点区别。上也有点区别。Sub过程的结构过程的结构 Private Sub 过程名过程名(参数参数) End SubFunction 过程的结构过程的结构 Private Function 过程名过程名(参数参数) End Function形式参数Sub过程的调用:过程的调用: 形式形式1:call 过程名过程名(参数参数) 形式形式2:过程名:过程名 参数参数Function过程的调用过程的调用 形式:过程名形式:过程名(参数参数)注意:注意:Sub过程第一种调用形式,参数必须括起来,第二过程第一种调用形式,参数必须括起来,第二种形式,参数不能括起来。种

74、形式,参数不能括起来。Function过程通过过程名返回值,所以在过程体过程通过过程名返回值,所以在过程体中要有给过程名赋值的语句。中要有给过程名赋值的语句。实在参数思考题思考题:编写一个求三角形面积的编写一个求三角形面积的Function过程过程Form1过程1过程2Sub过程和过程和Function过程的创建均可采用两种方法:过程的创建均可采用两种方法:1、直接在代码窗口输入过程的结构语句和过程语句、直接在代码窗口输入过程的结构语句和过程语句2、通过、通过“工具工具”菜单中的添加菜单中的添加“过程过程”二、参二、参数传递数传递在调用过程时,一般主调过程和被调在调用过程时,一般主调过程和被调

75、过程之间有数据传递,即将主调过程的过程之间有数据传递,即将主调过程的实实参参传递给被调的过程的传递给被调的过程的形参形参。有两种方式:。有两种方式:传址和传值传址和传值。两种方式的区分标志是形参。两种方式的区分标志是形参前的关键字,形参前加前的关键字,形参前加“ByVal”是传值,是传值,否则是否则是传址传址,默认是,默认是传址传址。传址方式数据传递可以是双向的传址方式数据传递可以是双向的传值方式数据传递是单向的传值方式数据传递是单向的Dim X As Integer, Y As Integer Dim X As Integer, Y As Integer Private Sub Comman

76、d1_Click()Private Sub Command1_Click() X = 4X = 4 Y = 4 Y = 4 Call S2(X, Y) Call S2(X, Y) Print X + Y Print X + YEnd SubEnd SubPrivate Sub Form_Click()Private Sub Form_Click() x = 4 x = 4 Print x; Print x; Call test(x) Call test(x) Print x Print xEnd SubEnd SubPublic Sub test( i As Integer)Public Su

77、b test( i As Integer) i = i + 1 i = i + 1End SubEnd SubSub S2(A As Integer, ByVal B As Integer)Sub S2(A As Integer, ByVal B As Integer) A = 2 * A A = 2 * A B = B + 2 B = B + 2End SubEnd Sub关关键字字名称名称定定义位置位置作用域作用域 Public全局全局变量量通用声明段通用声明段整个整个应用程序用程序 Private窗体窗体/模模块级变量量通用声明段通用声明段本窗体本窗体/本模本模块 Dim窗体窗体/模模块

78、级变量量通用声明段通用声明段本窗体本窗体/本模本模块过程程级变量量过程程本本过程程 Static过程程级静静态变量量过程程本本过程程三、变量作用范围三、变量作用范围VB中变量的作用范围因定义的关键字的不同和位置的不同中变量的作用范围因定义的关键字的不同和位置的不同而不同而不同例例在窗体上添加一个命令按钮Command1和3个名称分别为Label1,Label2和Label3的标签,程序运行后,连续3次单击命令按钮后,3个标签中显示的内容分别是_。Private x As IntegerPrivate Sub Command1_Click() Static y As Integer Dim z

79、As Integer n = 10 z = n + z y = y + z x = x + z Label1.Caption = x Label2.Caption = y Label3.Caption = zEnd Sub上讲回顾上讲回顾 VB过程分为事件过程和通用过程,通用过程又分为过程分为事件过程和通用过程,通用过程又分为Sub过程过程和和Function过程过程。Sub过程不返回值,过程不返回值,Function过程返回一个值。过程返回一个值。Sub过程的调用有两种方式:过程的调用有两种方式: Call 过程名过程名(参数参数) 过程名过程名 参数参数Function过程只有一种调用方式

80、:过程只有一种调用方式: 过程名过程名(参数参数) 变量的作用范围因定义变量的关键字不同和定义语句变量的作用范围因定义变量的关键字不同和定义语句的位置不同而不同。的位置不同而不同。调用过程时,存在数据传递,有传值和传址两种形式。调用过程时,存在数据传递,有传值和传址两种形式。第十二讲第十二讲 常常 用用 控控 件件一、一、 单选按钮、复选框和框架单选按钮、复选框和框架二、二、 列表框和组合框列表框和组合框三、三、 滚动条滚动条 四、四、 时钟时钟 一、一、 单选按钮、复选框和框架单选按钮、复选框和框架单选按钮和复选按钮用于提供选项供用户选择,单选按钮和复选按钮用于提供选项供用户选择,往往根据功

81、能对其分组,分组用框架。往往根据功能对其分组,分组用框架。例:在文本框中输入字符,通过单选按纽和复选框设置字例:在文本框中输入字符,通过单选按纽和复选框设置字体、字型体、字型1、运行效果:、运行效果:2、引入:单选按钮、复选框和框架、引入:单选按钮、复选框和框架3、分析:、分析:4、设计:、设计:1、重要属性、重要属性属性属性默认值默认值含义含义Caption单选单选Option1显示的文本(在字母的前面加显示的文本(在字母的前面加&可创建热键可创建热键)复选复选Check1Font字体:字体、字型、字号字体:字体、字型、字号VisibleTrue是否可见是否可见Value单选单选False是

82、否选中(是否选中(True:选中;:选中;False:没选):没选)复选复选0是否选中(是否选中(0:没选中;:没选中;1:选中;:选中;2:灰色):灰色)Style0(Standard)样式样式2、重要事件:、重要事件:Click 单击事件单击事件3、重要方法:、重要方法:Set Focus 获得焦点获得焦点同一容器的一组单选按钮,某个时刻只能有一个被选中,默同一容器的一组单选按钮,某个时刻只能有一个被选中,默认第一个被选中。认第一个被选中。思考题思考题1:思考题思考题2思考题思考题3二、组合框和列表框二、组合框和列表框组合框和列表框也是提供选项供用户选择组合框和列表框也是提供选项供用户选择

83、,主主要用于选项比较多的情形。要用于选项比较多的情形。例:在组合框中选择字体,在列表框中选择字号、字型,例:在组合框中选择字体,在列表框中选择字号、字型,示例中的文字按选择的字体、字号和字型设置其格式。示例中的文字按选择的字体、字号和字型设置其格式。1、运行效果:、运行效果:2、引入:组合框和列表框、引入:组合框和列表框3、分析:、分析: 布局分析:布局分析: 控制逻辑分析:控制逻辑分析: 4、设计:、设计:1、组合框和列表框的主要属性、组合框和列表框的主要属性属性属性组合框组合框列表框列表框Text被选中项目的项目值被选中项目的项目值被选中项目的项目值被选中项目的项目值(属性窗口无属性窗口无

84、)List(i) 第第I+1项的项目值(从项的项目值(从0开开始)始)第第I+1项的项目值(从项的项目值(从0开始)开始)ListCount项目数项目数项目数项目数ListIndex当前选中项目的索引号当前选中项目的索引号当前选中项目的索引号当前选中项目的索引号(未选中为未选中为-1)Style0-下拉式组合框下拉式组合框1-简单组合框简单组合框2-下拉式列表框下拉式列表框0-标准显示标准显示1-复选显示复选显示MultiSelect无无0-不允许复选不允许复选1-简单复选简单复选2-扩展复选扩展复选Selectd(i)无无选择状态选择状态Sorted是否自动按字母顺序排序是否自动按字母顺序排

85、序是否自动按字母顺序排序是否自动按字母顺序排序组合框和列表框的组合框和列表框的Style属性的对比属性的对比项目值项目值:第一项第一项: Combo1.List(0) List1.List(0)最后一项最后一项: Combo1.List(Combo1.ListCount-1) List1.List(List1.ListCount-1)第第I项项: Combo1.List(I-1) List1.List(I-1)选中的项选中的项: Combo1.Text 或或 Combo1.List(Combo1.ListIndex) List1.Text或或 List1.List(List1.ListInde

86、x)2、主要方法、主要方法(1)AddItem 项目项目,N 添加项目,须指明待添加的项目,添加项目,须指明待添加的项目,N指示加入的位置,省指示加入的位置,省略即加在最后。略即加在最后。(2)ReMoveItem N 删除项目,须指明代删项目的索引号。删除项目,须指明代删项目的索引号。(3)Clear项目的清除项目的清除3、主要事件:、主要事件:Click 、Chang(组合框特有组合框特有)例:在组合框中单击项目可将项目移动到列表框中;在列例:在组合框中单击项目可将项目移动到列表框中;在列表框中双击项目可将项目移动到组合框中。表框中双击项目可将项目移动到组合框中。1、运行效果:、运行效果:

87、2、引入:组合框和列表框的方法、引入:组合框和列表框的方法3、分析:、分析: 布局分析:布局分析: 控制逻辑分析:在组合框中选择项目用单击事件,删除控制逻辑分析:在组合框中选择项目用单击事件,删除项目须用项目须用RemoveItem方法,在列表框中添加项目用方法,在列表框中添加项目用AddItem方法。方法。4、设计:、设计:拓展练习拓展练习思考题思考题设计一程序如下图:设计一程序如下图:1、窗体装载,在组合框中添加、窗体装载,在组合框中添加100个个3100之间的随机整数;之间的随机整数;2、单击、单击“判定判定”可判断选中的数是不是素数,结果用可判断选中的数是不是素数,结果用Picture

88、1显示,如果是,添加到显示,如果是,添加到List1中,不是则添加到中,不是则添加到List2中,并统计素数和非素数的个数,判断完后将组合框中该项中,并统计素数和非素数的个数,判断完后将组合框中该项目删除。目删除。上讲回顾上讲回顾单选按钮、复选框的单选按钮、复选框的Value属性值说明其状态:属性值说明其状态:单选按钮的单选按钮的Value值是值是逻辑逻辑型数据型数据,值为,值为True表示选表示选中,值为中,值为False表示未选中,表示未选中,复选框的复选框的Value值是值是数值型数值型数据数据,值为,值为1表示选中值,表示选中值,为为0表示未选中。表示未选中。两个控件的主要事件是单两个

89、控件的主要事件是单击事件,主要方法是获得击事件,主要方法是获得焦点方法(焦点方法(SetFocus)组合框和列表框的主要属性组合框和列表框的主要属性第第i项的项目值项的项目值Combo1.List(i-1)List1.List(i-1)被选中项目的索引号被选中项目的索引号Combo1.ListIndexList1.ListIndex被选中项目的项目值被选中项目的项目值Combo1.Text或或Combo1.List(Combo1.ListIndex)List1.Text 或或List1.List(list1.ListIndex)组合框和列表框的主要是事件组合框和列表框的主要是事件组合框:组合框

90、:Click()、 Chang()、KeyPress()列表框:列表框:Click()组合框和列表框的主要方法组合框和列表框的主要方法添加项目:添加项目:AddItem 项目值项目值删除项目:删除项目:ReMoveItem 索引号索引号三、滚动条三、滚动条VBVB中中, ,滚动条往往用来获取数据,有两种滚动条往往用来获取数据,有两种: :水平滚动条和垂直滚动条。水平滚动条和垂直滚动条。例:例: 用滚动条设置文本框中文本的字号用滚动条设置文本框中文本的字号1、运行效果:、运行效果:2、引入:滚动条、引入:滚动条3、分析:、分析: 布局分析布局分析 控制逻辑控制逻辑4、设计、设计第十三讲第十三讲

91、常用控件常用控件属性属性默认值默认值含义含义Max 可变最大值可变最大值Min可变最小值可变最小值LargeChange 单击滚动条空白区域时改变的值单击滚动条空白区域时改变的值SmallChange 单击两端按钮时改变的值单击两端按钮时改变的值Value当前值当前值1、滚动条的主要属性:、滚动条的主要属性:2、滚动条的主要事件:、滚动条的主要事件:Change 事件、事件、Scroll 事件事件Change事件是在值改变后触发(事件是在值改变后触发(单击两端按钮、单击滚动区单击两端按钮、单击滚动区域、拖动划块结束域、拖动划块结束),),Scroll事件是在值改变过程中触发事件是在值改变过程中

92、触发(拖动划块拖动划块)思考题:用滚动条改变图片的高度和宽度思考题:用滚动条改变图片的高度和宽度四、时钟控件四、时钟控件时钟控件往往用来实现每隔一个时间间隔重复做某件事。时钟控件往往用来实现每隔一个时间间隔重复做某件事。例:设计可显示系统时间的时钟。例:设计可显示系统时间的时钟。1、运行效果:、运行效果:2、引出:时钟控件、引出:时钟控件3、分析:、分析: 布局分析:布局分析: 控制逻辑分析:运行窗体,不显示系统时间,时钟控件为控制逻辑分析:运行窗体,不显示系统时间,时钟控件为无效,单击无效,单击“开始开始”显示系统时间,应该在单击事件中添加使显示系统时间,应该在单击事件中添加使时钟控件有效的

93、代码;单击时钟控件有效的代码;单击“停止停止”系统时间不再改变,应该系统时间不再改变,应该在单击事件中添加使时钟控件无效的代码。在单击事件中添加使时钟控件无效的代码。4、设计:、设计:1、时钟控件的主要属性:、时钟控件的主要属性: Enabled:是否有效;是否有效; Interval:间隔的时间(毫秒为单位)间隔的时间(毫秒为单位)2、主要事件:、主要事件:Timer事件事件思考题思考题1:设计一倒计时时钟:设计一倒计时时钟思考题思考题2:设计一个弹球程序:设计一个弹球程序五、五、 图形有关的控件图形有关的控件和图形有关的标准控件有和图形有关的标准控件有4个个:1、图片框控件(、图片框控件(

94、Picture)2、图像框控件(、图像框控件(Image)3、画线控件(、画线控件(Line)4、形状控件(、形状控件(Shape)图片图片框框控件和图像控件和图像框框控件相似,都可以装入图形文件,可以控件相似,都可以装入图形文件,可以在设计时通过属性窗口设置在设计时通过属性窗口设置PicturePicture属性,也可以在运行程属性,也可以在运行程序时借助序时借助LoadPictureLoadPicture函数设置。两者的不同之处:函数设置。两者的不同之处: (1 1)图像框比图片框占用内存少;)图像框比图片框占用内存少; (2 2)图片框是容器控件;)图片框是容器控件; (3 3)图片框有

95、)图片框有PrintPrint方法可输出文本;方法可输出文本; (4 4)图片框有)图片框有AutoSizeAutoSize属性,可调整其大小适应图片大属性,可调整其大小适应图片大小;而图像框有小;而图像框有StretchStretch属性,可调整图形的大小适应图像属性,可调整图形的大小适应图像框的大小。框的大小。画线控件和形状控件可进行简单绘图。这两个控件不支持画线控件和形状控件可进行简单绘图。这两个控件不支持任何事件,只用于表面修饰。任何事件,只用于表面修饰。画线控件画线控件Line用来画一条直线,其用来画一条直线,其BorderWidth、BorderStyle,分别决定所画线段的宽度和

96、形状,另外两个坐标点(分别决定所画线段的宽度和形状,另外两个坐标点(X1,Y1)和)和(X2,Y2)确定了两个端点的位置。)确定了两个端点的位置。形状控件形状控件Shape控件可以用来画几何形状,可以通过控件可以用来画几何形状,可以通过Shape属性确属性确定是何种形状。定是何种形状。例:在组合框中选择例:在组合框中选择形状改变形状控件的形状改变形状控件的形状形状例设计如图所示的时钟,每隔一秒例设计如图所示的时钟,每隔一秒“秒针秒针”转动一下。转动一下。第十四讲:菜单设计和文件操作第十四讲:菜单设计和文件操作一、菜单设计一、菜单设计二、文件操作二、文件操作三、通用对话框和控件数组三、通用对话框

97、和控件数组一、菜单设计一、菜单设计例题:例题:已知考生文件夹中有工程文件已知考生文件夹中有工程文件Menu1.Vbp,其中含有一个名称为,其中含有一个名称为“Menu1”的窗体文件的窗体文件Menu1.frm,要求在其中:要求在其中: 1. 创建菜单,菜单格式与内容如下创建菜单,菜单格式与内容如下: 文件文件(F) 数据处理数据处理 打开打开 计算计算 退出退出 Ctrl+X 其中,括号内的字符为热键;其中,括号内的字符为热键; 分隔条的名称为分隔条的名称为FGT,其它菜单和子菜单的名称与标题相同,但不含热键;,其它菜单和子菜单的名称与标题相同,但不含热键; Ctrl+X:设置为快捷键。:设置

98、为快捷键。2.将考生文件夹下的模块文件将考生文件夹下的模块文件CDMK.bas添加进本工程,其中的过程添加进本工程,其中的过程calculate的功能是:的功能是:在窗体上绘制如图所示的在窗体上绘制如图所示的sin曲线图案。曲线图案。过程中有过程中有2条语句需要完善,请根据题意在条语句需要完善,请根据题意在“*question*”下面的下下面的下划线处填入正确内容后,再删除下划线,使该过程能够正确运行,不准增加或划线处填入正确内容后,再删除下划线,使该过程能够正确运行,不准增加或减少程序行。减少程序行。3.“计算计算”菜单项的菜单项的Click()事件调用模块中的子程序过程事件调用模块中的子程

99、序过程calculate,“退出退出”菜菜单项的单项的Click()事件执行事件执行End语句,其它菜单和子菜单不执行任何操作。语句,其它菜单和子菜单不执行任何操作。4调试运行并生成可执行程序:调试运行并生成可执行程序:Menu1.exe。二、文件操作二、文件操作(三个控件、三个操作)三个控件、三个操作)例题:例题:在考生文件夹中,完成以下要求:在考生文件夹中,完成以下要求:1.启动工程文件启动工程文件Sjt.Vbp,将该工程文件的工程名称改为,将该工程文件的工程名称改为“Spks”,并将该,并将该工程中的窗体文件工程中的窗体文件Sjt.frm的窗体名称改为的窗体名称改为“Vbbc”,窗体标题

100、改为,窗体标题改为“VB2010”。 2. 请在适当位置添加控件:一个驱动器列表框请在适当位置添加控件:一个驱动器列表框Drive1;一个目录列表框;一个目录列表框Dir1;一个文件列表框;一个文件列表框File1,自动过滤出扩展名为,自动过滤出扩展名为bmp和和jpg的图形文件;的图形文件;一个图像框一个图像框Image1,其中的图片自动匹配图像框的大小。(以上操作在,其中的图片自动匹配图像框的大小。(以上操作在属性窗口中完成)属性窗口中完成)3. 按要求编写代码使得驱动器列表框、目录列表框和文件列表框同步工作;按要求编写代码使得驱动器列表框、目录列表框和文件列表框同步工作;文件列表框中显示

101、扩展名为文件列表框中显示扩展名为bmp和和jpg的图形文件;当单击文件列表框中的图形文件;当单击文件列表框中的某个图形文件时,图像框中显示出该图片(可为机器上扩展名为的某个图形文件时,图像框中显示出该图片(可为机器上扩展名为bmp或或jpg的任意图形文件)。运行后,如下图所示:的任意图形文件)。运行后,如下图所示: 4. 请先调试、运行,然后将工程、窗体保存。请先调试、运行,然后将工程、窗体保存。1、三个控件、三个控件 名称名称 属性属性 事件事件 Drive1 Change() Dir1 Change() File1 Pattern Click,DbClick2、文件种类、文件种类 顺序文件

102、、随机文件、二进制文件顺序文件、随机文件、二进制文件3、文件操作(顺序文件)、文件操作(顺序文件) (1)打开打开 Open 文件名文件名 for 模式模式 as 文件号文件号 模式有:模式有:Input、Output、Append(2)读读/写写 写操作:写操作: Print #文件号,输出列表文件号,输出列表 Write #文件号,输出列表文件号,输出列表 读操作:读操作: Input #文件号,变量列表文件号,变量列表 Line Input #文件号,变量文件号,变量 Input(n,#文件号文件号)(3)关闭文件关闭文件 Close #文件号文件号 举例举例例题:例题:在考生文件夹中,

103、完成以下要求:在考生文件夹中,完成以下要求:1.1.启动工程文件启动工程文件Prog1.VbpProg1.Vbp,将该工程文件的工程名称改为,将该工程文件的工程名称改为“Spks”Spks”,并将该工程中的窗,并将该工程中的窗体文件体文件Prog1.frmProg1.frm的窗体名称改为的窗体名称改为“Prog1”Prog1”,窗体的标题改为,窗体的标题改为“统计计算统计计算”。2.2.请在窗体适当位置添加以下控件:四个标签,均为默认名称,标题分别为请在窗体适当位置添加以下控件:四个标签,均为默认名称,标题分别为“原始数据原始数据”、“最小值:最小值:”、“最大值:最大值:”和和“平均值:平均

104、值:”;三个文本框,均为默认名称;列表框;三个文本框,均为默认名称;列表框List1List1;三个命令按钮,均为默认名称,标题分别为;三个命令按钮,均为默认名称,标题分别为“读取数据读取数据”、“统计统计”和和“写入写入文件文件”,如图所示。,如图所示。3.3.要求程序运行后:要求程序运行后: 单击单击“读取数据读取数据”按钮,读取按钮,读取“INI.TXT”INI.TXT”文件中的文件中的5050个整数,将其存入数组个整数,将其存入数组A A中并同中并同时显示在时显示在List1List1中;中; 单击单击“统计统计”按钮,统计出这按钮,统计出这5050个数的最小数、最大数和平均值,并将这

105、些数据分别个数的最小数、最大数和平均值,并将这些数据分别显示在三个文本框中;显示在三个文本框中; 最后单击最后单击“写入文件写入文件”按钮,把平均值写入考生文件夹中的文件按钮,把平均值写入考生文件夹中的文件“kssj.dat”kssj.dat”中。中。4.4.在考生文件夹下有标准模块在考生文件夹下有标准模块prog1.basprog1.bas,其中的过程,其中的过程GetdataGetdata可以读出可以读出 “ “INI.TXT” INI.TXT” 文文件中的数据,过程件中的数据,过程PutdataPutdata可以将数据写入文件可以将数据写入文件“kssj.dat”kssj.dat”中;要

106、求考生把这个模块中;要求考生把这个模块文件添加到当前工程中,直接调用过程。文件添加到当前工程中,直接调用过程。5.5.请先将工程、窗体与模块保存,然后调试、运行并生成可执行程序:请先将工程、窗体与模块保存,然后调试、运行并生成可执行程序:Prog1.exeProg1.exe。三、通用对话框三、通用对话框例题:例题:在考生文件夹中,完成以下要求:在考生文件夹中,完成以下要求:1. 1. 启动工程文件启动工程文件Sjt.VbpSjt.Vbp,将该工程文件的工程名称改为,将该工程文件的工程名称改为“Spks”Spks”,并将该工,并将该工程中的窗体文件程中的窗体文件Sjt.frmSjt.frm的窗体

107、名称改为的窗体名称改为“Vbbc”Vbbc”,窗体的标题为,窗体的标题为“VB2010”VB2010”。2. 2. 请在适当位置增加以下控件:标签请在适当位置增加以下控件:标签Label1Label1,标题为,标题为“计算机计算机”;框架;框架Frame1Frame1,标题为,标题为“选择选择”;通用对话框;通用对话框CommonDialog1 CommonDialog1 。 单选按扭控件数组:单选按扭控件数组:Option1(0)Option1(0)、Option1(1)Option1(1)、Option1(2)Option1(2),其标题分别,其标题分别为:为:“窗体背景色窗体背景色”,“

108、标签前景色标签前景色”,“标签背景色标签背景色”,Option1(0)Option1(0)的的ValueValue属性初始值为属性初始值为TrueTrue,其余按钮的,其余按钮的ValueValue属性值为属性值为FalseFalse。(以上操作在。(以上操作在属性窗口中完成)属性窗口中完成)3. 3. 程序运行时,单击单选按钮就打开程序运行时,单击单选按钮就打开“颜色颜色”对话框,为相应的对象设置颜对话框,为相应的对象设置颜色(要求对控件数组用色(要求对控件数组用Select CaseSelect Case结构实现)。结构实现)。4. 4. 调试、运行无误后将工程、窗体保存。调试、运行无误后

109、将工程、窗体保存。 1、通用对话框控件的添加、通用对话框控件的添加2、通用对话框的主要方法和属性、通用对话框的主要方法和属性 .ShowOpen .FileName .ShowSave .FileName .ShowColor .Color .ShowFont .FontName .FontSize .FontBold Vb上机考试注意事项上机考试注意事项1、正确映射、正确映射serverastudNksuserNserveraspkssys2、正确启动考试系统正确启动考试系统3、正确存盘、正确存盘124、安全交卷、安全交卷交卷交卷检查文件夹下相应文件检查文件夹下相应文件关闭关闭常见的术语、概

110、念 对象、属性、事件、过程等常用的函数Msgbox,inputbox,int,mid,len等几个关键字Option base ,option explicit,static,const等 常用控件的特殊属性 image的stretch等常见的典型算法累加、最大值、计数、排序、数的判定、图形输出等位置及大小位置及大小Left、Top、Height、Width返回判判断下列哪些语句是合法的赋值语句断下列哪些语句是合法的赋值语句a=a23=a a+b=cxm=张三张三 xm=张三张三a=b=c=0a=a+1返回欲得到如下输入框,请写出合适的语句x = InputBox(请输入人数:请输入人数:,

111、输入输入, 89)返回该函数返回的值的类型是该函数返回的值的类型是 字符型字符型欲得到如下信息框,写出合适语句欲得到如下信息框,写出合适语句a = MsgBox(密码错误密码错误!, 16 + 1, 警告警告)MsgBox 密码错误密码错误!, 16 + 1, 警告警告如果要判断在信息框中单击了什么按钮,应选择哪种如果要判断在信息框中单击了什么按钮,应选择哪种调用方式,为什么?调用方式,为什么?MsgBox (数据正确数据正确) ?返回例:输入一学生成绩,评定其等级:例:输入一学生成绩,评定其等级:90分以上为分以上为“优秀优秀”,8089分为分为“良好良好”,7079分为分为“中等中等”,6

112、069分为分为“及格及格”,60分以为分以为“不合格不合格”x = InputBox(请输入成绩:请输入成绩:)Select Case Case Print 成绩为优成绩为优 Case Is = 80 Print 成绩为良成绩为良 Case Is = 70 Print 成绩为中成绩为中 Case Is = 60 Print 成绩为及格成绩为及格 Print “成绩不合格成绩不合格End SelectVal(x)Is = 90Case Else返回If x=90 then Print 成绩为优成绩为优 If x=80 then Print “成绩为良成绩为良 If x=70 then Print

113、 “成绩为中成绩为中If x=60 then Print “成绩为及格成绩为及格 If x= 10 (-5)n = n + 1返回s = 0s = 0For i = 1 To 10For i = 1 To 10 s1 = 1 s1 = 1 For j = 1 To i For j = 1 To i s1 = s1 * j s1 = s1 * j Next Next s = s + s1 s = s + s1Next iNext iPicture1.Print s=; sPicture1.Print s=; ss = 0s = 0s1 = 1s1 = 1For i = 1 To 10For i

114、= 1 To 10 s1 = s1 * i s1 = s1 * i s = s + s1 s = s + s1Next iNext iPrint s=; sPrint s=; s返回http:/ 基数器m清零For n=3 to 100 For i=2 to n-1 If 整除 then 跳出循环 Endif Next i If 是自然循环结束 then 计数器加1 If 计数器是5的倍数 换行输出 Else 不换行输出 Endif EndifNext nDim n As Integer, i As IntegerDim n As Integer, i As Integerm = 0m = 0

115、For n = 3 To 100For n = 3 To 100 For i = 2 To n - 1 For i = 2 To n - 1 If n Mod i = 0 Then If n Mod i = 0 Then Exit For Exit For End If End If Next i Next i If i = n Then If i = n Then m = m + 1 m = m + 1 If m Mod 5 = 0 Then If m Mod 5 = 0 Then Print n Print n Else Else Print n; Print n; End If End

116、If End If End IfNext nNext n返回定义变量输入第一个数假设最大值是第一个数,最小值也是第一个数For i=2 to 10 输入一个数 如果比最大值大,最大值换成该数,反之再判断是不是比最小值小,如果比最小值小,则最小值换成该数Next I输出最大值,最小值返回Dim x As Single, i As IntegerDim max As Single, min As Singlex = Val(InputBox(请输入第1个数)Print xmax = x: min = xFor i = 2 To 10 x = Val(InputBox(请输入第 & i & 个数) Print x If x max Then max = x Else If x min Then min = x End If End IfNext iPrint max=; max, min=; min

展开阅读全文
相关资源
正为您匹配相似的精品文档
相关搜索

最新文档


当前位置:首页 > 医学/心理学 > 基础医学

电脑版 |金锄头文库版权所有
经营许可证:蜀ICP备13022795号 | 川公网安备 51140202000112号