VB编程入门教程实用教案

1、Visual Basic程序设计(chn x sh j)教程1本章将介绍有关VB程序的构成(guchng)和数据类型以及变量的定义和使用、表达式以及基本的输入输出操作。这些知识是编程的基础。我们将通过简单示例的分析，帮助理解如何进行VB编程。第1页/共83页第一页，共84页。Visual Basic程序设计(chn x sh j)教程2本章主要内容:确定数据(shj)的性质：数据(shj)类型两种数据(shj)表达：常量和变量算术运算符和表达式VB编程的开始：使用窗体赋值和输入输出第2页/共83页第二页，共84页。Visual Basic程序设计(chn x sh j)教程3 2.1 概概 述

2、述第3页/共83页第三页，共84页。Visual Basic程序设计(chn x sh j)教程41加法器界面设计2.2 一个一个(y )简单的加法器简单的加法器程序程序第4页/共83页第四页，共84页。Visual Basic程序设计(chn x sh j)教程5对象列表框过程列表框过程分界线程序员在此编写代码光标标题第5页/共83页第五页，共84页。Visual Basic程序设计(chn x sh j)教程6Private Sub CmdAdd_Click()计算(j sun)”按钮代码 Dim Temp As Long TxtNum1.Text = TxtNum2.Text = Txt

3、Sum. Text = TxtNum1.Text = InputBox (请输入第一个数) TxtNum2.Text = InputBox(请输入第二个数) Temp = Val(TxtNum1) + Val(TxtNum2) TxtSum. Text = TempEnd SubPrivate Sub CmdExit _ Click()“退出”按钮代码 FrmAdder1.Hide Msg Box (加法器程序运行结束，谢谢使用) EndEnd Sub第6页/共83页第六页，共84页。Visual Basic程序设计(chn x sh j)教程7 数据是程序处理的对象。为了更好地处理各种各样的

4、数据，VB定义了多种数据类型，数据类型定义了值的范围并确定了它能够(nnggu)进行的操作。第7页/共83页第七页，共84页。Visual Basic程序设计(chn x sh j)教程8整数: 整型/长整型字节型浮点型: 单/双精度货币型数值型 数据类型字符型逻辑型日期型对象型变体型第8页/共83页第八页，共84页。Visual Basic程序设计(chn x sh j)教程9 1. 1. 字节(z ji)(z ji)型(Byte)(Byte) 字节(z ji)(z ji)型数可以表示无符号的整数，0 0255255 2. 2. 整型(Integer)(Integer)和长整型(Long)(

5、Long) 不带小数部分的数，表示正整数、负整数和零 整型数: : -32768 -3276832767 9832767 98、9898 长整型数： -2147483648 -21474836482147483647 456782147483647 45678、45678&45678&第9页/共83页第九页，共84页。Visual Basic程序设计(chn x sh j)教程10 3. 3. 单精度型(Single)(Single)和双精度型(Double)(Double) 浮点数。表示带有小数部分的数 表示数的范围大，但有误差。 如超出某个表示范围，则用科学记数法 例如：4

6、.53E8(4.534.53E8(4.53108)108)，8.173E-148.173E-14，3.14D233.14D23 Single Single保留7 7位十进制有效位，DoubleDouble保留1515位 4. 4. 货币型(Currency)(Currency) 专门为处理货币而设计的数据类型 它可最多保留小数点右边(yu bian)4(yu bian)4位和小数点左边1515位第10页/共83页第十页，共84页。Visual Basic程序设计(chn x sh j)教程11字符型(String)(String) 用双引号括起来的一串字符。 例如CantonCanton”、”

