VB 编程常用代码大全

VB 编程常用代码大全
1.数值型函数：
abs(num): 返回绝对值
sgn(num): num>0 1; num=0 0; num0
int(num): 取整 int(99.8)=99; int(-99.2)=100
fix(num): 取整 fix(99.8)=99; fix(-99.2)=99
round(num,n): 四舍五入取小数位 round(3.14159,3)=3.142 中点数值四舍五入为
近偶取整 round(3.25,1)=3.2
log(num): 取以 e 为底的对数 num>0
exp(n): 取 e 的 n 次幂 通常用 num^n
sin(num): 三角函数，以弧度为值计算 (角度*Pai)/180=弧度 con(num); tan(num);
atn(num)
2.字符串函数：
len(str)：计算字符串长度 中文字符长度也计为一！
mid(str,起始字符,[读取长度])：截取字符串中间子字符串
left(str,nlen)：从左边起截取 nlen 长度子字符串
right(str,nlen)：从右边起截取 nlen 长度子字符串
Lcase(str)：字符串转成小写
精品文档
Ucase(str)：字符串转成大写
trim(str)：去除字符串两端空格
Ltrim(str)：去除字符串左侧空格
Rtrim(str)：去除字符串右侧空格
replace(str,查找字符串,替代字符串,[起始字符,替代次数,比较方法])：替换字符串
注：默认值：起始字符 1；替代次数 不限；比较方法 区分大小写（0）
InStr([起始字符,]str,查找字符串[,比较方法])：检测是否包含子字符串 可选参数需
同时选 返回起始位置
InStrRev(str,查找字符串[,起始字符][,比较方法])：反向检测是否包含子字符串 返
回起始位置
space(n)：构造 n 个空格的字符串
string(n,str)：构造由 n 个 str 第一个字符组成的字符串
StrReverse(str)：反转字符串
split(str,分割字符串[,次数][,比较方法])：以分割字符串为分割标志将字符串转为字
符数组 可选参数需同时选
3.数据类型转换函数：
Cint(str)：转换正数 True -1；False 0；日期 距离 1899/12/31 天数；时间 上午段
0；下午段 1；
Cstr(str)：日期 输出格式 yyyy/mm/dd；时间 输出格式 Am/Pm hh:mm:ss
精品文档
Clng(str)：与 Cin()类似
Cbool(num)：num 不为零 True；反之 False
Cdate(str)：转换日期格式 0：#Am 12:00:00#；正数 距离 1899/12/31 天数的日期；
浮点数 日期＋小数时间
Cbyte(num)：num0 或为空，取序列下一随机值，nA）
子程序和自定义函数
Sub StrSubName Function StrFunName(arg[1],..)
子程序体 函数体
Exit Sub 中途跳出 Exit Function 中途跳出
End Sub StrFunName＝value 返回值
End Function
[call] StrSubName 引用子程序 Var=StrFunName(arg[1],..) 引用函数