admin 管理员组

文章数量: 887021


2023年12月22日发(作者:绿盟漏洞扫描设备)

VB编程常用代码大全

1.数值型函数:

absnum: 返回绝对值

sgnnum: num>0 1; num=0 0; num<0 -1;判断数值正负

hexnum: 返回十六进制值 直接表示:&Hxx 最大8位

octnum: 返回八进制值 直接表示:&Oxx 最大8位

sqrnum: 返回平方根 num>0

intnum: 取整 int=99; int=100

fixnum: 取整 fix=99; fix=99

roundnum,n: 四舍五入取小数位 round,3= 中点数值四舍五入为近偶取整

round,1=

lognum: 取以e为底的对数 num>0

expn: 取e的n次幂 通常用 num^n

sinnum: 三角函数,以弧度为值计算 角度Pai/180=弧度 connum; tannum;

atnnum

2.字符串函数:

lenstr:计算字符串长度 中文字符长度也计为一

midstr,起始字符,读取长度:截取字符串中间子字符串

leftstr,nlen:从左边起截取nlen长度子字符串

rightstr,nlen:从右边起截取nlen长度子字符串

Lcasestr:字符串转成小写

Ucasestr:字符串转成大写

trimstr:去除字符串两端空格

Ltrimstr:去除字符串左侧空格

Rtrimstr:去除字符串右侧空格

replacestr,查找字符串,替代字符串,起始字符,替代次数,比较方法:替换字符串

注:默认值:起始字符 1;替代次数 不限;比较方法 区分大小写0

InStr起始字符,str,查找字符串,比较方法:检测是否包含子字符串 可选参数需同时选 返回起始位置

InStrRevstr,查找字符串,起始字符,比较方法:反向检测是否包含子字符串 返回起始位置

spacen:构造n个空格的字符串

stringn,str:构造由n个str第一个字符组成的字符串

StrReversestr:反转字符串

splitstr,分割字符串,次数,比较方法:以分割字符串为分割标志将字符串转为字符数组 可选参数需同时选

3.数据类型转换函数:

Cintstr:转换正数 True -1;False 0;日期 距离1899/12/31天数;时间 上午段

0;下午段 1;

Cstrstr:日期 输出格式 yyyy/mm/dd;时间 输出格式 Am/Pm hh:mm:ss

Clngstr:与Cin类似

Cboolnum:num不为零 True;反之 False

Cdatestr:转换日期格式 0:Am 12:00:00;正数 距离1899/12/31天数的日期;浮点数 日期+小数时间

Cbytenum:num<255 转换为字节

Csngstr:转换为单精度数值

Cdblstr:转换为双精度数值

Ccurstr:转换为现金格式

4.时间函数:

date:取系统当前日期

time:取系统当前时间

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

timer:取当前时间距离零点秒值,计时器,可计算时间差

DateAdd间隔单位,间隔值,日期:推算相邻日期

DateDiff间隔单位,日期一,日期二:计算时间差 日期二-日期一

Datepart间隔单位,日期:计算日期的间隔单位值

Dateserialdate:输出日期值按序列计算

Timeserialtime:输出时间值按序列计算

Datevaluedatetime:取出字符串中日期值

Timevaluedatetime:取出字符串中时间值

weekdaydate:计算星期几

MonthNamedate:输出月分名

yeardatetime:截取年份

monthdatetime:截取月份

daydatetime:截取日

hourdatetime:截取小时

minutedatetime:截取分钟

seconddatetime:截取秒

5.其它函数:

Arrayunit,..:动态生成数组

Ascstr:输出字符串第一个字符的ASCII码

Chrasc:转换ASCII为字符 Enter:Chr13&Chr10

Filter数组名称,关键字符串,,包含,比较方法:

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

oinArrayName:将数组中元素连成字符串

UboundArrayName,维数:取得数组相应维数的上界

LboundArrayName,维数:取得数组相应维数的下界 一般为0

Randmize n:启动随机数种子

Rndn:取得随机数,n>0或为空,取序列下一随机值,n<0,随机值相同,n=0,生产与上一随机值相同的数

取介于A和B之间的随机正数C,公式:C=IntB-A+1Rnd+A 条件B>A

子程序和自定义函数

Sub StrSubName Function StrFunNamearg1,..

子程序体 函数体

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

End Sub StrFunName=value 返回值

End Function

call StrSubName 引用子程序 Var=StrFunNamearg1,.. 引用函数


本文标签: 字符串 数组 字符 时间 转换