自定义常量格式:对象浏览器Const ~ =~ 例如Const pi = 3.1415926(圆周率) 变量Declare 变量名 As 类型Declare:Dim(自动变量)、Static(静态变量及数组变量)、Redim、Public或者Private(不区分大小写)类型:String(字符串)、类型说明符:%整数 &长整数 !单精度浮点数 #双精度浮点数 @货币型 $字符串型 变量的作用域: 局部变量 过程 过程中 Dim、Static 模块变量 窗体模块或标准模块 模块的声明部分 Dim、Private 全局变量 整个应用程序 标准模块的声明部分 Public、Globla 常用的内部函数 一:转换函数 二:数学函数 三:日期函数 四:时间函数 五:随机数函数 转换函数
1int(X):求不大于自变量X的最大整数2fix(X) 去掉浮点数的小数部分,保留其整数部分3hex$(X)把一个十进制数转换为十六进制数4OCT$(X)把一个十进制数转换为八进制5asc(x$)返回字符串X$中第一个字符的ASCLL字符6chr$(X)把X的值转换为相应的ASCLL字符7str$(X)把X的值转换为一个字符串8cint(x)把X的小数部分四舍五入,转换为整数{9cour(x)把X的值转换为货币类型值,小数点最多保留4位且自动四舍五入10cdbl(X)把X的值转换为双精度数11CLng(x)把X的小数部分四舍五入转化为长整数12CSng(X)把X的值转换为单精度数13Cvar(X)把X的值转换为变体类型值} 数据类型转换函数 数学函数
1Sin(X):返回自变量X的正弦值 ----X以角度出现,不是弧度,所以要转换(1度=圆周率/180=3.1415926/180----print sin (X * 3.1415926/180)2Cos(X):返回自变量X的余弦值3tan(X):返回自变量X的正切值4Ata(X):返回自变量X的反切值
5Abs(X):返回自变量X的绝对值6Sgn(X):返回自变量X的符号,即当X为负数时,返回-1;X=0时,返回0;X=整数时,返回1
7Sqr(X):返回自变量X的平方根,X必须大于或等于08Exp(X):返回以e为底,以X为指数的值,即求E的X次方 日期时间和随机函数
1Day(now):返回当前的日期2WeekDay(now):返回当前的星期3Month(now):返回当前的月份4Year(now):返回当前的年份5Hour(now):返回小时(0~23)6Minute(now):返回分(0~59)7Second(now):返回秒(0~59) 随机函数
Rnd【(x)】:产生一个0~1之间的单精度随机数 10 * rnd 0~10
字符处理和字符串函数
Unicode方式:一个英语和汉字1个字符 2个字节1个英语和汉字1个字符 2个字节len () lenB()字节
ANSI方式:一个英文占半个字符 1个字节,一个汉字占1个字符2个字节?len(Strconv("",vbformunicode))?lenB(Strconv("",vbformunicode)新字符串=Strconv(待转换字符串,转换格式) 字符串函数
1删除空白字符函数(1)Ltrim(字符串)去点字符串左边的空白字符 (2)Rtrim(字符串)去掉字符串右边的空白字符(3)Trim(字符串)去掉字符串两边的空白字符a$=" hellow,word!!! "b=ltrim(a)c=rtrim(a)d=trim(a)?b;dhellow,word!!! hellow,word!!!?c;d hellow,word!!!hellow,word!!!?b;chellow,word!!! hellow,word!!!
2截取函数1)Left(字符串,N)返回字符串中的前N个字符2)Mid(字符串,p,n)从字符串的第p个字符开始,向后截取n个字符 n可以省略3)Right(字符串,n)返回字符串中的后n个字符a$="abcdef"?left(a,3)abc?mid(a,2,3)bcd?right(a,4)cdef3字符长度len(字符串或变量)a$="abcdef"?len(A) 6 ?len(bb#) 8 ?len(aa!) 4 4string函数,用来由N个指定字符组成的字符string(n,ASCCL码)string(n,字符串)?string(4,65)AAAA?string(5,"a")aaaaaa$="abcdef"?string(5,a)aaaaa5Space(n)函数,用来返回n个空格?space(5)"我爱你!!!" 我爱你!!!6Ucase(字符串)转换成大写 Lcase(字符串)转换成小写7字符串匹配(InStr)函数格式InStr([首字符位置,]字符串1,字符串2,[,n])a$="欢迎使用VB编程"?instr(a,"VB") 5 ?instr(a,"vb") 0 8插入字符语句Mida$="欢迎使用VB编程"mid(a,3)="学习"?a欢迎学习VB编程