VB程序设计基础教程第2章

魏豪明制作第2章VisualBasic程序设计基础常量与变量一般常量2.1.1常量字符常量日期常量数值常量逻辑常量魏豪明制作符号常量符号常量是在程序中用符号表示的常量。使用符号常量可以增加代码的可读性，因为程序中多次使用一些常量值，这些数字很难记住，符号常量可以使用具有相关含义的名字来代替不变的数据。在代码中使用符号常量来引用常数使程序清楚简洁。当然，程序中不能对符号常量赋以新值。魏豪明制作定义常量Const常数名[As数据类型]=ValueConst语句可表示数量、日期以及字符串，例如：ConstLengthAsInteger=10/表示数值ConstData=#16/03/2006#/表示日期ConstStrings=wangjiang/表示字符串若要在一行中定义多个常量，需使用逗号隔开，例如：ConstLength1=10，Length2=30魏豪明制作常量的域所谓常量的域是指常量的使用范围。通常用关键字Public或Private来定义常量的使用范围。此时定义常量的语法规则为：[Public|Private]Const常数名[As数据类型]=表达式其中，Public表示该常量为各个模块之间所共有；而Private则表示该常量仅在此模块内部有效。例如：PublicConstPi=3.1415926PublicConstR=4PrivateConstS=Pi*R魏豪明制作定义变量2.1.2变量（1）显式定义Dim变量名[As数据类型]DimCountAsSingleDimJuneAsDataDim变量名[As数据类型]，变量名[As数据类型]…Dima，b，cAsIntegerDimNameAsString，AgeAsIntegerStatic、Public、Private语句定义变量与Dim语句相似，语法格式：Public变量名[As数据类型]，[变量名[As数据类型]…]Private变量名[As数据类型]，[变量名[As数据类型]…]Static变量名[As数据类型]，[变量名[As数据类型]…]魏豪明制作（2）隐式定义DimName，AgeName=“李六”Age=18其中，第一句先定义了两个变量，第二句表示Name是字符型变量，第三句表示Age是整型变量。另外，通过使用Deftype语句也可以定义变量，例如：DefStra~g表示所有的a、b、c、d、e、f、g开头的变量都是字符型变量。魏豪明制作变量的作用域（1）局部变量PrivateSubForm1_Click()DimCount2AsInteger…………EndSubPrivateSubCommand2_Click()DimCount2AsIntegerStaticSum1AsSingle…………EndSub在Form1_Click过程中定义了局部变量Count2，在Command2_Click过程中定义了Sum1和Count2，两个同名变量Count2没有任何关系。魏豪明制作（2）全局变量Global[变量名]As[数据类型]Public[变量名]As[数据类型]例如：GlobalWidthAsSinglePublicbAsInteger魏豪明制作（3）窗体变量图2-1通用与声明在窗体Form1中声明如下变量：PublicbAsInteger魏豪明制作2.2数据类型2.2.1基本数据类型表2-1VisualBasic的基本数据类型数据类型类型描述类型声明符数据范围占用字节数Integer整型%-32768~327672Long长整型&-2147483648~21474836474Single单精度型!-3.402823E38~-1.401298E-451.401298E-45~3.402823E384Double双精度型#1.79769313486232E308~4.9406564584124E-324-4.9406564584124E-324~-1.79769313486232E3088Currency货币型@-922337203685477.5805~922337203685477.58078String字符串型$0~65535个字符1/每字符Byte字节型0~2551Boolean布尔数据型1（True）、0（False）2Data日期型1/1/100~12/31/99998Variant变体型上述有效范围之一魏豪明制作数字型数据字符串型数据日期型数据逻辑型数据变体型数据数据类型魏豪明制作数字型数据ConceptBECDA整型（Integer）和长整型（Long）单精度型双精度型字节型货币型魏豪明制作2.2.2自定义类型Type自定义类型名元素名[（下标）]As类型名……元素名[（下标）]As类型名EndType说明：①元素名表示用户自定义的一个数据类型；②下标表示定义数组；③类型名表示标准类型。魏豪明制作2.3运算符和表达式表2-2VisualBasic算术运算符运算符号功能说明优先级+加6－减6－取负进行单目运算2*乘3/除3\整除整除结果取商的整数部分4Mod求余结果取两数相除后的余数5＾指数进行乘方运算12.3.1算术运算符及表达式魏豪明制作2.3.2关系运算符及表达式表2-3VisualBasic的关系运算符运算符功能举例说明=等于123=321，结果为False123不等于321大于（2+4）5，结果为True先计算2+4=6，6大于5=大于等于7=(10-3)，结果为True大于等于都为真小于67，结果为True小于为真，其余为假=小于等于220=110，结果为False小于等于为真，其余为假不等于zx，结果为True“z”不等于“x”，所以结果为真魏豪明制作2.3.3逻辑运算符及表达式表2-4VisualBasic逻辑运算符运算符功能举例优先级Not逻辑非NotX1And逻辑与XAndY2Or逻辑或XOrY3Xor逻辑异或XXorY4Eqv逻辑等于XEqvY5Imp逻辑包含XImpY6魏豪明制作表2-5逻辑运算真值表abaAndbaEqvbaImpbaOrbaXorbFalseFalseFalseTrueTrueFalseFalseFalseTrueFalseFalseTrueTrueTrueTrueFalseFalseFalseFalseTrueTrueTrueTrueTrueTrueTrueTrueFalse魏豪明制作2.3.4字符串连接运算表达式字符串运算符是用来合并字符串的运算符，包括&和＋。&和＋运算符是用来强制两个表达式作字符串连接。字符串表达式是用字符串运算符将两个表达式连接起来的式子。例如：MyStr=Hello＂&＂Howdoyoudo＂//返回＂HelloHowdoyoudo＂//注意：在使用“+”运算符时，有可能无法确定是做加法还是做字符串连接。为避免混淆，可以使用“&”运算符进行连接。魏豪明制作2.4基本语句为变量赋值2.4.1赋值语句变量名=表达式其语法规则是：[变量]＝[表达式]例如：DimAAsIntegerA=100DimAAsDoubleDimBAsSingle，CAsSingleB=123.5C=1254.1A=B+C魏豪明制作为对象的属性赋值在VisualBasic中可以在程序中利用赋值语句为对象的属性设置属性值，其一般格式为：[对象].[属性]=[属性值]例如，为命令按钮cmdDisplay的Caption属性设置值：CmdDisplay.Caption=显示魏豪明制作为自定义类型声明的变量的各元素赋值[变量名].[元素名]=[表达式]例如：TypeStudNameAsString*20AgeAsIntegerAddressAsString*20EndTypeDimStudentAsStudStudent.Name=张三Student.Age=22Student.Address=四川成都魏豪明制作If…Then语句2.4.2选择结构语句If[条件]Then语句If[条件]Then[语句序列]EndIfIfIBThenI=B//单行语法IfIBThen//多行语句块语法I=BEndIf例如：IfIBThenI=BPrintIEndIf魏豪明制作If…Then…Else语句If[条件1]Then[语句序列1]ElseIf[条件2]Then[语句序列2]]…Else[语句序列n]]EndIf例如：If(I-J)0ThenPrint＂IJ＂ElseIf(I-J)=0ThenPrint＂I=J＂ElseIf(I-J)0ThenPrint＂IJ＂ElsePrint＂I,J不能比较＂EndIf魏豪明制作SelectCase语句（1）不带CaseElse子句SelectCase[变量]Case[表达式1][语句1]Case[表达式2][语句2]……Case[表达式n][语句n]EndSelect（2）带CaseElse子句SelectCase[变量]Case[表达式1][语句1]Case[表达式2][语句2]……Case[表达式n-1][语句n-1]CaseElse[语句n]EndSelect魏豪明制作◆一个表达式或用逗号隔开的若干表达式，如：SelectCaseval(t1.Text)Case1,3,5L1.Caption=＂这是奇数＂EndSelect◆表达式1To表达式2，如：SelectCaset1.TextCase1To9L1.Caption=此数是在1到10的范围内EndSelect◆Is关系运算符表达式，如：SelectCaseval(t1.Text)CaseIs=30L1.Caption=＂大于30＂EndSelect魏豪明制作For…Next循环语句2.4.3循环结构语句For循环语句的一般格式为：For[循环变量]=[循环变量初值]To[循环变量终值][Step步长][循环体][ExitFor]Next[循环变量]魏豪明制作例如：Fori=1To10Step1PrintiNextI其中，For语句的作用是控制循环的次数。例如，上例中循环变量“i”的值在循环过程中是不断变化的，它的初值为“1”，终值为“10”，每执行完一次循环体后增值为“1”。运行以上程序，结果如下：12345678910魏豪明制作图2-2For循环语句的执行过程魏豪明制作While…EndWhile循环语句While循环语句的格式如下：While[条件][循环体]EndWhile图2-3While循环的执行过程魏豪明制作例如，计算整数1~10的和。DimSAsIntegerDimIAsIntegerS=0I=1WhileI=10S=S+II=I+1EndWhilePrint＂S=＂,S程序运行结果为：S=55魏豪明制作Do…Loop循环语句（1）Do[循环体]Loop（2）DoWhile[条件][循环体]Loop（3）DoUntil[条件][循环体]Loop（4）Do[循环体]LoopWhile[条件]（5）Do[循环体]LoopUntil[条件]魏豪明制作2.4.4循环嵌套多重循环的执行过程是：外层循环每执行一次，内层循环就从头开始执行一轮。例如：Fori=1To8Forj=1To8Printi*jNextjNexti魏豪明制作2.5数组数组元素2.5.1数组的概念（1）表示方法数组名（P1，P2，…）其中，P1、P2表示元素在数组中的排列位置，称为“下标”。如：A（3，5）代表二维数组A中第3行第5列上的那个元素。（2）数组维数由数组元素中下标的个数决定，一个下标表示一维数组，两个下标表示二维数组。VisualBasic中有一维数组、二维数组、……最多60维数组。魏豪明制作下标下标表示顺序号，每个数组有一个唯一的顺序号，下标不能超过数组声明时的上、下界范围。