资源描述：
《第2章--数据类型、常量、变量及表达式.ppt》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。
1、第2章数据类型、常量、变量及表达式第2页本章主要内容VisualBasic程序的语句数据类型变量与常量常用内部函数运算符和表达式第3页2.1VisualBasic程序的语句第4页2.1.1语句程序是由若干语句组成的,语句是编写程序的指令。Ex：PrivateSubCommand1_Click()dimx,yasintegerx=5y=6Form1.printx-y,x+y,x*y,x/yEndSub第5页语句书写格式：(1)一行也可以书写多个语句，语句之间用冒号分隔。x=5:y=6:printx-
2、y,x+y,x*y,x/y(2)每行最多可以包含255个字符。(3)一条语句可分若干行书写,在本行后加入续行符（空格和下划线）。printx,y,_x+y,x-y(4)不区分大小写字母第6页语句分类：1、定义语句：DimxasInteger’说明变量x为整型数2、可执行语句：x=5y=6printx-y,x+y,x*y,x/y3、注释语句以单引号（’）开头的文字为注释内容。增加程序的可读性第7页2.2数据类型第8页数据是程序的组成部分，也是程序处理的对象.定义变量：dim变量名as数据类型第9页2
3、.2.1基本数据类型数据类型类型名举例整数类型Integer(%)-32768、32767长整型Long(&)87569单精度小数类型Single(!)3.14、-0.009双精度小数类型Double（#）23.1234567887日期类型Date#12/31/2002#字符串类型String($)“1223jgjg”变体类型Variant任意值第10页DimsasintegerS=40Dimnumassinglenum=42.1Dimssasstringss=“welcome”Text1.tex
4、t=ss第11页DimSomeDateAsDateSomeDate=#03/16/2008#SomeDate=#3/16/200813:20#text1.text=SomeDate第12页Variant是缺省类型，是一种通用的、可变的数据类型，它可以表示上述任何一种数据类型。把数据赋予Variant变量，则不必在这些数据的类型间进行转换；VB会自动完成任何必要的转换。Dimaasvarianta=“XYZ”‘变量值为字符串“XYZ”a=17–15‘变量值为数值2a=3.14‘变量值为小数第13页用
5、户自定义数据类型定义格式:type自定义类型名元素名1as类型名元素名2as类型名…元素名nas类型名endtype第14页2.3变量与常量第15页2.3.1变量变量是指在程序运行中，其值可以发生改变的数据。变量名的命名以英文字母开头，其后可以是字母、数字和下划线的组合。Ex判断正误:abca_323dfa(s)中间不能含空格(或标点符号)不得与VisualBasic的保留字(关键字)相同。第16页2.3.2常量1、直接常量数值型常量:32、25.4Dimi%i=15i=&o23‘八进制数i=&H
6、2A‘十六进制数字符串常量:”abcd”日期常量:#3/5/2008#2、符号常量:const符号名=常量值constpi=3.14constr=2.1area=pi*r*r第17页例题:第18页2.4常用内部函数第19页函数是任何一种语言必不可少的部分，VB的函数十分丰富，本节分类介绍常用的内部函数。2.4.1函数的基本概念VB提供了大量的内部函数。在这些函数中，有些是通用的，有些与某些操作有关。大体上可分为：数学函数、字符操作函数、日期和时间函数、转换函数等。第20页Abs(x)返回x的绝对值
7、Text1.text=abs(-4)Log(x)返回x的自然对数a=log(10)Exp(x)返回以e为底、以x为指数的值exSqr(x)返回x的平方根Text1.text=sqr(4)dimaassinglea=sqr(exp(5))sgn(x)返回x的符号sgn(3)=1sgn(0)=0sgn(-3)=-1int(x)返回不大于x的最大整数int(3.9)=3int(-3.4)=-4Sin(x)cos(x)tan(x)Rand()产生一个0~1之间的随机数2.4.2数学运算函数第21页2.4.
8、3字符串函数Left(St,n)取St左边的n个字符Ex:Text1.text=left(“abcdef”,3)Right(St,n)取字符串右边的n个字符Mid(St,m,n)从第m个字符开始取字符串的n个字符Text1.text=mid(“abcdef”,2,4)Replace(St1,St2,St3)主串St1中的St2子串被St3子串替换Ex:text1.text=replace(“Ilikeacat”,”cat”,”dog”)text1.text=“Ilikeadog”S
