1、总体说明:
a) 程序不区分大小写
b) 赋值用= ?String city=“南京”,country ;Integer person[3]={3,8,9};String s = ‘ You got a "job" ‘
c) 代码提示 Design->option->AutoScript->options下面的两项勾上。
d) RETURN语句立即终止事件处理程序或函数的执行,把控制返回到调用程序 HALT语句用于终止应用程序的运行
e) ?可以将一条语句分成几行,这时就需要用到续行符&,将语句串起来。
?例如:
?IF side1 = 5 AND &
side2 = 6 THEN area = 5*7
?相当于
IF side1 = 5 AND side2 = 6 THEN area = 5*7
f) 空值:
?变量被赋予空值的途径有如下两条。
?(1)从数据库中读到空值。
?(2)使用SetNull()函数赋值。
?例1:
?String person // person=""
?SetNull(person) // person值为NULL
?例2:
?Integer x,y,z=2002
?Setnull(y)
?测试变量或表达式是否为空值时,使用函数IsNull
?IF IsNull(a)THEN
g) RUN、
Run("C:\WINDOWS\system32\calc.exe“,normal!)
//这里使用的是Windows XP sp2操作系统
c) 弹出对话框
string ls_text
ls_text = sle_2.text
if ls_text = "" then
MessAgeBox("消息窗口","文本框的内容为空") //为空时显示此内容
else
MessAgeBox("消息窗口",ls_text) //不为空时就显示时面的内容
end if
MessageBox("学生信息","保密资料",Exclamation!,YesNo!)
Int ret
ret=MessageBox("这是一个例子","是否要存盘?",Question!,YesNoCancel!,3)
IF ret=1 THEN
Dw_1.update()
Else
IF ret=2 THEN
RETURN
END IF
END IF
d) 应用退出 Close(Parent)
2、基本语句
1. 单行IF ... THEN语句 IF sle_State.text="BJ" THEN MessageBox("欢迎","北京")
2. 多行IF ... THEN语句
Integer s
s = integer(sle_1.text) //sle_1 text单行编辑框文本
if s>=90 then
St_1.text = “优”
elseif s>=80 then
St_1.text = “良”
elseif s>=70 then
St_1.text = “中”
elseif s>=60 then
St_1.text = “及格”
else
St_1.text = “不及格”
end if
3.CHOOSE CASE
integer f
String s
f = integer(sle_1.text)
CHOOSE CASE f
CASE IS >= 90 // 改进 90 to 100// 用IS代表测试值,后跟关系操作符和比较值,例如:IS> 30
S = "优"
CASE 80 TO 89
S = "良"
CASE 70 TO 79
S = "中"
CASE 60 TO 69
S = "及格"
CASE 0 TO 59
S = "不及格"
CASE ELSE
S = "输入错,请重新输入!"
END CHOOSE
St_1.text = string(S)
4.循环DO …LOOP、FOR …NEXT、GOTO EXIT(退出循环) CONTINUE(继续循环)
integer i=1, s = 0
DO UNTIL i>10
s += i
i ++
LOOP
st_1.text = string(s)
integer i=1, s = 0
DO WHILE i<=10
s += i
i ++
LOOP
st_1.text = string(s)
integer i, s = 0
for i=1 to 10
s += i
next
st_1.text = string(s)
3、
2、取得当前时间
得到当天日期 date lda_today lda_today = today() 得到当前时间 time lt_timelt_time = now() 得到当前日期时间datetime ldt_nowldt_now = datetime(today(),now())