VB编程常用代码大全

2022-07-11 06:15:15 文档大全网 [ 字体：小中大 ] [ 阅读： ]

【#文档大全网# 导语】以下是®文档大全网的小编为您整理的《VB编程常用代码大全》，欢迎阅读！
常用,编程,代码,大全
VB编程常用代码大全

1.数值型函数： abs（num）：返回绝对值 sgn（num）： num〉0 1; num=0 0; num〈0 —1;判断数值正负 hex（num）：返回十六进制值直接表示：＆Hxx 最大8位 oct(num）：返回八进制值直接表示：＆Oxx 最大8位 sqr(num）：返回平方根 num>0

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）：num〈255 转换为字节 Csng（str）：转换为单精度数值 Cdbl(str）：转换为双精度数值 Ccur(str）：转换为现金格式

4。时间函数：

date：取系统当前日期 time：取系统当前时间

now：取系统当前时间及日期值 Datetime类型

timer：取当前时间距离零点秒值，计时器，可计算时间差 DateAdd（间隔单位，间隔值，日期）：推算相邻日期

DateDiff（间隔单位，日期一，日期二)：计算时间差日期二-日期一 Datepart（间隔单位，日期）：计算日期的间隔单位值 Dateserial（date）：输出日期值（按序列计算） Timeserial（time）:输出时间值（按序列计算） Datevalue（datetime）：取出字符串中日期值 Timevalue（datetime)：取出字符串中时间值 weekday(date):计算星期几

MonthName（date):输出月分名 year（datetime）：截取年份 month（datetime):截取月份 day(datetime)：截取日

hour（datetime)：截取小时 minute（datetime)：截取分钟 second（datetime）：截取秒

5。其它函数: Array（unit，.。）：动态生成数组

Asc(str)：输出字符串第一个字符的ASCII码

Chr（asc）:转换ASCII为字符 Enter：Chr(13)&Chr(10) Filter（数组名称,关键字符串，[,包含］[,比较方法]）：

将字符串数组中含有关键字符串的元素存成新的数组(默认）［包含］为false则取不包含的元素

oin(ArrayName）:将数组中元素连成字符串 Ubound（ArrayName[,维数］）：取得数组相应维数的上界

Lbound(ArrayName[,维数］):取得数组相应维数的下界一般为0 Randmize n：启动随机数种子 Rnd(n）：取得随机数，n>0或为空，取序列下一随机值，n<0,随机值相同，n=0，生产与上一随机值相同的数

取介于A和B之间的随机正数C,公式：C=Int（（B—A+1）＊Rnd+A）条件（B>A）

子程序和自定义函数

Sub StrSubName Function StrFunName（arg［1］,。.) 子程序体函数体

Exit Sub 中途跳出 Exit Function 中途跳出

End Sub StrFunName＝value 返回值

End Function

[call］ StrSubName 引用子程序 Var=StrFunName（arg[1],。。) 引用函数