vb课件第三章visual basic语言基础

1、第3章 Visual Basic语言基础 主要内容数据类型常量与变量运算符和表达式内部函数综合应用数据类型数据类型关键字类型符占用字节数范围字节型byte无10255逻辑型Boolean无2True与False整型integer%2-3276832767长整型long&4-2，147，483，6482，147，483，647单精度型single!4负数：-3.402823E38-1.401298E-45正数：1.401298E-453.402823E38双精度型double#8负数：-1.79769313486232D308-4.94065645841247D-324 正数：4.9406564

2、5841247D-3241.79769313486232D308货币型currency8-922，337，203，685，477.5808922，337，203，685，477.5807日期型date(time)无801，01，10012，31，9999字符型string$与字符串长度有关065535个字符对象型object无4任何对象引用变体型variant无根据需要分配数值类型整型（Integer）:类型符%,十六进制&H,八进制&O长整型（Long）:类型符&单精度型（single）:类型符! , 如163.7!，1.637E+2!,或1637e-1!。 双精度型(double）:类型符

3、#货币型（currency）:类型符字节型（byte） 声明类型时注意、如果数据中包含小数，则应使用single、double或currency型。2、数值型数据都有一个有效范围值，如果超出规定的范围，将会 “溢出” 。字符型数据 (string$)字符两侧用双引号” ”括起 ”表示空字符串，而” ”表示的是有一个空格的字符串Print ”计算机”ABC” 会出现什么结果什么类型的数据需要定义为字符型?日期型通常用两个“#”符号把表示日期和时间的值括起来。逻辑型数据（Boolean） 它只有两个值：True和False 逻辑数据转换成整数数据，True将转换为 1，False转换为0； 如pr

4、int 123+True其他数值类型转换为逻辑型数据时，非0数转换为True，0转换为False 如if 1 then print “OK” 变体型数据（Variant） 变体型数据是一种可变的数据类型，可以存放任何类型的数据是所有未定义的变量的默认数据类型可用系统函VarType( ) 确定实际是何数据类型 3.2 常量和变量命名规则变量常量命名规则以字母或汉字开头，由字母、汉字、数字或下划线“_”组成，其组成字符不超过255个。不能直接使用VB中的系统关键字、属性名、对象名、过程或函数方法名，如Form、Text、If等；但可以把关键字嵌入常量名或变量名中使用，如Form_IF为合法变量名

5、。不能包含句号、空格或者类型声明符（$，%，#）等。 常量(不变的量 )直接常量: 如123,123&,123.45,1.234E2,123D3, &O123,&HABCD,&H1234, “vb”, True , #03/22/1998# , #10:12:30# 符号常量:方便修改程序;容易理解1.Const PI = 3.14 2.Const MAX_STU = 60常量系统常量: Form1.backcolor = vbblack相当于 Form1.WindowsState =0那个容易理解?变量内存区域，内容在程序运行过程中是可变的，变量名就是内存单元的地址的别名.变量声明Dim 变

6、量名 as 类型 或 Dim 变量名+类型符如Dim age as integer 或 Dim age% Dim Name as String*30 变量的隐式声明VB允许不声明就使用变量.优点:方便缺点: 程序写错或变量名写错之后,VB不会报错,而以为是一个新的变量名.建议:变量先声明后使用,在通用声明段添加Option Explicit语句.变量的赋值使用赋值语句: 变量名表达式 赋值语句的作用：先计算右边表达式的值，然后将值赋给左边的变量。 A=A+1A=B=1,结果是什么?注意赋值类型的一致.Text1.fontSize = “三号”对吗?Text1.Text = 1对吗?系统类型的转

7、换其他类型都可以转换为字符类型系统将字符类型转换为数值类型,可能会出错,如 text2 = 2*3.14*text1.3.3运算符和表达式 运算符 算术运算符、关系运算符、字符串运算符、逻辑运算符四类 表达式算术运算符VB 中的算术运算符。设例中的变量ia=3运算符名运算符优先级例子结果乘方1ia29负号-2-ia-3乘号*3ia*26除号/34/ia1.33333333333333整除4431取余数Mod510 mod ia1加法+62+ia5减法-6Ia-4-1算术运算符表中的运算优先级除法运算有两种： / ： 一般除法，运算结果一般为双精度数。如：7/3=2.3333333 ： 整除，整

8、数除法，结果为整数，不考虑四舍五入。如：206=3Mod运算符是求两数相除后的余数。例如： 2 Mod 7 结果为2 8.6 Mod 3 结果为0，先把8.6四舍五入，再算 25.63 Mod 5.2 结果为1，把两边都四舍五入再算也经常用作开方，例如，9(1/2) ,结果为3。字符串运算符 “ ” 、“ + ” 相同点:”郑州大学” & “计算中心”,结果:”郑州大学计算中心”“abc” +”123” 结果：”abc123”不同点: ”+”两边同时是字符串时,才做字符串连接符,否则是算术运算符.Text1.text + Text2.text, 1+ “1”,1 & 1注意左右必须有空格123

9、 + 12 结果为 “12312”，两边都是字符串，那么连接运算123 & 12 结果为 “12312”，&就一个功能，连接运算“123” + 12 结果为135abc + 12345 出错“abc” & 12 结果为：“abc12”123 + 12 结果为：135123 & 12 结果为：”12312”123 +”12” & 100结果为：”135100” 关系运算符 运算符意义例子结果=等于“abc”=”a”Faslse大于“ab”ac”False=大于或等于“d”=”ab”True小于12True=小于或等于“12”=”3”True不等于“a”A”trueLike字符串匹配“abcde”

10、 like “*cd*”trueIs比较关系运算符VB中布尔型比较True 小于False ；汉字字符大于西文字符；数值型按照大小直接比较如果两个操作数是英文字符型，则按字符的ASCII值从左到右一一比较。如果两边是汉字，按拼音顺序比较，拼音在前的，反而大 Print “男” “女”逻辑运算符运算符意义优先级说明例子结果Not取反1如果操作数为false,则结果为true如果操作数为true,则结果为falsenot Falsenot trueTrueFalseAnd与2只有两个操作数的值都是true，则结果是true，否则结果就是falseTrue and trueTrueOr或3只要两个操

11、作数中有一个值是true，则结果就是trueTrue or falseTrue逻辑运算符优先级:not and or也可用于二进制3 and 700110111-0011表达式 由运算符将常量、变量、函数，以及括号按照一定的规则连接起来的式子即为表达式.最简单的表达式就一个常量或一个变量。表达式的结果是个值，有类型书写规则乘号不能省略。例如,x乘以y，应写成x*y；不能使用方括号或花括号，只能用圆括号。圆括号可以出现多个，但要逐一配对。表达式从左至右在同一基准上写，无高低、大小之分。 例如：要表示一种关系：大于等于2且小于8的数。正确的VB表达式： 2=x And x 8错误的VB表达式： 2

12、=x 括号 算术运算符 字符运算符 关系运算符 逻辑运算符 例：选拔身高T超过1.7米且年龄W小于25岁的人，表示该条件的逻辑表达式为： （T=1.7）AND（W=25）例：选拔优秀生的条件为：年龄(Age)小于19岁，三门课总分(Total)高于285分，其中有一门课（mark1mark2mark3）为100分，其表达式写为：Age285 And ( Mark1=100 Or Mark2 =100 Or Mark3=100 ) 3.4 内部函数 内部函数是vb系统为实现一些特定的功能而而预先编制好的一段程序代码 可分为数学函数、转换函数、字符串函数、日期函数和格式输出函数。数学函数 函数名含

13、义例子结果Abs(N)取绝对值Abs(-3.5)3.5Cos(N)余弦函数Cos(0)1Exp(N)e为底的指数函数，即eNExp(3)20.086Log(N)以e为底的自然对数Log(10)2.3Rnd(N)产生随机数Rnd0-1)之间的数Sin(N)正弦函数Sin(0)0Sgn(N)符号函数Sgn(-3.5)-1Sqr(N)平方根Sqr(9)3Tan(N)正切函数Tan(0)0数学函数在三角函数中，参数用的是弧度值表示 Sqr的自变量不能是负数 Rnd的结果为0,1)如何使用Rnd产生一个16范围之间的整数？ int(rnd*6+1)公式：Int(rnd*范围基数）为了避免每次产生的随机序列相同，在Form_Load事件中使用Randomize产生新的序列字符串函数 VB中字符串长度是以字(习惯称字符)为单位，也就是每个西文字符和每个汉字都作为一个字，占两个字节。 Trim，Ltrim，RTrimLeft，Right，Mid，mid（“abcdef”,3)结果？Len，LenBSpace5,String“AB”,2StrReverse,转换函数 Asc，ChrHex，OctLCase，UCaseStr，Val ： val(“3a”), len(str(1)Fix,Int,Round: Fix(-