7、1+2=?1+2=?”、”Good MorningGood Morning”等 “”称为起止界限符。 字符串长度。分变长字符串( (长度不固定(gdng)(gdng)和定长字符串( (长度固定(gdng)(gdng) 在VBVB中，把汉字作为一个字符来处理。 例如：“浙江大学 浙江杭州 中国” 该字符串长度为1212，含空格 第11页/共83页第十一页，共84页。Visual Basic程序设计(chn x sh j)教程12逻辑(lu j)(lu j)型(Boolean)(Boolean) 逻辑(lu j)(lu j)型又称布尔型，其数据只有True(True(真) )和False(Fals

8、e(假) )两个值逻辑(lu j)(lu j)值和数值类型进行转换的时候，它们是非对称的：（1 1）数值数据转换为布尔值时，0 0对应FalseFalse，非0 0对应为TrueTrue（2 2）布尔值转换为数值数据时，FalseFalse对应0 0，TrueTrue对应为 -1 -1。第12页/共83页第十二页，共84页。Visual Basic程序设计(chn x sh j)教程13 日期型(Date)(Date) 表示(biosh)(biosh)日期和时间 用两个“# #”符号把日期和时间的值括起来 如：#08/20/2001#08/20/2001#、#2001-08-20#2001-0

9、8-20# #12/12/2005 11:35:35 PM# #12/12/2005 11:35:35 PM#第13页/共83页第十三页，共84页。Visual Basic程序设计(chn x sh j)教程14变体型(Variant) 变体型数据是一种可变的数据类型，可以存放(cnfng)任何类型的数据 当指定变量为Variant变量时，VB会自动完成必要的转换第14页/共83页第十四页，共84页。Visual Basic程序设计(chn x sh j)教程15在程序中不特别说明时，VB会自动将该变量默认(mrn)为Variant型变量。 例：Temp=“22” 字符串 Temp=22 数值

10、 Temp=#01/01/2002# 日期对象引用型型(Object) 对象引用型型数据可用来表示应用程序中的对象第15页/共83页第十五页，共84页。Visual Basic程序设计(chn x sh j)教程16 VB为用户了提供自定义数据类型，以满足用户的需求。实际上自定义数据只是把VB已有的数据类型重新组合或者构造为一个新类型。例如我们要给员工设计一个工资数据类型， 这个类型中有姓名、工号和工资数，可以使用以下方法(fngf)定义： Type Pay 姓名 As String*8 工号 AsLong 工资 AsSingle End Type第16页/共83页第十六页，共84页。Visu

11、al Basic程序设计(chn x sh j)教程17类 型名 称字节数取值范围和有效位数整 型Integer2精确表示-3276832767范围内的整数长整型Long4精确表示-21474836482147483647范围内的整数单精度浮点型Single4-3.4028231038-1.40129810-45 1.40129810-453.4028231038 6位有效位数双精度浮点型Double8- -1.7976931348623210308 - -4.9406564584124710-3244.9406564584124710-324 1.797693134862321030815位

12、有效位数字节型Byte10255变长字符串String每个字符占1个字节，每个字符串最多可存放约20亿个字符定长字符串String*sizesize是小于65535的无符号整常数，为字符串长度逻辑型Boolean2True或FalseVisual Basic 6.0的常用(chn yn)数据类型2.32.3确定确定(qudng)(qudng)数据的性质：数数据的性质：数据类型据类型第17页/共83页第十七页，共84页。Visual Basic程序设计(chn x sh j)教程18类 型名 称字节数取值范围和有效位数货币型Currency8- -922337203685477.58089223

13、37203685477.5807日期型Date8100.1.19999.12.31对象型Object4任何对象的引用变体型Variant若存放数值类型数据，占16个字节，最大可达Double的范围；若存放字符串类型数据，字符串长度与变长字符串相同Visual Basic 6.0的其他(qt)数据类型第18页/共83页第十八页，共84页。Visual Basic程序设计(chn x sh j)教程19 说明： (1) 不同类型的数据，所占的存储空间不一样。 (2) 数据的类型可在数据之后加上一个类型符来表示(biosh)，例如，413&，86!，104.67#等。第19页/共83页第十九

14、页，共84页。Visual Basic程序设计(chn x sh j)教程20 2.4.1 常量 在程序运行期间其值始终保持不变的量 两种形式的常量：文字常量和符号常量 文字常量又分为(fn wi)数值常量、字符串、逻辑值和日期等 1数值常量 例如2，35.567，它们直接出现在程序中。第20页/共83页第二十页，共84页。Visual Basic程序设计(chn x sh j)教程21 2 2字符串常量 它是用双引号括起来的各种有效字符串组成的，如“123“123“，“A b c D“A b c D“，“程序设计“等。字符串可以为空。 字符串常量的长度为两个引号之间所有(suyu)(suyu

15、)的字符数，包括空格。VBVB规定定长字符串最大长度为3276732767。第21页/共83页第二十一页，共84页。Visual Basic程序设计(chn x sh j)教程22 3 3逻辑常量(chngling)(chngling) 就是逻辑值，TrueTrue和FalseFalse。 4 4日期常量(chngling)(chngling) 表示日期和时间的常量(chngling)(chngling)， 例如：#12-12-2005#12-12-2005#第22页/共83页第二十二页，共84页。Visual Basic程序设计(chn x sh j)教程232.4.2 符号常量 符号常量是

16、在程序(chngx)中用符号表示的常量。符号常量定义一个符号（字符串）代表一个文字常量 格式： PublicPrivate Const常量名 As 数据类型=表达式 例如：Const PI=3.14159 As Single 使用符号常量主要是为提高程序(chngx)的可读性。另外，如果需要进行常数的调整，只需要在定义的地方一次性修改就可以了。 第23页/共83页第二十三页，共84页。Visual Basic程序设计(chn x sh j)教程242.4.3 变量和声明变量1变量是什么 变量是在程序运行期间其值可以发生变化的量。 在程序运行时，数据是存放在内存中的。因此变量就是指示(zhsh)

17、程序将到哪个内存单元去存取数据，即变量与内存单元有关。使用变量名标识不同的变量，同时要给出变量数据的类型。因此，VB变量由数据类型和变量名组成。 程序中选择使用常量还是变量，是根据它们是否需要变化而决定的。第24页/共83页第二十四页，共84页。Visual Basic程序设计(chn x sh j)教程252 2VBVB变量的特点 （1 1）可变性。向变量存数据，会改变变量原来的值。 （2 2）从变量中取数据，变量中原来的值不会改变，因此在程序中，一个变量的值可以被反复取用而不会导致(dozh)(dozh)数据的改变，“取之不尽”。这是变量的可复制性。 （3 3） 变量的取值和它的类型有关，

18、但VBVB能够进行自动转换。 第25页/共83页第二十五页，共84页。Visual Basic程序设计(chn x sh j)教程263 3给VBVB变量命名 应遵守一些规则： (1) (1)变量名必须以字母(zm)(zm)开头； (2) (2)只能由字母(zm)(zm)、数字和下划线组成。不能含有小数点、空格等字符； (3) (3)字符个数不得超过255255个；第26页/共83页第二十六页，共84页。Visual Basic程序设计(chn x sh j)教程27 (4) (4)不能使用VBVB的关键字( (如语句名、函数名等) )。例如，PrintPrint、SubSub、EndEnd等

19、 (5) (5)变量(binling)(binling)名在一个程序区域内不能同名。 (6) (6) 不区分变量(binling)(binling)名中字母的大小写，一般情况下变量(binling)(binling)的第一个字母以大写表示。变量(binling)(binling)取名应使用能够望名知义的单词或者缩写等，提高程序的可读性。第27页/共83页第二十七页，共84页。Visual Basic程序设计(chn x sh j)教程284. 变量的声明 变量的声明就是向程序说明要使用的变量。 有以下2种方法(显式声明与隐式声明) (1) 声明变量(显式声明) 用Dim、Public、Priv

20、ate或Static语句来声明变量 例如(lr)：Dim sum As Integer 把sum定义为整型变量 第28页/共83页第二十八页，共84页。Visual Basic程序设计(chn x sh j)教程29 (2)隐式声明 不加说明就直接(zhji)使用变量，此时默认的变量类型为变体类型(Variant)也允许使用类型符来声明变量的类型，如Num%，Sum! (3)定义多个变量第29页/共83页第二十九页，共84页。Visual Basic程序设计(chn x sh j)教程302.4.4 强制(qingzh)要求必须声明变量：Option Explicit Option Expli

21、cit 一般情况下，该语句放置在程序模块的外部开始部分，强制(qingzh)要求所有变量必须显式声明后才能使用。 Option Explicit Private Sub Cm dAdd_Click() End Sub第30页/共83页第三十页，共84页。Visual Basic程序设计(chn x sh j)教程312.4.5 VB的关键字 VB有许多关键字，也叫做保留字，它们为VB系统本身所用，具有特定的含义。这些已经被VB使用了的单词或者缩写就是“关键字”。关键字不能被使用作为用户(yngh)定义的变量名，也不能被编程者重新定义使用。 如我们已知的：As，Dim，Private，Sub，E

22、nd，Integer，Long，String，Option Explicit，Date，Const，等等。 第31页/共83页第三十一页，共84页。Visual Basic程序设计(chn x sh j)教程32VB有五类表达式：算术表达式、字符串表达式、日期(rq)表达式、关系表达式和逻辑表达式运算符运算符说明说明运算符运算符说明说明+ +加法加法 整数除法整数除法减法减法 幂幂* *乘法乘法ModMod求模求模/ /浮点数除法浮点数除法取负取负算术运算符 第32页/共83页第三十二页，共84页。Visual Basic程序设计(chn x sh j)教程331除法 计算机使用 “/”和“

23、”代表数学中的除号。“/”用于浮点数除，它将产生(chnshng)一个有小数部分的商。而“”则是整数除法，它在进行除之前先将运算数四舍五入，结果为丢掉小数部分取其整数部分。注意下面的几个例子：3/2结果为1.532结果为13.52结果为2第33页/共83页第三十三页，共84页。Visual Basic程序设计(chn x sh j)教程342取模运算Mod 取模运算是取整除后余数的整数部分。VB支持整数和带小数的数的取模运算。如果是带小数的，则在运算前进行四舍五入操作。注意(zh y)下面的例子：13 Mod 3 结果为1，即余数为13.5 Mod 2 结果为0。先将3.5四舍五入为4，除2的

24、余数为07 Mod 2.6 结果为15 Mod 0.49除数为0错误（如果你把0.49改为0.5和0.51，试试看会发生什么？）第34页/共83页第三十四页，共84页。Visual Basic程序设计(chn x sh j)教程352.5.2 算术表达式 算术表达式也称数值表达式，是用算术运算符把数值型常量、变量、函数连接起来的式子。 表达式的运算结果( ji gu)是一个数值 例如：(A1B1/3X0.5)* Sin(X) 第35页/共83页第三十五页，共84页。Visual Basic程序设计(chn x sh j)教程362.5.3 算术运算符的优先规则运算符优先级 ( 乘 方 ( c

25、h n g f n g ) ) - ( 求 负 ) * / M o d + - 同级左到右第36页/共83页第三十六页，共84页。Visual Basic程序设计(chn x sh j)教程37 说明：(1)/和的区别：1/2=0.5，12=0 (2)Mod用来求整型数除法的余数。 例如：9 Mod 7 结果为 2 (3)在表达式中乘号不能省略(shngl)，如a*b不能写成a b(或 a b) (4)括号不分大、中、小，一律采用圆括号。可以嵌套使用 例如，xx(x+1)+1 x*(x*(x+1)+1)第37页/共83页第三十七页，共84页。Visual Basic程序设计(chn x sh

26、j)教程38窗体是我们进入VB编程所遇到的第一个对象，它是进行程序界面设计的基础平台。在程序运行时它就是程序的实际窗口。使用窗体的“属性”定义窗体的外观使用窗体的“方法”定义窗体的行为使用窗体的“事件”定义与用户之间的交互因此(ync)了解窗体（包括后续的控件等对象），就是围绕它的属性、方法和事件展开。这也是学习VB对象编程的主要思路。2.6 VB编程的开始编程的开始(kish)：使：使用窗体用窗体第38页/共83页第三十八页，共84页。Visual Basic程序设计(chn x sh j)教程39 程序入口：开始装载窗体程序入口：开始装载窗体 设置窗体显示功能设置窗体显示功能 设置窗体的背

27、景色为绿色设置窗体的背景色为绿色 设置窗体的前景色为红色设置窗体的前景色为红色 设置窗体上对象的字体为黑设置窗体上对象的字体为黑使用字号为使用字号为1515磅磅 换行换行 显示显示Welcome To The Visual Welcome To The Visual BasicBasic 显示显示This is a DemoProgramThis is a DemoProgram 结束装载过程结束装载过程Private Sub Form_Load()Private Sub Form_Load() Show Show Form1.BackColor = vbGreen Form1.BackCol

28、or = vbGreen Form1.ForeColor = vbRed Form1.ForeColor = vbRed Form1.FontName = Form1.FontName = 黑体黑体 Form1.FontSize = 15 Form1.FontSize = 15 Print Print Print Welcome To The Print Welcome To The Visual BasicVisual Basic Print This is a Print This is a DemoProgramDemoProgramEnd SubEnd Sub2.6.1 一个使用窗体显

29、示文本(wnbn)的例子第39页/共83页第三十九页，共84页。Visual Basic程序设计(chn x sh j)教程40 窗体的绝大多数属性可以在属性窗口中设置，也可以在程序代码中设置，在程序中输入窗体对象(duxing)(duxing)名称和“.”“.”分割后会自动跳出窗体的属性和方法，在这里可以区分属性和方法。2.6.2 窗体的属性(shxng)第40页/共83页第四十页，共84页。Visual Basic程序设计(chn x sh j)教程41窗体的常用(chn yn)属性 自动重画窗体。如需要直接在窗体上显示文本，自动重画窗体。如需要直接在窗体上显示文本，选择选择TrueAut

30、oRedraw3设置窗体显示设置窗体显示3D效果，默认值为效果，默认值为1为为3DAppearace2窗体名称（中文版使用窗体名称（中文版使用(名称名称)）。可在程）。可在程序中使用，但不能设置序中使用，但不能设置Name1功能描述功能描述属性名属性名编号编号第41页/共83页第四十一页，共84页。Visual Basic程序设计(chn x sh j)教程42决定窗体是否响应用户事件决定窗体是否响应用户事件(如单击窗体如单击窗体)。属。属性值为性值为True或或FalseEnabled 8决定窗体的左上角设置控制菜单按钮，决定窗体的左上角设置控制菜单按钮，选择选择True或或FalseCon

31、trolBox 7标题。也是程序运行后在标题栏所显示的内容标题。也是程序运行后在标题栏所显示的内容Caption 6窗体边框样式。有六种选择，窗体边框样式。有六种选择，只能在属性窗口选择只能在属性窗口选择BorderStyle 5背景色。在属性窗口选择或者程序代码设置背景色。在属性窗口选择或者程序代码设置BackColor 4第42页/共83页第四十二页，共84页。Visual Basic程序设计(chn x sh j)教程43这四个属性决定窗体的大小和位置。程序可进行设这四个属性决定窗体的大小和位置。程序可进行设置。置。Height、Width设置窗体的高度和宽度。设置窗体的高度和宽度。To

32、p为窗体到屏幕顶部的距离，为窗体到屏幕顶部的距离，Left为窗体到屏幕左边为窗体到屏幕左边的距离的距离Height WidthTopLeft 11前景色。在属性窗口选择或者程序代码设置前景色。在属性窗口选择或者程序代码设置ForeColor 10设置窗体上对象的字体、字型、大小等。设置窗体上对象的字体、字型、大小等。可在程序中设置可在程序中设置Font 9第43页/共83页第四十三页，共84页。Visual Basic程序设计(chn x sh j)教程44设置窗体运行时的状态，设置窗体运行时的状态，0为正常，为正常，1为最小化，为最小化，2为最大化为最大化WindowState 16可见性。

33、默认为可见性。默认为True。False使窗体及窗体上的对使窗体及窗体上的对象都不可见象都不可见Visible 15给窗体加载一个图像或图形给窗体加载一个图像或图形Picture 14确定窗体右上角最大化按钮是否有效。确定窗体右上角最大化按钮是否有效。确定窗体右上角最小化按钮是否有效确定窗体右上角最小化按钮是否有效MaxButtonMinButton 13指定图标。可以选择窗体最小化时的图标。选择图指定图标。可以选择窗体最小化时的图标。选择图标文件。标文件。Icon 12第44页/共83页第四十四页，共84页。Visual Basic程序设计(chn x sh j)教程452.6.3 窗体的方

34、法 窗体方法就是对窗体的操作行为。 方法使用格式(g shi)为： Object.方法名 可选参数 Object为窗体对象的名称（Name），如果在当前活动窗体，可省略Object或者用关键字Me。第45页/共83页第四十五页，共84页。Visual Basic程序设计(chn x sh j)教程461显示窗体方法（Show） 功能：显示窗体对象。Show方法的使用格式为： Object.Show Style 使用Show方法如果没有指定窗体名称，则默认当前活动窗体。参数(cnsh)Style是一个整数，决定窗体的模式，取值0为无模式，1为有模式第46页/共83页第四十六页，共84页。Visu

35、al Basic程序设计(chn x sh j)教程472隐藏窗体方法（Hide） 功能：隐藏窗体。注意这只是(zhsh)不显示窗体而不是卸载。要再次显示窗体，使用Show方法即可。Hide方法的格式为： Object.Hide 如果Object没有被指定，则当前活动窗体被隐藏。第47页/共83页第四十七页，共84页。Visual Basic程序设计(chn x sh j)教程483移动窗体方法（Move） Move方法可以移动或者改变窗体的大小。使用格式为： Object.Move Left ，Top，Width，Height 其中，Left是必选参数，Top是可选参数，分别代表窗体的x,y

36、方向的坐标。Width和Height为窗体移动到新位置后的高度和宽度(kund)。坐标参数的单位默认为缇（Twip，1/1440英寸）。可在窗体属性ScaleMode中选择参数单位。第48页/共83页第四十八页，共84页。Visual Basic程序设计(chn x sh j)教程494清除窗体方法（Cls）Cls（Clear Screen）是清除窗体上的显示(xinsh)的文本和图形。如Me.Cls为清除当前窗体的显示(xinsh)。5打印方法（Print）Print是在窗体上输出文本。6打印窗体方法（PrintForm） 把整个窗体作为位图图像输出到打印机。该方法使用的格式为：Object

37、.PrintForm。第49页/共83页第四十九页，共84页。Visual Basic程序设计(chn x sh j)教程502.6.4 窗体识别的动作：事件 在窗体中使用某种事件触发一个过程，以便完成某个任务(rn wu)，因此我们也叫它为事件过程。 例如：Private Sub Form _Load() End Sub 第50页/共83页第五十页，共84页。Visual Basic程序设计(chn x sh j)教程51 这里程序就是窗体的装载事件(shjin)过程，称为Load过程，Load就是窗体的一个事件(shjin)。 窗体事件(shjin)过程的一般格式为： Private Su

38、b Form_事件(shjin)名（参数表） 我们在这里编写处理事件(shjin)的程序代码End Sub 第51页/共83页第五十一页，共84页。Visual Basic程序设计(chn x sh j)教程52窗体常用事件(shjin)：1.装载事件(shjin)（Load） 程序运行时，通过Load事件(shjin)把窗体装载到内存。 2. 卸载事件(shjin)（Unload） 窗体卸载时触发Unload事件(shjin)，使窗体从内存中退出并从屏幕 上消失。 Private Sub Form _Unload (Cancel As Integer)第52页/共83页第五十二页，共84页。

39、Visual Basic程序设计(chn x sh j)教程533. 活动/非活动事件（Activate/Deactivate） Private Sub Form_ Activate() Private Sub Form _Deactivate() 使用Show可触发(chf)这个活动过程，使用Hide触发(chf)非活动过程。第53页/共83页第五十三页，共84页。Visual Basic程序设计(chn x sh j)教程544. 重绘窗体事件（Paint/Resize） 当窗体被移动或者改变大小时，触发Paint事件。如果在窗体上有图形输出，则可以(ky)使用Paint事件过程重绘图形。

40、 窗体改变了大小，原来窗体上的控件的布局比例发生了改变，为此可以(ky)进入Resize事件过程重新调整控件的布局，使之适合新的窗体大小。 第54页/共83页第五十四页，共84页。Visual Basic程序设计(chn x sh j)教程552.6.6 Tab键和焦点焦点对象的活动状态。改变对象焦点的方法：1.使用鼠标点击或者使用Tab键 使用Tab键焦点的移动次序与对象的Tabindex属性(shxng)有关。第55页/共83页第五十五页，共84页。Visual Basic程序设计(chn x sh j)教程562.程序中改变 对象. Set Focus 对象. L ostF o cus一

41、个对象能否得到焦点还与对象本身、对象的其他属性(shxng)(Enabled)有关。第56页/共83页第五十六页，共84页。Visual Basic程序设计(chn x sh j)教程57计算机的工作原理： 数据输入处理机（程序）信息输出 在构造一个程序时必须考虑：如何给变量赋值，如何输入数据并如何把有关计算结果输出。 赋值就是(jish)把一个合适的值（数或字符）存入指定的变量中，而值的来源可以是程序直接产生，也可以是从键盘输入，也可以来自其他程序的传送或来自于文件。第57页/共83页第五十七页，共84页。Visual Basic程序设计(chn x sh j)教程582.7.1 如何进行赋

42、值操作赋值语句的格式如下(rxi)：Let 变量名 = 表达式 或者：变量名 = 表达式例如：Sum = 100 x = x + 1 CmdAdd.Caption = “计算”第58页/共83页第五十八页，共84页。Visual Basic程序设计(chn x sh j)教程59使用赋值语句要注意以下(yxi)问题： 1“=”不是数学中的等号的意思，是一个赋值的运算符，叫做赋值号。 2对变量的赋值后，以新值代替了原来的值。 3在表达式中的变量应先赋值。如果是首次直接被用在表达式中，则VB自动赋初值： （1）如果是数值型变量，则自动赋初值为0。 （2）字符型变量的初值为空。第59页/共83页第五

43、十九页，共84页。Visual Basic程序设计(chn x sh j)教程60 4同一个变量出现在赋值号的两边的意义不同。在右边的变量是取出变量的值参与运算，在左边则是保存右边表达式结果值。 5一般要求变量的数据类型(lixng)和表达式的结果值的类型(lixng)一致，或者说表达式的值能够被所赋值的变量的类型(lixng)所接纳。第60页/共83页第六十页，共84页。Visual Basic程序设计(chn x sh j)教程61【例2-3】计算半径为5的圆面积(min j)和圆周长。Private Sub Form_Click() Const PI = 3.141526 定义常量 Di

44、m R As integer, Area As Single, Perimeter As Single 定义变量 R = 5给半径变量赋值 Area = PI * R * R计算后的面积(min j)值赋给变量Area Perimeter = 2 * PI * R周长值赋给变量Parimeter Print “半径”;R,”面积(min j)”;Area,”周长”;Perimeter输出半径、面积(min j)。周长End Sub 第61页/共83页第六十一页，共84页。Visual Basic程序设计(chn x sh j)教程62 2.7.2 使用输入(shr)对话框InputBox函数

45、【例2-4】计算半径为R的圆面积和周长，半径值由键盘输入(shr)。 Private Sub Form_Click() Const PI = 3.141526 Dim R As Integer, Area As Single, Perimeter As Single R = Val(InputBox(请输入(shr)圆的半径：, 输入(shr) Area = PI * R * R Perimeter = 2 * PI * R Print 半径; R, 面积; Area, 周长; Perimeter End Sub 这个例子中使用了InputBox函数产生输入(shr)对话框。 第62页/共83

46、页第六十二页，共84页。Visual Basic程序设计(chn x sh j)教程631输入(shr)对话框的使用InputBox函数的使用格式如下： InputBox（提示，标题，默认值，xpos，ypox）它们的含义如下：（1）提示信息。这是InputBox对话框所必须的信息，也可以使用空文本，即“”。（2）标题。这是在对话框窗口标题栏显示的内容。可设置，也可以没有标题。第63页/共83页第六十三页，共84页。Visual Basic程序设计(chn x sh j)教程64（3）默认值。在输入框中的默认输入。系统默认为空，可选。（4）xpos和ypos为对话框的左侧与屏幕(pngm)左边

47、的距离和上边与屏幕(pngm)顶部的距离值。可选。 第64页/共83页第六十四页，共84页。Visual Basic程序设计(chn x sh j)教程652在提示中使用多行文本 如果提示信息比较多，可以使用ASCII控制符回车Chr（13）和换行符Chr（10）产生另起一行。 例如(lr)：提示信息为“请输入圆的半径” + Chr（13）+ Chr（10）+“使用正整数” ， 产生如图效果第65页/共83页第六十五页，共84页。Visual Basic程序设计(chn x sh j)教程663使用转换函数 InputBox函数接受的是文本，也就是字符型数据，在程序中根据(gnj)变量类型不同

48、，可以使用转换函数。如： R = Val(InputBox(请输入圆的半径：, 输入)这里的Val就是转换函数，将文本类型的数据转换为整型数以便参加运算。 VB提供了在不同类型数据之间的转换。 第66页/共83页第六十六页，共84页。Visual Basic程序设计(chn x sh j)教程672.7.3 使用Print方法输出数据 使用Print在对象中显示（打印）输出文本。 使用格式(g shi)如下：对象名.Print 表达式 ,表达式 1对象名 一般情况下，Print输出到窗体或者图片框。在本窗体中输出，可以缺省对象名。第67页/共83页第六十七页，共84页。Visual Basic

49、程序设计(chn x sh j)教程682表达式 Print方法支持(zhch)多个表达式的输出，可输出数字、文字字符、日期、逻辑值等。如果Print后面没有任何表达式，则输出空行（在显示效果上相当于回车换行）。第68页/共83页第六十八页，共84页。Visual Basic程序设计(chn x sh j)教程693输出格式多个表达式输出，可以使用分号(fnho)和逗号分隔。（1）逗号分隔（标准格式输出）。逗号后的下一个表达式按照14个字符的空间分开显示。实际分隔位置还与所在输出行的宽度和分隔的数目有关。（2）分号(fnho)分隔（紧凑格式输出）。后一个表达式的值接着前一个表达式的输出。第69

50、页/共83页第六十九页，共84页。Visual Basic程序设计(chn x sh j)教程70（3）在Print语句最后使用逗号或分号结束，不换行，下一个Print接着按格式输出(shch)。（4）使用Spc()和Tab()函数，前者控制插入空格，后者确定列位置 第70页/共83页第七十页，共84页。Visual Basic程序设计(chn x sh j)教程71例：Private Sub Form_click() Me.FontSize = 16 Print 空行 Print A=; 1, B=; 2 Print 1, 2; 3, 4 Print A; Spc(4); B Print T

51、ab(10); B Print 1234567890End Sub第71页/共83页第七十一页，共84页。Visual Basic程序设计(chn x sh j)教程72 2.7.4 使用消息对话框MsgBox函数MsgBox函数提供(tgng)了一个显示应用程序运行信息的标准途径，如图所示：MsgBox的格式如下(rxi)：变量名 = MsgBox( 提示 , 对话框类型 , 对话框标题 )第72页/共83页第七十二页，共84页。Visual Basic程序设计(chn x sh j)教程73（1）使用形式: MsgBox有两种使用形式，注意区分，如：A = MsgBox(您确定要退出吗？,

52、 vbOKCancel + vbDefaultButton2, 退出)和MsgBox 您确定要退出吗？, vbOKCancel + vbDefaultButton2, 退出“ 格式1是具有返回值的使用，程序根据用户的不同选择把选择结果( ji gu)赋值给变量A。格式2没有返回值。第73页/共83页第七十三页，共84页。Visual Basic程序设计(chn x sh j)教程74（2）提示 必选参数项。如果显示(xinsh)多行，可使用Chr(13)+ Chr(10) 。（3）对话框标题 在对话框标题栏显示(xinsh)的信息文本。第74页/共83页第七十四页，共84页。Visual Basic程序设计(chn x sh j)教程75（4）对话框类型 类型参数由三部分组成，分别