Dim response as Integer
//输入数据,保存在response这个变量中
response = Inputbox("Do you want to continue")
Messagebox(response) //弹出输出窗口,显示response这个变量
MsgBox "string" '弹出框
Print "string" '控制台
2.5注释
用'或者Rem来完成单行注释,多行注释用
%Rem
%End Rem
2.6数据类型转换的有关函数
函数
功能
Asc(String)
将字符串转化为ANSI字符代码
CBool(expression)
将表达式转化为布尔型
CByte(expression)
将表达式转化为字节型
CCur(expression)
将表达式转化为货币型
CDate(Strin*)
将字符串转化为日期型
**bl(expression)
将表达式转化为双精度型
Chr(Integer)
返回整数AscII码对象的字符,例如65表示A
Clint(expression)
将表达式转化为整型
CLng(expression)
将表达式转化为长整型
CSng(expression)
将表达式转化为单精度型
CStr(expression)
将表达式转化为字符串
Hex(number)
返回十六进制
Oct(number)
返回八进制
2.7数组
同变量声明一样:
Dim arr as type;
这里,arr可以为:
arr(7) '有7个元素的数组,下标0~6
arr(1 to 7) '下标1到7
ReDim arr(1 to 3) '重新设置数组的边界和维数,用于定义动态数组,
UBound(MyDay,1) '返回数组的上界,1表示若是多维数组,返回第一维的上界
LBound(MyDay) '返回数组的下界 LBound(MyDay,2) '返回数组第2维的下界
UBound与LBound中的整形表示在多维数组的情况下,返回第几维的上下界。
给数组赋值就同java一样,arr(1)= 这里表示第2个元素
2.8列表
List 类型 为1 维的数组
用户可以通过给Dim语句添加List运算符来声明一个列表。
声明:Dim Variablename List as Type
Dim :定义变量
Variablename 列表的名称
List 定义为列表
Type 列表的类型
例子:
Dim PriceList List as Currency
Dim ItemName as String
PriceList(“apple”)=1.05
ItemName=”Oranges”
PriceList(itemname)=1.85
Messagebox PriceList(itemname)
输出结果为:弹出对话框 1.85
3. Lotus Script语句
3.1条件语句
//if语句
//条件为零时视为false 其他任何值都被解释为true
If 条件 Then
...
[ ElseIf condition Then
... ]
[ Else
... ]
End If
//这里相当于java中的switch case
Select Case 表达式
[ Case 1
... ]
[ Case 2
... ]
[ Case Else
... ]
End Select
3.2循环语句
//先判断再做
Do while/until 条件
...
loop
//先做再判断
Do
...
loop while/until 条件
//相当于java中的while
while 条件
...
wend
//增量默认为1
For i = first To last [ Step 增量 ]
...
Next [ i ]
//对数组、列表或集合的每个元素重复执行语句块。
//refVar 容器的引用变量
//container 容器
ForAll refVar In container
...
End ForAll