【文档说明】PowerBuilder实用教程第2章-PowerScript语言课件.pptx,共(89)页,38.578 MB,由小橙橙上传
转载请保留链接:https://www.ichengzhen.cn/view-7198.html
以下为本文档部分文字说明:
——PowerScript基础第2章PowerScript语言PowerBuilder实用教程(第5版)目录注释01注释PowerScript提供了如下两种加注释的方法,通过注释可以进一步提高程序的可读性。(1)单行注释用“//”。从双斜杠开始到行
尾均为注释。(2)多行注释用“/**/”。从/*开始到*/结束均为注释。例如://这是一个计算器程序Decimaladd1//add1表示中间结果Charop//op表示按下的运算符/*flag=1表示按下的
数字是前面数字的一部分flag=0表示按下的数字是一个新的数字的开始*/Intflag目录标识符02标识符(1)必须以字母或下划线开头。(2)由字母、数字、下划线_、短横线-、$、#、%组成。(3)不能是PowerScri
pt保留字。(4)不区分大小写(但若用于Web、UNIX等环境时必须区分大小写)。(5)最长40个字符。标识符的命名规则如下。标识符例如:下面是一组正确的标识符:rv//返回值f_add//函数Button#1//按钮1_SpecialID//以下划线开头下面的标识符写法
是错误的:Totalbook//标识符中间不能有空格THIS//误用保留字THISabc>def//标识符中间有非法字符2x//以数字开头目录续行符03续行符如果行尾的字符恰好是&,则下一行自动是本行的继续行。例如:IFside1=5AND&si
de2=6THENarea=5*7//相当于IFside1=5ANDside2=6THENarea=5*7注意,不能在标识符或保留字的中间续行。目录特殊字符04特殊字符字符串中可以包括特殊的ASCII字符,它们不能使用常规的输入方法直接
输入,需要使用其他字符来代替。常用的特殊字符见表2.1。字符功能~n换行~r回车~t制表符~'单引号'~''双引号''~~波浪号~~000到~255十进制形式的ASCII所代表的字符~h00到~hFF十六进制的ASCII所代表的字符~o00到~o377八进制的ASCII所代表的字
符。这里是字母o,不是数字0特殊字符【例2.1】特殊字符的使用。首先参照第1.2.2小节“无窗口的简单应用程序”部分创建工作空间和应用程序,然后在PowerBuilder应用程序的“Open”事件脚本编辑区编写脚本://显示一名学生的相关信息
MessageBox("学生信息","~n姓名~t性别~t专业名"+&"~n刘敏~t男~t计算机科学与技术")运行后的结果如图2.1所示。目录空值05空值空值既不是零,也不是非零的任何数值。变量被赋予空值的途径有如下两种方法。(1)从数据库中读到空值。(2)使用Set
Null()函数赋值。例如:Stringperson//person=""SetNull(person)//person值为NULL测试变量或表达式是否为空值时,使用IsNull()函数,而不是直接使用关系表达式。例如,
假设a是一个变量,要测试它是否为空值,可以这样写:——数据类型第2章PowerScript语言PowerBuilder实用教程(第5版)目录标准数据类型01标准数据类型标准数据类型包括数值型、字符型、日期型和布尔型等一些最基本的数据类型。其名称、含义及示例见表2.2。数据类型
含义示例Blob二进制大对象,用于处理图像、大文本等Boolean布尔型,只有两个可能的值:True或FalseTrueCharacter或Char单个ASCII字符"y"String字符串类型,用于存储任意的
ASCII字符"computer~r~nbook"Date日期,包括年(1000~3000)、月(01~12)、日(01~31)2000-09-10Time时间,包括小时(00~23)、分(00~59)、秒(00~59)及秒的小数位(最多6位),范围从00:00:00到23:59
:59:99999918:45:27Datetime日期及时间2000-09-1019:30:25Decimal或Dec带符号十进制数,最大18位精度123.45Double带符号浮点数,15位有效数字,范围为2.2e-308~1.7e+3083.52e19Integer或Int16位带符号整
数,范围为-32768~+32767-618Long32位带符号整数,范围为-2147483648~+214748364712345678Real带符号浮点数,精度为6位3.14UnsignedInteger或UnsignedInt或UI
NT16位无符号整数,范围为0~65535868UnsignedLong或Ulong32位无符号整数,范围为0~429497629581648目录枚举类型02枚举类型【例2.2】枚举类型的使用。首先创建工作空间和应用程序,然后在Powe
rBuilder应用程序的“Open”事件脚本编辑区编写“应用”的脚本:MessageBox("学生信息","保密资料",Exclamation!,YesNo!)其运行后的结果如图2.2所示。——变量声明及作用域第2章PowerScript语言PowerBuilder实
用教程(第5版)目录变量声明01变量声明在PowerBuilder中,除系统预定义的五个全局变量外(SQLCA、SQLDA、SQLSA、Error、Message),其他所有变量在使用之前,都要首先予以声明。格式:数据类型变量名{=
初值}变量被声明后,若未指定初值,则系统将赋以默认值。对数值型变量而言,其默认值为零。对字符型变量而言,其默认值为空字符或空串("")。例如:Integeri//定义一个整型变量iReala,b,c//定义三个实型变量a,b,cStringmy_home//定义一个字符串变量
my_home变量声明【例2.3】计算平方根。首先创建工作空间和应用程序,然后在PowerBuilder应用程序的命令按钮“Clicked”事件脚本编辑区编写“计算平方根”的脚本://不同类型变量之间的转换Integernn=Int
eger(sle_1.text)Realmm=Sqrt(n)//Sqrt()为PowerBuilder自带的求平方根的系统函数sle_2.text=String(m)其运行后的结果如图2.3所示。目录数组的声明02数组的声明在PowerBuilder中,用户可以使用数组来表示一系列具有相同类
型的变量,这些具有相同类型的变量共用一个变量名,使用下标访问数组中的每个变量。格式:数据类型数组名[]{=初值}例如:Integerperson[30]//声明整型数组person,30个元素,下标为1~30In
tegernum[3TO10]//下标从3变化到10,共8个元素Realgrade[10,10]//声明一个二维数组,共10×10个元素Charstudent[2,3,4]//声明一个三维数组,共2×3×4个元素若在声明数组时,方括号内未填数字,则声明一个动态数
组,运行时由系统分配数组元素的个数。在定义变量的同时,可以指定变量的初值。例如:Integerscore=100//定义整型变量score,并赋初值100Stringcity="南京",country//定义变量city并赋初值“
南京”//定义变量country,其初值为空串("")目录变量作用域03变量作用域在事件和函数中定义的变量都是Local变量,它的作用范围仅在所在的事件和函数内,在别的事件和函数中不起作用。Instance变量是一种特殊的变量,它的作用
范围不仅包括该对象的全部事件及函数,而且包括该对象的所有控件的事件及函数,可以说是一种局部的“全局变量”。编程人员可以分别为Application、Window等对象定义Instance变量。如图2.4所示的是在Window下定义Instance变量的步骤,为Applic
ation等其他对象定义Instance变量的步骤与此类似。变量作用域在Window下定义的Instance变量,其作用范围是所在的窗口及窗口内的各种控件的所有事件、函数等。查看并粘贴Instance变量的步骤如图2.5所示。——运算符及表达式第2章PowerScript语言PowerBui
lder实用教程(第5版)目录算术运算符01算术运算符算术运算符有五个,分别用于加、减、乘、除、乘方。其中,加号、减号还可用于表示正数、负数。各运算符的含义及示例见表2.3。运算符含义示例+加c=a+b-减c=a-b*乘c=a*b/除c=a/b^乘方(幂)c=a^bc等于a的b次方算术运算符在
表达式中,乘方优先级高于乘、除;乘、除优先级高于加、减。同级运算遵循自左至右的原则。PowerScript还提供了一组扩展的算术操作符(与C语言中使用的算术运算符相同):++--+=-=/=*=^=例如:a++等价于a=a+1a--等价于a=a-1a
+=b*c等价于a=a+b*ca-=b+4等价于a=a-(b+4)a*=c+d等价于a=a*(c+d)a/=c+d等价于a=a/(c+d)a^=c+d等价于a=a^(c+d)目录关系运算符02关系运算符关系运算符用于对相同类型的量进行大小比较运算,常用于条件语句和循环语句。各关系运算符的
含义及示例见表2.4。运算符含义示例>大于IFa>b+3THEN…=等于IFp+q=w*tTHEN…<小于IFa<cTHEN…<>不等于IFa*b<>t+8THEN…>=大于等于IFa>=bTHEN…<=小于等于I
Fa<=bTHEN…关系运算符的结果是True或False。关系运算符可以应用于字符串的比较。例如:"boat"="boat"//结果是True"boAt"="boat"//结果是False"book">="tank"//结果是False目录逻辑运算符03逻辑运算符逻
辑运算符用于对布尔型的量进行运算,结果是True或False。有三个逻辑运算符,其含义及示例见表2.5。运算符含义示例NOT“非”运算rb_1.checked=NOTrb_1.checkedAND“与”运算IFa>-10ANDa
<=30THEN…OR“或”运算IFa>50ORa<=20THEN…表2.6为逻辑运算的“真值表”。用它表示当a和b的值为不同组合时,各种逻辑运算所得到的值。abNOTaNOTbaANDbaORbTrueTrueFalseFalseTrueTrueTrueFalseFalseTrueFalse
TrueFalseTrueTrueFalseFalseTrueFalseFalseTrueTrueFalseFalse目录连接运算符04连接运算符连接运算符只有一个,就是符号“+”,用于将两个String型或Blob型变量的内容连接在一起,
形成新的字符串或Blob型数据。例如:s1="computer"+"book"则s1="computerbook"s2="book"+"computer"则s2="bookcomputer"目录运算符的优先级05运算符的优先级在表达式中,运算符按照优先
级进行运算,共分为九级,括号优先级最高,同级运算自左至右。1()括号2+,-,++,--正号、负号、自增、自减3^幂运算4*,/乘、除5+,-加、减及连接运算6=,>,<,>=,<=,<>关系运算符7NOT逻辑非8AND逻辑与9OR逻辑或——PowerScript语
句第2章PowerScript语言PowerBuilder实用教程(第5版)目录赋值语句01赋值语句赋值语句用于为变量、对象属性赋值,这是应用程序中使用最频繁的语句。格式:variable_name=expression其中,variable_name代表变量名,expression代表
表达式。赋值语句的作用是将表达式的值赋给等号左边的变量。例如:area=3.14*r*r又如:Ints[]s={13568}再如:Strings='Yougota"job"'Strings='Yougota~'job~''//同时使用多个单引号时需使用转
义字符~目录分支语句021.IF条件语句2.CHOOSE语句1.IF条件语句条件语句分单行和多行两种格式。格式1:IFconditionTHEN…ELSE…格式2:IFconditionTHEN⋮ELSE⋮END
IF条件语句的执行过程是首先计算condition(条件表达式)的值,如果为True,则执行THEN后面的语句,否则执行ELSE后面的语句(如果有ELSE的话)。例如:1.IF条件语句(1)IFa>3A
NDa<=15THENc=8*a*a+10//无ELSE子句(2)IFb>=0THENt=3+bELSEt=3–b//有ELSE子句(3)IFr>0THENarea=3.14*r*rl=2*3.14*rELSEarea=0ENDIF//多行IF语句,以ENDIF结束2.CHO
OSE语句CHOOSE...CASE语句能够根据所测试的表达式的值的不同来执行不同的语句,而不像条件语句那样只有两种选择。格式:CHOOSECASEtest_expressionCASEexpression_list1Statements1CASEexpression_list2Statemen
ts2⋮CASEexpression_listnStatementsn{CASEELSEStatementsn+1}ENDCHOOSE其中,expression_list形式如下。单个值。由逗号隔开的若干个值。某一区间,
如1to8,'b'to'h'。IS表达式,如IS>30//IS是保留字,代表test_expression的值。混合,如2,4,7to15,IS>20。2.CHOOSE语句执行CHOOSE…CASE语句时,PowerBuilder将逐条查找CASE,如果找到与测试值相
匹配的判断表达式,则执行该CASE后的语句块,然后执行ENDCHOOSE后的第一条语句。如果CHOOSE…CASE语句中包含CASEELSE子句,则未找到任何匹配的CASE条件时,执行CASEELSE子句中的语句块。例如:CHOOSECA
SEscoreCASEIS>=90Grade="A"CASE80TO89Grade="B"CASE70TO79Grade="C"CASE60TO69Grade="D"CASEELSEGrade="E"END
CHOOSE2.CHOOSE语句如图2.6所示的是CHOOSE…CASE语句的执行过程。目录循环语句031.FOR循环语句2.DO…LOOP循环3.CONTINUE语句4.EXIT语句1.FOR循环语句FOR…NEXT语句按照预先规定的次数重复执行一段代
码。格式:FORv=sTOe{STEPi}⋮NEXTFOR…NEXT语句的执行过程如图2.7所示。图中“超过”的含义是,当步长大于零时,表示“大于”;当步长小于零时,表示“小于”。若不指定步长,则步长为1。步长是零时为死循环,步长由STEP指定。1.FOR循环语句【例2.4】FOR…NEXT语
句的使用。求s,s=1+3+5+7+…+99。首先创建工作空间和应用程序,然后在PowerBuilder应用程序的命令按钮“Clicked”事件脚本编辑区编写“计算”按钮的脚本:IntegernInti
n=Integer(sle_1.text)//初始化输入值n为窗口控件sle_1的text的属性值FORi=1TO99STEP2n=n+iNEXTsle_2.text=String(n)//将运算结果显示在静态文本框sle_2中,
因为s是整数,//所以要使用String()函数将它转换为字符型其运行后的结果如图2.8所示。2.DO…LOOP循环DO…LOOP循环是重复执行一段代码,直到条件表达式为True或False,它有四种格式。格式1:DOUNT
ILcondition⋮LOOP当条件为False时,执行循环体;当条件为True时,退出循环。其功能和执行过程如图2.9所示。2.DO…LOOP循环【例2.5】DOUNTIL…LOOP循环语句的使用。求s,s=1+3+5+7+
…+99。首先创建工作空间和应用程序,然后在PowerBuilder应用程序的命令按钮“Clicked”事件脚本编辑区编写“计算”按钮的脚本:IntegernInti=1n=Integer(sle_1.tex
t)DOUNTILi>99n=n+ii=i+2LOOPsle_2.text=String(n)2.DO…LOOP循环格式2:DOWHILEcondition⋮LOOP当条件为True时,执行循环体;当条件为False时,退出循环。其功能和执行过程如图2.10所示。2.DO…LOOP循环【
例2.6】DOWHILE…LOOP循环语句的使用。求s,s=1+3+5+7+…+99。首先创建工作空间和应用程序,然后在PowerBuilder应用程序的命令按钮“Clicked”事件脚本编辑区编写“计算”按钮的脚本:Integern
Intii=1n=Integer(sle_1.text)DOWHILEi<=99//注意这里是小于等于99n=n+ii=i+2LOOPsle_2.text=String(n)2.DO…LOOP循环格式3:DO⋮LOOPUNTILcondi
tion创建工作空间和应用程序,首先执行循环体,然后判断条件。当条件为False时,执行循环体;当条件为True时,退出循环。格式3和格式1的区别是,格式3的循环体至少执行一次。其功能和执行过程如图2.11所示。2.DO…LOOP循环【例2.7】DO…LOOPUNTIL循环语句的使
用。求s,s=1+3+5+7+…+99。参照第1.2.1小节“带窗口的简单应用程序”的具体内容,首先创建工作空间和应用程序,然后在PowerBuilder应用程序的命令按钮“Clicked”事件脚本编辑区编写“计算”按钮的脚本:IntegernIntii=1n=Integer(sle_1.te
xt)DOn=n+ii=i+2LOOPUNTILi>99sle_2.text=String(n)2.DO…LOOP循环格式4:DO⋮LOOPWHILEcondition首先执行循环体,然后判断条件。当条件为True时,执行循环体;当条件为False时,退出循环。格式4和格式2的区别是,格式4的
循环体至少执行一次。其功能和执行过程如图2.12所示。2.DO…LOOP循环【例2.8】DO…LOOPWHILE循环语句的使用。求s,s=1+3+5+7+…+99。首先创建工作空间和应用程序,然后在PowerBuilder应用程序的命令按钮“Clicked”事件脚本编辑区编写“计算”按钮
的脚本:IntegernIntii=1n=Integer(sle_1.text)DOn=n+ii=i+2LOOPWHILEi<=99//注意这里是小于等于99sle_2.text=String(n)3.CONTINUE语句格式:CONTINUECONTINUE语句只
能用于DO…LOOP和FOR…NEXT语句中,遇到CONTINUE语句时,将不执行CONTINUE语句后面的语句,跳回到循环条件处继续执行。4.EXIT语句格式:EXITEXIT语句只能用于DO…LOOP和FOR…NEXT语句中,遇到EXIT语句时,将结束循环,跳到LOOP或NEXT后面的语句去
执行。目录GOTO语句04GOTO语句格式:GOTO语句标号转到语句标号标志的位置继续执行。程序中应避免使用GOTO语句。例如:i=1BEGINLOOP://语句标号sum+=arr[i]//等价于语句sum=sum+a
rr[i]i+=1IFi<=50THENGOTOBEGINLOOP//转到BEGINLOOP标志的位置继续执行——常用的标准函数第2章PowerScript语言PowerBuilder实用教程(第5版
)目录MessageBox()函数01MessageBox()函数借助MessageBox()函数可以在屏幕上显示一个窗口,用户在响应该窗口后,程序才能继续运行下去。格式:MessageBox(title,text[,icon[,button[,default]]])其中,titl
e和text参数是必需的,其他大括号中的参数是可选项。各参数的含义如下。title:String类型,指定消息对话框的标题。text:指定消息对话框中显示的消息,该参数可以是数值数据类型、字符串或boole
an值。icon:枚举类型,可选项,指定要在该对话框左侧显示的图标。值为Information!(默认值);StopSign!;Exclamation!;Question!;None!。button
:枚举类型,可选项,指定显示在该对话框底部的按钮。值为OK!(默认值);OKCancel!;YesNo!;YesNoCancel!;RetryCancel!;AbortRetryIgnore!。default:数值型,可选项,指定作为默认按
钮的按钮编号,按钮编号自左向右依次计数,默认值为1。MessageBox()函数函数执行成功时返回用户选择的按钮编号(如1、2、3等),发生错误时则返回-1。如果任何参数的值都为Null,则执行MessageBox()函数后返回Null。【例2.9】MessageBox()函数
的使用。首先创建工作空间和应用程序,然后在工作空间窗口“w_1”的“Open”事件脚本编辑区编写“应用”的脚本:Intretret=MessageBox("这是一个例子","是否要存盘?",Question!,YesNoCancel!,3)IFret=1THEN//D
w_1.update()MessageBox("这是一个例子","存盘成功!")ELSEIFret=2THENRETURNENDIFENDIF运行时的界面如图2.13所示。目录Open()函数02Open()函数Open()函数用于打开一个PowerBuilder窗口。格式:Open(win
dow_name)打开窗口并触发窗口的“Open”事件。目录Close()函数03Close()函数Close()函数用于关闭一个PowerBuilder窗口。格式:Close(window_name)首先触发窗口的“CloseQuery”事件,若“CloseQuery”事件的返回值不等于1
,则再触发“Close”事件,关闭窗口并释放窗口及窗口上的控件所占据的内存。【例2.10】Close()函数的使用。在DO…LOOP循环语句使用示例的基础上再添加一个“关闭”按钮,如图2.14所示。首先创建工作空间和应用
程序,然后在PowerBuilder应用程序的命令按钮“Clicked”事件脚本编辑区编写“关闭”按钮的脚本:Close(parent)//退出当前窗口运行时的界面如图2.15所示。目录Run()函数04Run()函数Run()函数被用于在PowerBuilder中运行其他的Wind
ows应用程序,如计算器、记事本及其他用户应用程序等。格式:Run(appl)或Run(appl,state)其中,参数appl是一个字符串,指明要运行的应用程序名,若不含路径名,则默认为当前路径。【例2.11】Run()
函数的使用。首先创建工作空间和应用程序,然后在PowerBuilder应用程序的“Open”事件脚本编辑区编写“应用”的脚本:Run("C:\WINDOWS\system32\calc.exe",no
rmal!)运行时的界面如图2.16所示(Windows7操作系统)。——编辑代码第2章PowerScript语言PowerBuilder实用教程(第5版)编辑代码在PowerBuilder中编辑代码时,首先选
定要编辑代码的对象,然后选定事件,再在Script窗口中编辑代码,如图2.17所示。编辑代码或者使用鼠标右键单击要编辑代码的窗口或控件,将出现一个弹出式选单,如图2.18所示。——应用程序编程实例第2章PowerScript语言PowerBuilder实用教程(第5版)应用程序编程实例
【例2.12】利用PowerBuilderClassic12.5制作计算器应用程序。自制计算器的外观如图2.19所示。1.创建计算器应用(1)创建新的工作空间。单击“New”图标按钮,打开“New”对话框;选择“Workspace”页,单击“OK”按钮,弹出“N
ewWorkspace”对话框,选择保存到新建的目录“E:\workspace”,输入工作空间名为“Ex2”。(2)创建新的应用。单击“New”图标按钮,打开“New”对话框;选择“Target”页中的“A
pplication”,单击“OK”按钮,弹出“SpecifyNewApplicationandLibrary”对话框,输入应用名为“calculator”,单击“Finish”按钮,系统自动用上面输入的应用名
加上扩展名“.pbl”和“.pbt”,组成库名“calculator.pbl”及目标文件名“calculator.pbt”。创建计算器应用的步骤如下。2.创建计算器窗口和设置窗口属性(1)(2)(1)单击“New”图标按钮,打开“New”对话框;选择“PBObject”页,双
击“Window”图标,创建一个新窗口对象并进入窗口画板。(2)在窗口属性(Properties)卡“General”页的“Title”栏中输入窗口标题“计算器”,取消选中“MaxBox”和“Resizable”复选框,其余使用默认值;
保存窗口对象,命名为“w_calculator”。创建计算器窗口和设置窗口属性的具体方法如下。完成以上步骤后,可在工作空间目录看到如图2.20所示的树形结构。3.声明几个变量在“Script”脚本区左上边的下拉列表框中选
择“(Declare)”,然后在下面的脚本编辑区中编写代码:Decimaladd1Chars1Booleanflag其中,add1保存中间结果;s1保存按下的运算符;flag是一个标志位,flag=false表示按下的数字是前面
数字的一部分,flag=true表示按下的数字是一个新的数字的开始。声明的变量如图2.21所示。4.在窗口中布置显示数值的单行编辑框控件首先单击选单“Insert|Control|SingleLineEdit”,然后在窗口上单击,就会出现一个单行编
辑框,其名称为“sle_1”,删除“Text”栏中的“none”,选中“DisplayOnly”属性,在单行编辑框的边沿拖曳,调整其尺寸。5.在窗口中布置10个数字按钮和小数点按钮首先制作数字“1”按钮,单
击选单“Insert|Control|CommandButton”,然后在窗口上单击,就会出现一个命令按钮,其名称为“cb_1”,在“Text”栏中输入“1”,单击“Other”页,单击该页下部的“Pointer”下拉
列表框的▼小三角,选择列出的“HyperLink!”手指形图标,在按钮的边沿拖曳,调整好尺寸,为按钮编写程序脚本。单击数字“1”按钮,单击鼠标右键,弹出子选单,单击“Script”选项(如图2.22所示)。5.在窗口中布置10个数字按钮和小数点按钮光标自动跳到脚本编辑区,可
以看到默认的按钮事件为“Clicked”,输入如下代码(如图2.23所示):IFflagTHENsle_1.text=""flag=falseENDIFsle_1.text=sle_1.text+THIS.text6.+、-、*、/运算符按钮的制作首先制作“+”运算符按钮,它
与数字按钮仅外观类似(“Text”属性不同,其余属性相同),但脚本完全不同。编辑“+”按钮的“Clicked”事件脚本:CHOOSECASEs1CASE'*'sle_1.text=String(dec(sle_1.text)*add1)CASE'/'sle_
1.text=String(add1/dec(sle_1.text))CASE'+'sle_1.text=String(dec(sle_1.text)+add1)CASE'-'sle_1.text=String(add1-dec(sle_1.text))ENDCHOO
SEAdd1=dec(sle_1.text)s1=THIS.textflag=true7.“清除”按钮的制作使用外观复制的方法复制出一个按钮,将其“Text”栏中的内容改为“清除”,在其“Clicked”事件中输入以下脚本:sle_1.text=""Add1=
0s1=''flag=true8.“=”按钮的制作复制“+”按钮,将其“Text”栏中的内容改为“=”,将按钮的“Default”属性选中,当按下【Enter】键时,系统自动执行“=”按钮的“Clicked”事件的代码。修改原“Clicke
d”事件的最后三行脚本,“=”键的完整脚本如下:CHOOSECASEs1CASE'*'sle_1.text=String(dec(sle_1.text)*add1)CASE'/'sle_1.text=St
ring(add1/dec(sle_1.text))CASE'+'sle_1.text=String(dec(sle_1.text)+add1)CASE'-'sle_1.text=String(add1-dec(sle_1.text))ENDCHOOSEfla
g=trues1='‘9.编写“应用”的脚本在树状窗口中,双击“应用”(calculator),弹出应用画板。这时在事件下拉列表框中对应的是“Open”事件。在下面空白的脚本编辑区中编写“Open”事件的脚本:Open(w_calculator
)10.运行应用程序保存并关闭应用画板,计算器已经制作完毕。单击“Run”图标按钮,就可以运行计算器应用程序了。感谢您的下载观看