第3章 VB程序设计代码基础

第三章VB程序设计代码基础1第3章VisualBasic程序设计代码基础▲本章要点:字符集数据类型常量、变量常用内部函数运算符与表达式第三章VB程序设计代码基础23.1字符集1.字符集使用Unicode字符集，其基本字符集包括:数字:0~9英文字母:a~z，A~Z特殊字符:空格！#$%&'()*+-/\^，.:;=?@[]_{}|~等。2.关键字关键字又称为保留字VB自动将关键字的首字母转换为大写字母例如:PRINT5+6转换成Print5+6第三章VB程序设计代码基础33.2数据类型基本数据类型：数值型字符串型布尔型日期型用户自定义的数据类型基本数据类型分为第三章VB程序设计代码基础43.2.1数值型数据Integer(整型)Long(长整型)Single(单精度浮点型)Double(双精度浮点型)Currency(货币型)Byte(字节型)第三章VB程序设计代码基础51.整数类型(1)整型(Integer)以2个字节存储十进制表示:由+-号，0~9组成范围:-32768~32767八进制表示:以&O开头，由0~7组成范围:&O0~&O177777十六进制表示:以&H开头，由0~9,A~F组成范围:&H0~&HFFFF例:-325056+100&O456&O36&H1AC&H38&H2第三章VB程序设计代码基础6(2)长整型(Long)以4个字节存储十进制表示:由+-号，0~9组成范围:-2147483648~+2147483647八进制表示:以&O开头，以&结束范围:&O0&~&O37777777777&十六进制表示:以&H开头，以&结束范围:&H0&~&HFFFFFFFF&例:453466-34568+1000000&O456&&O36&&H1AC&&H38&&H2&第三章VB程序设计代码基础72.实数类型浮点数采用IEEE格式,由尾数及指数组成:[±]...[....][E|D][±](1)单精度浮点型(Single)以4个字节存储，可以精确到7位十进制数例:3.234E+2表示3.234102-28E9表示-281094.56E-17表示4.5610-17(2)双精度浮点型(Double)以8个字节存储，可以精确到16位3.234D+2表示3.234102-28D9表示-281094.56D-17表示4.5610-17尾数部分指数部分e|d第三章VB程序设计代码基础8(3)货币型(Currency)以8个字节存储用于表示定点数，其小数点左边有15位数字，右边有4位数字。3.字节型(Byte)用于存储二进制数据，其取值范围为0~255。第三章VB程序设计代码基础93.2.2字符串型数据(String)由括起来的一串符号例:abcABC计算机12.343+2(空串)如果字符串本身包括双引号，可用连续两个双引号表示。例:要打印以下字符串：Youmuststudyhard,hesaid.在程序中需要将该字符串表示成:Youmuststudyhard,hesaid.3.2.3布尔型数据(Boolean)用于进行逻辑判断，只有True和False两个值第三章VB程序设计代码基础103.2.4日期型数据(Date)用于表示日期和时间格式:#……#VB接受许多种日期时间格式例:下面的Date/Time值全部有效。#3-6-9313:20##March27,19931:20am##Apr-2-93##14April1993##12/18/1999#3.2.5对象型数据(Object)以4个字节存储，用于引用程序中的对象。3.2.6可变类型数据(Variant)可以包含任何类型的数据。可以包含Empty、Error、及Null等特殊值第三章VB程序设计代码基础11*3.2.7枚举类型（自学）3.2.8用户自定义类型是用户自己定义的类型，这种类型可以包含多个基本类型。例如，可以定义一个Students数据类型，该类型中的每一个数又包含了学生的班级、学号、姓名、成绩信息。定义格式为：PrivateTypeStudentsClassAsString'班级NoAsString'学号NameAsString'姓名ScoreAsInteger'成绩EndType第三章VB程序设计代码基础123.3常量指在程序运行期间其值不发生变化的量。两种形式:直接常量；符号常量3.3.1直接常量例:欢迎使用VisualBasic字符串常量12345数值型常量True布尔型常量#11/10/2001#日期型常量3.3.2用户自定义符号常量格式:Const常量名[As类型]=表达式类型:IntegerLongSingleDoubleStringString*nBooleanDateCurrencyByteVariant第三章VB程序设计代码基础13例:ConstPi=3.14159ConstMaxAsInteger=9ConstBirthDate=#1/1/01#ConstMyString=friend'用逗号分隔多个常量声明ConstPi=3.14,Max=9,MyStr=Hello'用先前定义过的常量定义新常量ConstPi2=Pi*2使用:在程序中引用如:AREA=Pi*R^2在程序中不可修改如:Pi=3.14第三章VB程序设计代码基础14VB内部已定义，可以直接使用的常量查看内部常量:视图→对象浏览器→选择库、类、成员如:库VBRUN类ColorConstantsShapeConstants成员VbredvbShapeCircle例:PrivateSubForm_Activate()ConstAAsString=各种常量的使用Form1.BackColor=vbGreenForm1.ForeColor=vbRedForm1.FontSize=14PrintAEndSub3.3.3系统定义符号常量第三章VB程序设计代码基础153.4变量程序执行期间，用变量临时存储数值。变量的值可以发生变化。每个变量都有名称和数据类型。2.变量的命名规则第一个字符必须是字母长度不超过255个字符不可以包含小数点或者内嵌的类型声明字符不能使用关键字不能与过程名或符号常量同名例:intMaxstrNameStudent1MyName不区分大小写；变量名应便于识别、记忆…5A1.什么是变量？一个有名称的内存单元称为变量。第三章VB程序设计代码基础163.变量的声明(1)声明变量格式:Dim|Private|Public|Static变量名[As类型]Dim:在窗体模块、标准模块或过程中声明变量。Private:在窗体模块或标准模块中声明变量，使变量仅在该模块中有效。Public:在标准模块中声明全局变量，使变量在整个应用程序中有效。Static:在过程中定义静态变量，即使该过程结束，也仍然保留变量的值。第三章VB程序设计代码基础17例:DimSumAsLongDimAddressAsStringDimNoAsString*8PrivatebAsIntegerDimNum,TotalAsInteger'Num为可变类型PublicAverageAsSingleStaticAAsLong(2)隐式声明可变类型。易出错、浪费空间(3)强制显式声明在模块的声明段中使用语句:OptionExplicit如果设置:工具→选项→编辑器→要求变量声明则在后续模块中自动插入OptionExplicit第三章VB程序设计代码基础18例:窗体模块和过程中使用Dim语句的区别。设在窗体中放置按钮Command1和Command2DimaAsIntegerPrivateSubCommand1_Click()a=a+10PrintaEndSubPrivateSubCommand2_Click()a=a+15PrintaEndSub观察程序运行结果将DimaAsInteger放到过程内，观察运行结果。第三章VB程序设计代码基础19例:Staic的作用。设在窗体中放置按钮C1PrivateSubC1_Click()StaticaAsIntegera=a+10PrintaEndSubPrivateSubC1_Click()DimaAsIntegera=a+10PrintaEndSub运行时，多次单击命令按钮C1，比较以上两个事件过程的执行效果第三章VB程序设计代码基础203.5常用内部函数函数形式:函数名[(参数表]参数：常量、变量或表达式。若有多个参数，参数之间以逗号分隔。函数值：也叫“返回值”函数的使用：函数在表达式中被调用。函数分类内部函数用户自定义函数第三章VB程序设计代码基础21例:Fix(45.67)结果为45Int(45.67)结果为45Fix(-2.89)结果为-2Int(-2.89)结果为-3Abs(-4)结果为4Log(10)结果为2.30258509299405Sgn(3)结果为1Sgn(-6)结果为-1Sgn(0)结果为0例:求sin300Sin(a*3.14/180)3.5.1数学函数第三章VB程序设计代码基础22例:判断一个整数Y能否被另一个整数X整除如果INT(Y/X)=Y/X则整除例:常用对数log10X的求法用换底公式log10X=Ln(X)/Ln(10)即LOG(X)/LOG(10)例:求e3正确:EXP(3)错误:e^3(错)第三章VB程序设计代码基础23例:LTrim(∪∪∪ABC)结果为ABC表示空格RTrim(ABC∪∪∪)结果为ABCTrim(∪∪∪ABC∪∪∪)结果为ABCLeft(ABCDE,2)结果为ABRight(ABCDE,2)结果为DEMid(ABCDE,2,3)结果为BCDMid(ABCDE,2,6)结果为BCDELen(ABCDE)结果为5String(3,ABC)结果为AAAString(3，65)结果为AAAInStr(ABCDECDE,DE)结果为4InStr(5,ABCDECDE,DE)结果为7UCase(Abc)结果为ABCLCase(ABc)结果为abc3.5.2字符串函数第三章VB程序设计代码基础241.随机函数Rnd[(x)]产生[0,1)之间的单精度随机数。x0:每次使用x作为随机数种子得到相同的结果。x0:以上一个随机数作种子，产生序列中的下一个随机数。x=0:产生与最近生成的随机数相同的数。省略x:同x02.Randomize语句初始化随机数发生器，格式：Randomize[n]n:种子，省略时以系统时间作为种子3.5.3随机函数第三章VB程序设计代码基础25生成[a,b]范围内的随机整数Int((b-a+1)*Rnd+a)例：生成[1,99]之间的随机整数的表达式为：Int(99*Rnd+1)例：生成(1,99)之间的随机整数的表达式为：Int(97*Rnd+2)第三章VB程序设计代码基础26例:Asc(A)结果为65Asc(ABC)结果为65Chr(65)结果为AStr(123)结果为∪123Str(-123)结果为-123Val(123)结果为123Val(123AB)结果为123Val(.123AB)结果为.123Val(a123AB)结果为0Val(12E2ABC)结果为12003.5.5日期和时间函数自学:P503.5.4转换函数第三章VB程序设计代码基础27例:Format(123.45,0000.000)结果为0123.450Format(123.45,0.0)结果为123.5Format(123.45,####.###)结果为123.45Format(123.45,#.#)结果为123.5Format(0.123,.##)结果为.12Format(0.123,0.##)结果为0.12Format(HELLO,)结果为helloFormat(Thisisit,)结果为THISISIT注:经Format函数格式化后的结果为字符串类型例:Format(123)+Format(456)结果为123456区别:Str(123)+St