正在加载图片...
如果不需要返回值,则可采用 Msgbox的过程形式 例:产生一个提示窗口,提示用户必须输入1~100之间的整数,窗口中只需一个“确 定”按钮,则实现的语句为: MsgBox"请不要输入超过100的整数”,0+48+0+0,"提示窗口 2.4函数 1.算术运算函数 例:Abs(-8)=8 Sqr(25)=5 Sgn(-8)=-1 Fix(3.57)=3 Fix(-3.57)=-4 Int(3.57)=3 Int(-3.57)=-4 Exp (3) Log (3)=Ln (3) 2.字符串函数 例:Len(“ World”)=5 Left(“ Hello”,2)=“He” Right c String(3,“*”)=“***” InStr(“abc",“ab”) InStr(1,“ pretty",“re”)=2 Lcase(“ World”)=“ world” Chr(65)=“A Str(65)=“65” Asc(“A”)=65 3.日期与时间函数 例:使用 Weekday函数将日期转换为星期几。 程序代码如下: im MyDate, My WeekDay dAte=#08/16/2000# My WeekDay= Weekday( MyDate)' My WeekDay的值为4,因为 My Date是星如果不需要返回值,则可采用 MsgBox 的过程形式。 例:产生一个提示窗口,提示用户必须输入 1~100 之间的整数,窗口中只需一个“确 定”按钮,则实现的语句为: MsgBox 请不要输入超过 100 的整数,0+48+0+0 , 提示窗口 2.4 函数 1. 算术运算函数 例:Abs(-8)=8 Sqr(25)=5 Sgn(8)=1 Sgn(0)=0 Sgn(-8)=-1 Fix(3.57)=3 Fix(-3.57)=-4 Int(3.57)=3 Int(-3.57)=-4 Exp(3)=e 3 Log(3)=Ln(3)。 2. 字符串函数 例:Len(“World”)=5 Left(“Hello”,2)=“He” Right(“Something”,3)=“ing” String(3,“*”)=“***” InStr(“abc”,“ab”)=1 InStr(1,“pretty”,“re”)=2 Ucase(“World”)=“WORLD” Lcase(“World”)=“world” Chr(65)=“A” Str(65)=“65” Asc(“A”)=65。 3. 日期与时间函数 例:使用 Weekday 函数将日期转换为星期几。 程序代码如下: Dim MyDate, MyWeekDay MyDate = #08/16/2000# MyWeekDay = Weekday(MyDate)  MyWeekDay 的值为 4,因为 MyDate 是星 期三
<<向上翻页向下翻页>>
©2008-现在 cucdc.com 高等教育资讯网 版权所有