Dim aStr $ '定义一个字符串变量
aStr $="This is a string"
系统函数:
Now 返回系统日期/时间 例:2009-4-22 8:29:33
Time 返回当前时间 例:8:32:15
字符串函数:
①删除空白字符函数Trim $();LTrim $();RTrim $();
②字符串截取函数:Left $(字符串,n) ;Mid $(字符串,p,n) ;其中从第p个字符开始,向后截取n个字符.;Right $(字符串,n)
③String $(n,ASCII码);String $(n,字符串)
****************************************************************************************************************************
例:a $=string $(5,65) c $=string $(5,abcde)
print a$ ;c$
AAAAAaaaaa
****************************************************************************************************************************
空格函数Space $(n)
例: a $="a"+Space(4)+"b" 结果:a b
字符串匹配函数InStr([ 首字符位置] 字符串1,字符串2[,n]) '判断文本框中是否输入了某个字符串
例: a $ ="Microsoft Visual Basic"
x=InStr(a $ ,'Visual')
结果:11 '字符串2的第一个字符v 位于字符串1的第11个字符处
Sheel函数异步调用应用程序,执行成功后返回一个任务表识
例:proID=Sheel("c;\Program Files\ACD Systems\acdsee.exe",3)
Format函数:
例:Print Format $ (.257,"00.0%")
结果:25.7%
private sub form_click()
msg1 $ ="请输入姓名:"
msgtitle $="学生情况登记"
msg2 $="请输入"
来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/28311102/viewspace-748360/,如需转载,请注明出处,否则将追究法律责任。
转载于:http://blog.itpub.net/28311102/viewspace-748360/