VB语言基础

1第三集VB语言基础主要内容：一、常量、变量和标准函数二、IF语句三、SelectCase语句四、Do…Loop五、For…Next六、ExitFor及ExitDo语句七、With语句八、求和程序九、阶乘程序答疑解难：红绿灯用VB进行程序设计，我们需要从两方面去考虑问题，其一是如何设计界面，其二是针对界面上各个对象的事件，如何编写事件过程中的程序。前面几集我们把重点放在了设计界面上，这一集我们主要对事件过程中的程序设计进行一下说明，探讨一下如何编写事件过程中的程序。一、常量、变量和标准函数数据是我们编写命令时所不可缺少的内容，数据又分为数值数据和非数值数据，那么在编写程序的过程中如何存储数据，如何处理数据是一个最基本的问题。因此我们先来说明一下程序中数据的表示方法和存储方式。1．常量在程序设计中数据出现的最简单的形式就是常量。所谓常量就是不变的量，如我们前面在事件过程中用到的DrawWidth=6中的“6”，RGB（255，0，0）中的“255”“0”“0”，Label1.Caption=“确定”中的“确定”等。常见的常量有数值常量如6，255，3.14和字符串常量如“确定”，“Hello”。在程序中我们可以直接把常量写在程序里，像上面所示范的那样，也可以把它们定义为一个标识符，例如，如果一个程序中经常要用到，为了避免输入错误，可以把它说明为常量：ConstPi=3.1415926这样，程序中需要出现的地方就可以用Pi来代替，而不必写出它的具体数字了。通常在一个事件过程中说明的常量只在这一过程中管用，在一个窗口的“通用”中说明的常量只在这个窗口的所有过程中管用。如果希望定义的常量在所有的标准模块中有效，那就要用到“Public”，如：2PublicConstMyString=HELP这样说明的MyString是公用的常量。有时，在同一行中可以声明多个常数，如：ConstMyStr=Hello,MyDouble=3.4567逗号分开每个常数的赋值。其实，VB本身就提供了不同现成的常量供大家使用。如表1，表2，表3所示。表1VB系统提供的颜色常量系统常量数值说明vbBlack0x0黑色vbRed0xFF红色vbGreen0xFF00绿色vbYellow0xFFFF黄色vbBlue0xFF0000蓝色vbMagenta0xFF00FF洋红色vbCyan0xFFFF00青色vbWhite0xFFFFFF白色这样我们在程序中就可以直接使用这些常量，如Form1.BackColor=vbBlue表2中列举的是VB画图时线条的格式，如是使用“实线”还是“虚线”等，它们可以通过DrawStyle属性来设置，如在程序中写上DrawStyle=vbDot那么如果在窗体上画线，画出的将是点线。表2图形中DrawStyle属性的常量常数值说明vbSolid0实线vbDash1虚线vbDot2点线vbDashDot3点划线vbDashDotDot4双点划线vbInvisible5无线vbInsideSolid6内收实线VB系统提供的常量有很多很多，如表3显示的是键盘上部分键的常量。3表3部分键码的常量常数值说明vbKeyLButton1鼠标左键vbKeyRButton2鼠标右键vbKeyCancel3CANCEL键vbKeyMButton4鼠标中键vbKeyBack8BACKSPACE键vbKeyTab9TAB键vbKeyReturn13ENTER键vbKeyShift16SHIFT键vbKeyControl17CTRL键vbKeyMenu18菜单键vbKeyPause19PAUSE键vbKeyCapital20CAPSLOCK键vbKeyEscape27ESC键vbKeySpace32SPACEBAR键vbKeyPageUp33PAGEUP键vbKeyPageDown34PAGEDOWN键vbKeyEnd35END键vbKeyHome36HOME键vbKeyLeft37LEFTARROW键vbKeyUp38UPARROW键vbKeyRight39RIGHTARROW键vbKeyDown40DOWNARROW键vbKeyInser45INS键vbKeyDelete46DEL键使用系统提供的常量，我们可以不必记忆具体的数值。2．变量变量是程序设计中不可缺少的一个重要工具，在程序中我们经常需要临时保存一些数据，变量就是程序中暂存数据的地方。一般启用变量时都要说明一下，即告诉计算机你要存放的是什么类型数据，系统将根据你提供的信息准备出相应的存储空间。VB中可以存放的常见数据有：整数、实数、字符串和布尔值。字符串就是一串字符，由字符或数字组成，通常是用双引号引起来表示，如，HELP，IloveChina，Pi=，234*3434等等。布尔值就是逻辑值，通常用来表示一个关系成立不成立，它有两个值“True”和“False”即真或假。VB中存放不同类型的数据要用不同类型的变量，表4列出了VB常见的数据类型。4表4VB中常见的数据类型数据类型存储空间大小表示数值的范围Byte（字节型）1个字节0到255Boolean（布尔型）2个字节True或FalseInteger（整型）2个字节-32,768到32,767Long（长整型）4个字节-2,147,483,648到2,147,483,647Single(单精度浮点型)4个字节负数时从-3.402823E38到-1.401298E-45；正数时从1.401298E-45到3.402823E38Double(双精度浮点型)8个字节负数时从-1.79769313486232E308到-4.94065645841247E-324；正数时从4.94065645841247E-324到1.79769313486232E308Date8个字节100年1月1日到9999年12月31日String(定长字符串)字符串长度1到大约65,400Variant(数字)16个字节任何数字值，最大可达Double的范围从表中看出不同的数据类型所占内存空间也各有差别，因此，在程序里使用变量存放数据时，要事先进行声明。声明的方法是：Dim变量名称As数据类型变量名的起法要遵循以下规则：（1）以字母打头，不分大小写；（2）变量名中可以含有字母、数字或下划线，但不能包括小数点，以及%&!#@$等代表变量类型的结尾符；（3）最多255个字符；（4）不能包含VB中已经有明确含义的单词，如：If，Dim，For等。值得注意的是，在VB程序设计中，一个工程中可能出现多个窗体，即使同一个窗体下也会有多个事件过程，因此需要搞清楚变量的适用范围，如果一个变量只是在某个事件过程中进行过声明，那它只能在这个过程中使用，出了这个过程就无任何意义了。如果想让一个变量在窗体的所有事件过程中起作用，那就需要在窗体的“通用”中声明变量，如图1所示，5图1图2示意了变量的适用范围。变量K在事件过程A和事件过程B中都是有效的，但是变量I只在事件过程A中有效，变量J只在事件过程B中有效。图2如果需要在各个事件过程中传递数值，一定要在窗体的声明区声明所使用的变量。3．标准函数除了常量和变量外，VB系统还提供了许多现成的函数，我们在程序中可以方便的使用它们。具体函数见表5。表5VB提供的常用标准函数数学函数名称表达式说明AbsAbs（数值表达式）取绝对值，abs(-7.3)=7.3AtnAtn（数值表达式）反正函数CosCos（数值表达式）余弦函数ExpExp（数值表达式）指数函数FixFix（数值表达式）截取函数，Fix(-4.3)=-4,Fix(9.9)=9IntInt（数值表达式）取整函数Int(-4.3)=-5,Int(9.9)=9LogLog（数值表达式）自然对数在窗体的声明区中声明变量DimkasInteger事件过程---ADimIasInteger事件过程---BDimJasInteger6RndRnd[（数值表达式）]随机函数，产生0~1间的随机小数，Int(Rnd*10)+10可以产生10~20间的随机整数RandomizeRandomize[（数值表达式）]初始化随机函数产生器，可以没有自变量SgnSgn（x）符号函数当x0时，值为1当X0时，值为-1当x=0时，值为0SinSin（数值表达式）正弦函数SqrSqr（数值表达式）算术平方根，Sqr(4)=2TanTan（数值表达式）正弦函数字符串函数名称表达式说明AscAsc（字符）函数值为字符的ASCII码，如果自变量是字符串，函数值为第一个字符的ASCII码Chr$Chr$（0~255）函数值为以自变量为ASCII码的字符Lcase$Lcase$（字符串表达式）将字符串中的字母全部转换为小写；如：Lcase$(“CHINA”)=”china”Left$Left$（字符串表达式，n）左取函数，函数值为从字符串的左边开始取n个字符所组成的子字符串;如：Left$(“abcd”,2)=”ab”LenLen（字符串表达式）测长函数，函数值为字符串中所有字符的个数；len(“adcse”)=5Ltrim$Ltrim$（字符串表达式）去除字符串的前导空格Mid$Mid$（字符串表达式，n，m）中取函数，函数值为：从字符串的第n个开始，取回m个字符组成的新的字符串；Mid$(“abcd”,2,3)=”bcd”Right$Right$（字符串表达式，n）右取函数，函数值为从字符串的右边取n个字符组成的子字符串,Rtrim$Rtrim$（字符串表达式）去除字符串的后续空格Ucase$Ucase$（字符串表达式）将字符串中的所有字母转换为大写字母；Ucase$(“China”)=”CHINA”时间函数名称表达式说明Date$Date$或Date$=字符串表达式获取当前日期或设置当前日期NowNow获取当前时间和日期7Time$Time$或Time$=字符串表达式获取当前时间或设置当前时间转换函数名称表达式说明RoundRound（数值表达式[，n]）从第n+1位小数开始四舍五入，如Round(1.23456,3)=1.236Str$Str$（数值表达式）将数值转换为字符串，如Str$(12344)=”12344”ValVal（字符串）将字符串转换为数值，如Val(“12344”)=12344以上列举了VB提供的最常用的一小部分标准函数，除此之外，VB系统还提供了其它大量的标准函数，我们在程序设计的过程中，根据需要可以通过在线帮助获取更多的标准函数。在VB集成环境里，单击“帮助”菜单，选择其中的“MicrosoftVisualBasic帮助主题”，弹出如图3所示的“帮助主题”对话框，选中其中的“索引”，就可以在输入框中输入关键字进行检索，获取相应的帮助信息。如输入“函数”，在下面的列表框中就可以显示出有关“函数”的条目。图38除了上面的常量、变量、标准函数外，VB还提供了丰富的编程语句供我们使用，下面就看一看这些的用法。二、对象、属性、事件、方法1．对象VB作为一种面向对象的程序设计，我们首先要理解“对象”这个概念，前面两集中我们已经对“对象”有了一个感性的认识，那么什么是VB中的“对象”（Object）呢？现实生活中经常碰到各种各样的对象，如大的对象“宇宙”，小的对象“细胞”，宇宙又包括对象“银河系”，银河系又包括“金星”“木星”“火星”“太阳”“地球”等对象。VB中的对象就是窗体和摆放在窗体上面的各种控件，为了区别这些对象，每个对象都要有一个名称，一般VB都会给窗体中的每个对象一个缺省的名称，如有三个按钮，它就会叫它们Command1,Command2,Command3，人们通常是要根据情况重新命名的，就好像一家兄弟三人在家里叫“老大，老二，老三”，但在外面都是有正式的名字的。2．属性我们知道，“人”是一个抽象的概念，现实生活中只有“男人”“女人”“大人”“小孩”“张三”“李四”等具体的人。所以我们说，“人”是一个“原始对象”，一个“空的对象”，如果我们把“人”的性别属性设置为“男”，年龄属性设置为“12