《Visual-Basic应用任务教程完整版课件(全).ppt》由会员分享，可在线阅读，更多相关《Visual-Basic应用任务教程完整版课件(全).ppt（400页珍藏版）》请在taowenge.com淘文阁网|工程机械CAD图纸|机械工程制图|CAD装配图下载|SolidWorks_CaTia_CAD_UG_PROE_设计图分享下载上搜索。
1、Visual BasicVisual Basic应用任务教程应用任务教程 第第1章章 Visual Basic入门入门学习指导学习指导 本本章章向向读读者者介介绍绍VBVB的的集集成成开开发发环环境境、基基本本概概念念及及基基本本操操作作、基基本本控控件件的的使使用用，介介绍绍构构成成VBVB程程序序的的基基本本元元素素，包包括括数数据据类类型型、常常量量、变变量量、函函数数、运运算算符符和和表表达达式式等内容。等内容。【任务任务任务任务1 1】VBVB欢迎您欢迎您u效果描述效果描述 编写如图所示的程序。程序运行后，单击编写如图所示的程序。程序运行后，单击“显示显示”按钮，在上面方框中显示按钮
2、，在上面方框中显示“VBVB欢迎您！欢迎您！”，单击，单击“退退出出”按钮，退出程序运行。按钮，退出程序运行。【任务任务任务任务1 1】设置窗体背景设置窗体背景设置窗体背景设置窗体背景 u设计分析设计分析 一、启动一、启动VBVB 安装安装VBVB系统后，单击系统后，单击“开始开始”按钮，选择按钮，选择“程序程序”菜单，选择菜单，选择“Microsoft Visual Basic 6.0Microsoft Visual Basic 6.0中文版。中文版。二、开发环境二、开发环境 VB6.0 VB6.0工作环境是一个集成开发环境，即程序设计、工作环境是一个集成开发环境，即程序设计、编辑、运行和调
3、试等功能一体的开发环境，除了编辑、运行和调试等功能一体的开发环境，除了MicrosoftMicrosoft应用软件常规的标题栏、菜单栏、工具栏外，应用软件常规的标题栏、菜单栏、工具栏外，还包括还包括VB6.0VB6.0的几个独立窗口。的几个独立窗口。【任务任务任务任务1 1】设置窗体背景设置窗体背景设置窗体背景设置窗体背景 1创建界面创建界面 按题目要求创建界面按题目要求创建界面2 2过程代码过程代码 编写并输入过程代码编写并输入过程代码u完成步骤完成步骤【任务任务任务任务1 1】VBVB欢迎您欢迎您u知识链接知识链接一、程序设计的基本步骤一、程序设计的基本步骤 通过前面简单应用程序的设计过程
4、可以总结出，建通过前面简单应用程序的设计过程可以总结出，建立一个应用程序分为以下几步骤：立一个应用程序分为以下几步骤：(1)设计应用程序界面设计应用程序界面(2)设置对象属性设置对象属性(3)编写程序代码编写程序代码(4)运行和调试应用程序运行和调试应用程序(5)保存和编译应用程序保存和编译应用程序【任务任务任务任务1 1】VBVB欢迎您欢迎您二、基本概念二、基本概念1对象：象：将反映对象的属性和行为封装在一起形成将反映对象的属性和行为封装在一起形成的实体。的实体。2类：具有相同：具有相同属属性的性的对象的集合，是象的集合，是创建建对象象实例的模板。例的模板。对象由象由类创建，建，对象是象是类
5、的一的一个个实例。例。3.属性：用来表示对象的特征，一个人的年龄、身高、属性：用来表示对象的特征，一个人的年龄、身高、发型都是人的特征，即属性。在发型都是人的特征，即属性。在VB中每种对象有若干中每种对象有若干个属性，不同对象的属性类型和个数是不同的。属性个属性，不同对象的属性类型和个数是不同的。属性有属性值，改变属性值就可以改变对象的特征。有属性值，改变属性值就可以改变对象的特征。【任务任务任务任务1 1】VBVB欢迎您欢迎您4 4事件：事件：VBVB中所指的中所指的“事件事件”是指系统事先设定的、是指系统事先设定的、能为对象所识别和响应的动作。每一种对象所能识别的能为对象所识别和响应的动作
6、。每一种对象所能识别的事件是不同的。事件是不同的。5 5方法：是方法：是VBVB提供的内置于对象的特殊子程序，每提供的内置于对象的特殊子程序，每个对象都可以有多个方法。个对象都可以有多个方法。对象名对象名.方法方法 参数名表参数名表 其中，若省略了对象名，表示为当前窗体。例如：其中，若省略了对象名，表示为当前窗体。例如：Form1.Print VBForm1.Print VB欢迎您欢迎您 或或 Print VBPrint VB欢迎您欢迎您 【任务任务任务任务1 1】VBVB欢迎您欢迎您三、基本属性三、基本属性1.Name1.Name属性属性 ：用来识别窗体、控件等对象的名称。：用来识别窗体、控
7、件等对象的名称。2.Caption2.Caption属性：表示对象的标题。属性：表示对象的标题。3.Height Width3.Height Width属性属性:高度和宽度。高度和宽度。4.Left Top4.Left Top属性属性:Left:Left属性指定对象左边缘到其容器属性指定对象左边缘到其容器左边缘的距离，左边缘的距离，TopTop属性指定对象上边缘到其容器上边属性指定对象上边缘到其容器上边缘的距离。缘的距离。5 5BackColor ForeColorBackColor ForeColor属性属性 BackColor BackColor属性返回或设置对象的背景颜色。属性返回或设置
8、对象的背景颜色。ForeColor ForeColor属性返回或设置对象里文本的颜色。属性返回或设置对象里文本的颜色。6 6EnabledEnabled属性属性 用来设置窗体或控件能否接受用户事件用来设置窗体或控件能否接受用户事件 7 7Visible Visible 属性属性 Visible Visible属性指定对象是否可见属性指定对象是否可见 8 8FontFont属性属性 Font Font属性是一个属性组合，其中包含了字体、大属性是一个属性组合，其中包含了字体、大小、字体样式等属性成员。小、字体样式等属性成员。【任务任务任务任务1 1】VBVB欢迎您欢迎您【任务任务任务任务2 2】变
9、化的窗体变化的窗体变化的窗体变化的窗体u效果描述效果描述 程序运行后，窗体背景颜色变为红色，单击程序运行后，窗体背景颜色变为红色，单击“变大变大”按钮，窗体就变大，单击按钮，窗体就变大，单击“变小变小”按钮，窗体就变小。按钮，窗体就变小。窗体在运行时背景加载为红色，就要在窗体的窗体在运行时背景加载为红色，就要在窗体的装载装载Load事件过程中，通过程序代码的方式改变事件过程中，通过程序代码的方式改变窗体的背景颜色，窗体的背景颜色，Load事件在窗体装入内存时发事件在窗体装入内存时发生。生。单击命令窗体变大和变小，就要在命令按钮的单击命令窗体变大和变小，就要在命令按钮的单击事件中改变窗体的单击事
10、件中改变窗体的Height和和Width属性值。属性值。u设计分析设计分析 【任务任务任务任务2 2】变化的窗体变化的窗体变化的窗体变化的窗体【任务任务任务任务2 2】变化的窗体变化的窗体变化的窗体变化的窗体1创建界面创建界面 按题目要求创建界面按题目要求创建界面2 2过程代码过程代码 编写并输入过程代码编写并输入过程代码u完成步骤完成步骤【任务任务任务任务2 2】变化的窗体变化的窗体变化的窗体变化的窗体一、窗体的属性一、窗体的属性(1)BorderStyle(1)BorderStyle属性：设置窗体的边框样式属性：设置窗体的边框样式.(2)Picture(2)Picture属性：设置窗体中要
11、显示的图片。属性：设置窗体中要显示的图片。(3)MaxButton(3)MaxButton和和MinButtonMinButton属性：指明是否显示最属性：指明是否显示最大化按钮和最小化按钮。大化按钮和最小化按钮。(4)ControlBox(4)ControlBox属性：设置窗体标题栏中是否有控属性：设置窗体标题栏中是否有控制菜单，默认值为制菜单，默认值为TrueTrue。(5)Icon(5)Icon属性：设置窗体控制菜单图标。属性：设置窗体控制菜单图标。(6)WindowState(6)WindowState属性：设置窗体窗口运行时的状属性：设置窗体窗口运行时的状态态(最大、还原或最小最大、
12、还原或最小)。u知识链接知识链接【任务任务任务任务2 2】变化的窗体变化的窗体变化的窗体变化的窗体二、窗体的事件二、窗体的事件(1)Click事件：鼠事件：鼠标单击事件，在窗体事件，在窗体内内无控件无控件处单击鼠鼠标左健左健时发生。生。(2)DblClick事件：鼠事件：鼠标双双击事件，在窗体事件，在窗体内内无控件无控件处双双击鼠鼠标左健左健时发生。生。(3)Initialize事件事件：初始化事件，是建立窗体：初始化事件，是建立窗体时首先首先触触发的事件，先于的事件，先于Load事件。事件。(4)Load事件：装事件：装载事件，把窗体装入事件，把窗体装入内内存存时发生，生，此事件在此事件在I
13、nitialize之后之后发生。生。(5)Activate事件：事件：当当窗体成窗体成为活活动窗口窗口时触触发该事件，事件，此事件在此事件在Load之后之后发生。生。(6)Unload事件：卸事件：卸载事件，事件，关关闭窗体窗体时触触发该事件。事件。【任务任务任务任务3 3】窗体的切换窗体的切换窗体的切换窗体的切换 u效果描述效果描述 每个窗体的背景均为一幅图片，每个窗体上各有每个窗体的背景均为一幅图片，每个窗体上各有1 1个标签。单击第个标签。单击第1 1个窗体的标签，切换到第个窗体的标签，切换到第2 2个窗体，个窗体，单击第单击第2 2个窗体的标签，又切换到第个窗体的标签，又切换到第1 1
14、个窗体。个窗体。【任务任务任务任务3 3】窗体的切换窗体的切换窗体的切换窗体的切换 u设计分析设计分析 窗体的背景图片可以通过窗体窗体的背景图片可以通过窗体PicturePicture属性设置。属性设置。单击窗体上的标签，进行窗体间的切换，需要用到单击窗体上的标签，进行窗体间的切换，需要用到窗体的两个方法窗体的两个方法HideHide和和ShowShow，其中，其中HideHide用于隐藏窗用于隐藏窗体，体，ShowShow用于显示窗体。用于显示窗体。1创建界面创建界面 按题目要求创建界面按题目要求创建界面2 2过程代码过程代码 编写并输入过程代码编写并输入过程代码u完成步骤完成步骤【任务任务
15、任务任务3 3】窗体的切换窗体的切换窗体的切换窗体的切换 【任务任务任务任务3 3】窗体的切换窗体的切换窗体的切换窗体的切换 u知识链接知识链接一、多窗体设计一、多窗体设计1 1建立多窗体。建立多窗体。2 2设置启动窗体。设置启动窗体。二、窗体的方法二、窗体的方法(1)Hide(1)Hide方法：隐藏窗体，但不卸载。方法：隐藏窗体，但不卸载。(2)Show(2)Show方法：显示窗体。方法：显示窗体。(3)Print(3)Print方法：在窗体上输出文本或数据。方法：在窗体上输出文本或数据。(4)Cls(4)Cls方方法法：清清除除运运行行时时窗窗体体上上(或或图图形形框框)的的文文本或图形。
16、本或图形。(5)Move(5)Move方方法法：用用于于移移动动窗窗体体或或对对象象，并并可可改改变变其其大小。大小。【任务任务4】对象的隐藏与失效对象的隐藏与失效 窗窗体体上上有有2 2个个标标签签、3 3个个命命令令按按钮钮，当当单单击击“显显示示文文本本1 1”命命令令按按钮钮时时，显显示示上上面面文文字字，下下面面的的文文字字隐隐藏藏，“显显示示文文本本1 1”按按钮钮失失效效；当当单单击击“显显示示文文本本2 2”命命令令按按钮钮时时，显显示示下下面面的的文文字字，上上面面的的文文字字隐隐藏藏，“显显示示文文本本2 2”按钮失效，按钮失效，“显示文本显示文本1 1”按钮可用。按钮可用
17、。u效果描述效果描述 本本程程序序中中，标标签签上上文文字字的的显显示示或或隐隐藏藏，通通过过标标签签控控件件的的Visible属属性性实实现现，Visible属属性性用用来来指指定定对对象是否可见。象是否可见。命命令令按按钮钮的的失失效效与与恢恢复复，通通过过命命令令按按钮钮控控件件的的Enabled属属性性实实现现，Enabled属属性性用用来来设设置置对对象象是是否否有效。有效。u设计分析设计分析 【任务任务任务任务4 4】对象的隐藏与失效对象的隐藏与失效对象的隐藏与失效对象的隐藏与失效【任务任务4 4】对象的隐藏与失效对象的隐藏与失效1创建界面创建界面 按题目要求创建界面按题目要求创建
18、界面2 2过程代码过程代码 编写并输入过程代码编写并输入过程代码u完成步骤完成步骤【任务任务4】对象的隐藏与失效对象的隐藏与失效一、标签控件一、标签控件(1)BackStyle(1)BackStyle属性：设置标签背景是否透明。属性：设置标签背景是否透明。0-Transparent 0-Transparent背景透明背景透明 1-Opaque(1-Opaque(默认值默认值)背景不透明。背景不透明。(2)BorderStyle(2)BorderStyle属性：设置标签边框样式。属性：设置标签边框样式。0-None 0-None无边框无边框(默认默认)1 1 Fixed Single Fixed
19、 Single有固定边框。有固定边框。(3)Alignment(3)Alignment属性：设置标题文本的对齐方式。属性：设置标题文本的对齐方式。0 0 Left Justify(Left Justify(默认值默认值)左对齐左对齐 1 1 Right Justify Right Justify右对齐右对齐 2-Center 2-Center居中。居中。u知识链接知识链接【任务任务4】对象的隐藏与失效对象的隐藏与失效(4)AutoSize(4)AutoSize属性：自动调整标签的宽度，使之适属性：自动调整标签的宽度，使之适合标题文本的宽度。默认为合标题文本的宽度。默认为FalseFalse。2
20、 2标签的事件标签的事件 (1)Click (1)Click事件：单击鼠标左键时发生。事件：单击鼠标左键时发生。(2)DblClick (2)DblClick事件：双击鼠标左键时发生。事件：双击鼠标左键时发生。二、命令按钮控件二、命令按钮控件1 1命令按钮的属性命令按钮的属性 (1)Default (1)Default属性：指定命令按钮为窗体内的属性：指定命令按钮为窗体内的“默认默认”按钮。其默认值为按钮。其默认值为FalseFalse。当。当Default=Default=TrueTrue时，即使焦点不在命令按钮上，按回车键也可时，即使焦点不在命令按钮上，按回车键也可触发其触发其ClickC
21、lick事件。事件。【任务任务4】对象的隐藏与失效对象的隐藏与失效(2)Cancel(2)Cancel属性：指定命令按钮为窗体内的属性：指定命令按钮为窗体内的“取消取消”按钮。其默认值为按钮。其默认值为FalseFalse。当。当Cancel=TrueCancel=True时，时，即使焦点不在命令按钮上，按即使焦点不在命令按钮上，按EscEsc键也可触发其键也可触发其ClickClick事件。事件。(3)ToolTipText(3)ToolTipText属性：鼠标指向命令按钮时，允许属性：鼠标指向命令按钮时，允许显示一个提示框，该属性值是提示框的字符串。显示一个提示框，该属性值是提示框的字符串
22、。(4)Caption(4)Caption属性：属性：CaptionCaption属性用来设置命令按钮属性用来设置命令按钮的显示标题。如果给命令按钮定义快捷键，只需在的显示标题。如果给命令按钮定义快捷键，只需在作为快捷键的字母前加一个连字符作为快捷键的字母前加一个连字符“&”。2 2命令按钮的事件命令按钮的事件(1)Click(1)Click事件：单击鼠标左键时发生。事件：单击鼠标左键时发生。【任务任务5】系统登录系统登录u效果描述效果描述 创建一个登录程序，包括创建一个登录程序，包括2个窗体，输入用户名和个窗体，输入用户名和密密码，码，单击单击“确定确定”按钮，若用户名及密码都正确则进入按钮
23、，若用户名及密码都正确则进入“学生信息管理系统学生信息管理系统”窗体，否则可以清除文本框内容。窗体，否则可以清除文本框内容。u设计分析设计分析 本例是一个简单的登录程序，在两个文本框中本例是一个简单的登录程序，在两个文本框中分别输入用户名和密码。输入密码时，要使文本分别输入用户名和密码。输入密码时，要使文本框显示框显示“*”，就要将输入密码的文本框的，就要将输入密码的文本框的PasswordCharPasswordChar属性设置为属性设置为“*”。单击单击“确定确定”按钮时要判断用户名和密码是按钮时要判断用户名和密码是否正确，单击否正确，单击“取消取消”按钮时，要清除文本框，按钮时，要清除文
24、本框，使光标定位于文本框中。在使光标定位于文本框中。在“取消取消”按钮的单击按钮的单击事件过程中设置文本框的事件过程中设置文本框的TextText属性为空，并使用属性为空，并使用文本框的文本框的SetFocusSetFocus方法将光标放置在文本框。方法将光标放置在文本框。【任务任务任务任务5 5】系统登录系统登录系统登录系统登录u完成步骤完成步骤1 1创建界面创建界面 按题目要求创建界面按题目要求创建界面2 2过程代码过程代码 编写并输入过程代码编写并输入过程代码【任务任务任务任务5 5】系统登录系统登录系统登录系统登录u知识链接知识链接【任务任务任务任务5 5】系统登录系统登录系统登录系统
25、登录一、文本框的属性一、文本框的属性(1)Text(1)Text属性：显示的文本内容。属性：显示的文本内容。(2)PasswordChar(2)PasswordChar属性：密码替换符。属性：密码替换符。(3)MultiLine(3)MultiLine属性：设置是否允许存放多行文本。属性：设置是否允许存放多行文本。(4)ScrollBars(4)ScrollBars属性：设置文本框内是否有滚动条。属性：设置文本框内是否有滚动条。(5)MaxLength(5)MaxLength属性：设置文本框内文本的最大长度属性：设置文本框内文本的最大长度(字符数字符数)。默认值为。默认值为0 0。(6)Sel
26、Text(6)SelText属性：返回文本框内被选定的文本。属性：返回文本框内被选定的文本。(7)SelStart(7)SelStart属性：返回选定文本的开始位置。属性：返回选定文本的开始位置。(8)SelLength(8)SelLength属性：选定文本的长度，单位为字属性：选定文本的长度，单位为字符。符。【任务任务任务任务5 5】系统登录系统登录系统登录系统登录二、对象的焦点二、对象的焦点 焦点是对象接受鼠标和键盘输入的能力。当某一个控焦点是对象接受鼠标和键盘输入的能力。当某一个控件或窗体具有焦点时，它们就可以接受用户的输入。件或窗体具有焦点时，它们就可以接受用户的输入。1 1设置焦点设
27、置焦点SetFocusSetFocus方法：用于设置焦点方法：用于设置焦点 2 2焦点事件焦点事件(1)GotFocus(1)GotFocus 事件：当对象接受到焦点时发生该事件。事件：当对象接受到焦点时发生该事件。(2)LostFocus(2)LostFocus事件：事件：当对象失去了焦点时发生该事当对象失去了焦点时发生该事件。件。LostFocusLostFocus事件过程主要用于更新输入内容，或对事件过程主要用于更新输入内容，或对GotFocusGotFocus事件过程建立的内容进行检查修改。事件过程建立的内容进行检查修改。【任务任务6】文本同步变化文本同步变化u效果描述效果描述 窗体上
28、有窗体上有1个标签控件和个标签控件和2个文本框控件，并且个文本框控件，并且2个文个文本框都有水平和垂直滚动条，当程序运行时，用户在第本框都有水平和垂直滚动条，当程序运行时，用户在第一个文本框内输入文字时，在第二个文本框内同步显示一个文本框内输入文字时，在第二个文本框内同步显示相同的内容。相同的内容。u设计分析设计分析 本例中要使文本框有水平和垂直滚动条，首先本例中要使文本框有水平和垂直滚动条，首先要设置文本框可以接收多行文本，将文本框的要设置文本框可以接收多行文本，将文本框的MultiLineMultiLine属性设置为属性设置为TrueTrue，然后才能设置添加滚，然后才能设置添加滚动条的属
29、性动条的属性ScrollBarsScrollBars，将，将ScrollBarsScrollBars属性设置属性设置为为3-Both3-Both，同时有水平和垂直滚动条。，同时有水平和垂直滚动条。文本框有一个重要的事件文本框有一个重要的事件ChangeChange，当文本框内，当文本框内容发生变化时发生。本例中用户在第一个文本框容发生变化时发生。本例中用户在第一个文本框内每输入一个文字，都将触发一次内每输入一个文字，都将触发一次ChangeChange事件，事件，要在第二个文本框内显示相同的内容，就要在第要在第二个文本框内显示相同的内容，就要在第一个文本框的一个文本框的ChangeChange
30、事件中编写代码将第一个文事件中编写代码将第一个文本框的内容送入第二个文本框。本框的内容送入第二个文本框。【任务任务任务任务6 6】文本同步变化文本同步变化文本同步变化文本同步变化1创建界面创建界面 按题目要求创建界面按题目要求创建界面2 2过程代码过程代码 编写并输入过程代码编写并输入过程代码u完成步骤完成步骤【任务任务任务任务6 6】文本同步变化文本同步变化文本同步变化文本同步变化u知识链接知识链接文本框的事件文本框的事件 (1)Change(1)Change事件：改变文本框内容时发生。事件：改变文本框内容时发生。(2)KeyPress(2)KeyPress事件：当用户从键盘上敲入一个字符时
31、触事件：当用户从键盘上敲入一个字符时触发该事件，并返回一个发该事件，并返回一个KeyAsciiKeyAscii参数到该事件中，参数到该事件中，KeyAsciiKeyAscii参数的值是字符键的参数的值是字符键的ASCIIASCII码值。例如，当用码值。例如，当用户输入户输入“A A”，返回，返回KeyAsciiKeyAscii的值是的值是6565。用户每输入一。用户每输入一个字符，引发一次个字符，引发一次KeyPressKeyPress事件。最常用的是对回车事件。最常用的是对回车键键(KeyAscii(KeyAscii的值是的值是13)13)的判断，表示文本的结束。的判断，表示文本的结束。【任
32、务任务任务任务6 6】文本同步变化文本同步变化文本同步变化文本同步变化【应用提高应用提高1】趣味文本趣味文本u效果描述效果描述 窗体上单击窗体上单击“字体变化字体变化”按钮后，文本框中文字的大按钮后，文本框中文字的大小、字体、风格会发生变化；单击小、字体、风格会发生变化；单击“文字颜色文字颜色”按钮后，按钮后，文本框中文字颜色会变化；单击文本框中文字颜色会变化；单击“背景颜色背景颜色”按钮后，按钮后，文本框中的背景颜色会变化；单击文本框中的背景颜色会变化；单击“设置密码设置密码”命令按命令按钮后，文本框变为密码形式，其中的文字变为钮后，文本框变为密码形式，其中的文字变为“*”符号；符号；单击单
33、击“退出退出”按钮可退出程序运行。按钮可退出程序运行。u设计分析设计分析 本程序比较简单，在每个命令按钮的单击事件本程序比较简单，在每个命令按钮的单击事件中设置文本框的相关属性即可完成对文本框的相中设置文本框的相关属性即可完成对文本框的相关设置。关设置。【应用提高应用提高应用提高应用提高1 1】趣味文本趣味文本趣味文本趣味文本1创建界面创建界面 按题目要求创建界面按题目要求创建界面2 2过程代码过程代码 编写并输入过程代码编写并输入过程代码u完成步骤完成步骤【应用提高应用提高应用提高应用提高1 1】趣味文本趣味文本趣味文本趣味文本【任务任务7】求圆的周长和面积求圆的周长和面积u效果描述效果描述
34、 编写一个程序编写一个程序“求圆的周长和面积求圆的周长和面积”，在文本框中输，在文本框中输入圆的半径，单击入圆的半径，单击“计算计算”命令按钮求圆的周长和面积。命令按钮求圆的周长和面积。u设计分析设计分析 在文本框中输入圆的半径后，单击在文本框中输入圆的半径后，单击“计算计算”按按钮利用数学公式就可求出圆的周长和面积，将结钮利用数学公式就可求出圆的周长和面积，将结果在标签上输出。果在标签上输出。在计算的过程中要用到多种数据类型，圆的半在计算的过程中要用到多种数据类型，圆的半径是整型；计算出的周长和面积是实数；计算出径是整型；计算出的周长和面积是实数；计算出的结果存储在字符串中；以便于输出，计算
35、中还的结果存储在字符串中；以便于输出，计算中还要用到常量要用到常量3.141593.14159。为了完成计算，要定义多个变量，用到变量定为了完成计算，要定义多个变量，用到变量定义语句义语句DimDim。【任务任务任务任务7 7】求圆的周长和面积求圆的周长和面积求圆的周长和面积求圆的周长和面积u完成步骤完成步骤【任务任务任务任务7 7】求圆的周长和面积求圆的周长和面积求圆的周长和面积求圆的周长和面积1创建界面创建界面 按题目要求创建界面按题目要求创建界面2 2过程代码过程代码 编写并输入过程代码编写并输入过程代码u知识链接知识链接一、数据类型一、数据类型数据的表示和存储形式数据的表示和存储形式(
36、1)(1)整数类型整数类型 Integer,LongInteger,Long(2)(2)浮点类型浮点类型 Single(Single(单精度浮点型单精度浮点型)Double(Double(双精度浮点型双精度浮点型)(3)(3)字符串数据类型字符串数据类型 stringstring(4)(4)逻辑型逻辑型 BooleanBoolean(5)(5)日期型日期型 Date Date(6)(6)变体型变体型(Variant)(Variant)【任务任务任务任务7 7】求圆的周长和面积求圆的周长和面积求圆的周长和面积求圆的周长和面积二、常量二、常量VBVB中有三种常量：直接常量、符号常量、系统常量。中有
37、三种常量：直接常量、符号常量、系统常量。1 1直接常量直接常量前面介绍的数据类型，其常量值直接反映了其类型。前面介绍的数据类型，其常量值直接反映了其类型。2 2符号常量符号常量 Public|PrivateConst Public|PrivateConst 常量名常量名 As type=As type=表达式表达式说明：说明：(1)(1)声明的类型部分声明的类型部分(As type)(As type)是可选的，省略时，类型是可选的，省略时，类型由赋予的值确定。由赋予的值确定。(2)(2)常量名其定义规则遵循标识符的命名规则。常量名其定义规则遵循标识符的命名规则。(3)(3)表达式作为常量值，可
38、以是直接的数值，也可以是表达式作为常量值，可以是直接的数值，也可以是由数字和字符串常量运算符组合成的简单表达式。由数字和字符串常量运算符组合成的简单表达式。【任务任务任务任务7 7】求圆的周长和面积求圆的周长和面积求圆的周长和面积求圆的周长和面积3 3系统常量系统常量由系统定义的、可直接使用的常量。例如：由系统定义的、可直接使用的常量。例如：vbBlack vbBlack 颜色常量，其值为颜色常量，其值为0 x00 x0，代表黑色。，代表黑色。三、变量三、变量1.1.变量的声明变量的声明显示声明：显示声明：Dim Dim 变量名变量名 As typeAs type可在同一个可在同一个DimDi
39、m语句中声明多个变量，各变量之间用逗语句中声明多个变量，各变量之间用逗号隔开，但必须指定每个变量的数据类型。号隔开，但必须指定每个变量的数据类型。例如，例如，Dim a As Integer,b As IntegerDim a As Integer,b As Integer隐式声明：变量不进行声明而直接使用。所有隐式声隐式声明：变量不进行声明而直接使用。所有隐式声明的变量都是明的变量都是VariantVariant型的。型的。a=3 b=5.8 a=3 b=5.8 【任务任务任务任务7 7】求圆的周长和面积求圆的周长和面积求圆的周长和面积求圆的周长和面积2 2变量的作用域变量的作用域一个变量被
40、定义后并不是在任何地方都能被引用的，一个变量被定义后并不是在任何地方都能被引用的，每一个变量都有它的作用域。每一个变量都有它的作用域。(1)(1)过程级变量：只有在声明他的过程中才能被识别过程级变量：只有在声明他的过程中才能被识别的变量，也称局部变量。局部变量用的变量，也称局部变量。局部变量用DimDim或或StaticStatic关键关键字来声明。字来声明。(2)(2)模块级变量：在模块的模块级变量：在模块的“通用通用”声明段中用声明段中用PrivatePrivate关键字声明的变量，其作用范围是该模块中的关键字声明的变量，其作用范围是该模块中的所有过程。所有过程。(3)(3)全局变量：在模
41、块的声明段中用全局变量：在模块的声明段中用PublicPublic关键字声关键字声明的变量，其作用范围是应用程序中的所有过程。即在明的变量，其作用范围是应用程序中的所有过程。即在整个应用程序中有效，全局变量也称为公用变量。整个应用程序中有效，全局变量也称为公用变量。【任务任务任务任务7 7】求圆的周长和面积求圆的周长和面积求圆的周长和面积求圆的周长和面积【任务任务任务任务8 8】计算随机算术题计算随机算术题计算随机算术题计算随机算术题u效果描述效果描述 单击单击“随机数随机数”按钮，在左边的两个文本框中随机按钮，在左边的两个文本框中随机产生产生2 2个个100100以内正整数，单击相应的运算符
42、按钮，则会以内正整数，单击相应的运算符按钮，则会在第在第3 3个文本框中输出计算结果，单击个文本框中输出计算结果，单击“退出退出”按钮结按钮结束程序运行。束程序运行。本例中要随机产生本例中要随机产生100100以内正整数，要用到以内正整数，要用到VBVB系系统提供的两个数学函数统提供的两个数学函数Rnd(x)Rnd(x)和和Int(x)Int(x)。Rnd(x)Rnd(x)函数用于产生函数用于产生0 01 1之间的随机数之间的随机数,Int(x)Int(x)函数返回不超过函数返回不超过x x的最大整数。的最大整数。这里首先要用这里首先要用Rnd(x)Rnd(x)产生产生(0,1)(0,1)区间
43、的随机数，区间的随机数，再乘以再乘以100100，扩大，扩大100100倍，就是倍，就是(0,100)(0,100)区间的随机数，区间的随机数，然后再用然后再用IntInt函数取整，即表达式函数取整，即表达式Int(Rnd()*100)Int(Rnd()*100)就可以产生就可以产生100100以内的正整数。以内的正整数。u设计分析设计分析 【任务任务任务任务8 8】计算随机算术题计算随机算术题计算随机算术题计算随机算术题1创建界面创建界面 按题目要求创建界面按题目要求创建界面2 2过程代码过程代码 编写并输入过程代码编写并输入过程代码u完成步骤完成步骤【任务任务任务任务8 8】计算随机算术题
44、计算随机算术题计算随机算术题计算随机算术题u知识链接知识链接一、常用内部函数一、常用内部函数【任务任务任务任务8 8】计算随机算术题计算随机算术题计算随机算术题计算随机算术题函数名函数名功功 能能举举 例例Int(x)返回不超过返回不超过x的最大整数的最大整数Int(2.6)=2Int(-4.2)=-5Abs(x)取取x的绝对值的绝对值Abs(5)=5Abs(-5)=5Sqr(x)返回返回x的算术平方根值的算术平方根值Sqr(4)=2Rnd(x)得到得到01之间的单精度随机数之间的单精度随机数 参见说明参见说明Exp(x)返回返回e的的x次方，即次方，即exExp(3)=20.086表表1-2
45、常用的常用的数学数学函函数数2 2字符串处理函数字符串处理函数 【任务任务任务任务8 8】计算随机算术题计算随机算术题计算随机算术题计算随机算术题函数名函数名功功 能能举举 例例Left$(x,n)取取x左边的左边的n个字符个字符Left$(abcd,2)=abRight$(x,n)取取x右边的右边的n个字符个字符Right$(abcd,2)=cdMid$(x,m,n)取取x中中从从第第m个个字字符符开开始始的的n个个字字符符Mid$(abcd,2,2)=bcUcase$(x)把把x中的字母都转换为大写中的字母都转换为大写Ucase$(aBcD)=ABCDLcase$(x)把把x中的字母都转换
46、为小写中的字母都转换为小写Lcase$(aBcD)=abcdVal(x)返回在返回在x中包含的数值中包含的数值Val(1.56abc)=1.56Trim$(x)去掉去掉x左端和右端的空格部分左端和右端的空格部分Trim$(abc )=abc3 3日期时间函数日期时间函数 【任务任务任务任务8 8】计算随机算术题计算随机算术题计算随机算术题计算随机算术题函数名函数名功功 能能举举 例例Now返回系统当前日期和时间返回系统当前日期和时间Print now显示显示2010-09-20 20:35:14Date返回系统的当前日期返回系统的当前日期Print Date 显示显示Year(x)返回相应的年
47、份返回相应的年份Print Year(now)显示显示2010Month(x)返回相应的月份返回相应的月份(112)12)Print Month(now)显示显示9Day(x)返回相应的日期返回相应的日期(131)31)Day(2010,9,20)=20Weekday(x)返回相应的星期返回相应的星期(17)7)Weekday(2010,9,20)=3Hour(x)返回小时数返回小时数(023)23)Hour()=10Minute(x)返回分钟数返回分钟数(059)59)Minute()=30Second(x)返回秒数返回秒数(059)59)Second()=154 4其他函数其他函数 【任务
48、任务任务任务8 8】计算随机算术题计算随机算术题计算随机算术题计算随机算术题函数名函数名功功 能能举举 例例RGB(r,g,b)得得到到由由红红、绿绿、蓝蓝三三原原色色组合后的颜色值组合后的颜色值RGB(0,0,0)为黑色为黑色Qbcolor(n)得得到到按按Qbasic方方式式设设置置的的颜颜色色值值，n为为颜颜色色号号，取取值范围为：值范围为：015Qbcolor(0)为黑色为黑色LoadPicture(fn$)为为窗窗体体、图图片片框框或或图图像像框框控控件件装装载载图图像像，fn$为为图图像像文件名文件名参见说明参见说明Len(x)得得到到变变量量x的的长长度度(存存储储变变量量x所需
49、字节数所需字节数)设设x为双精度实型为双精度实型Len(x)=8)=8二、运算符与表达式二、运算符与表达式VBVB的运算符有算术运算符、连接运算符、关系运算的运算符有算术运算符、连接运算符、关系运算符和逻辑运算符。符和逻辑运算符。表达式按其所含运算符和运算对象表达式按其所含运算符和运算对象的不同，可分为算术表达式、字符串表达式、关系表达的不同，可分为算术表达式、字符串表达式、关系表达式和逻辑表达式等。式和逻辑表达式等。1 1算术运算符和算术表达式算术运算符和算术表达式(1)(1)整除运算整除运算()()结果是商的整数部分。结果是商的整数部分。(2)(2)求余运算求余运算(Mod)(Mod)结果
50、是两数相除后的余数。结果是两数相除后的余数。(3)(3)利用算术运算符利用算术运算符“+、-”也可以进行日期型数据的也可以进行日期型数据的运算，日期型数据之间只能进行加、减运算。运算，日期型数据之间只能进行加、减运算。2 2字符串运算符和字符串表达式字符串运算符和字符串表达式将两个或多个字符串连接起来可以用字符串连接运将两个或多个字符串连接起来可以用字符串连接运算符算符“&”或或“+”，生成一个新的字符串。，生成一个新的字符串。【任务任务任务任务8 8】计算随机算术题计算随机算术题计算随机算术题计算随机算术题表表1-2常用的常用的数学数学函函数数3 3关系运算符和关系表达式关系运算符和关系表达