PowerScript语言

PowerScriptPowerScript语言语言3.1 语言基础语言基础3.1.1 注释注释：注释：是添加在程序中的说明性文字。单行注释:以双斜杠“”开始到行结束。多行注释:以“/*”开始到“*/”结束 编写代码一般不区分大小写，所以不必考虑大小写的问题。3.1.2 标识符标识符 标标识识符符是指在程序中使用的变量、标号、函数、窗口、控件、菜单及所引用对象的名称。在PB9.0中，标识符的命名遵从下述规则：（1）标识符必须以英文字母或者下划线“_”开头。（2）标识符不能是保留字。（3）由字母、数字、下划线、短横线、$、#、%组成。（4）标识符不区分大小写字母。（5）标识符不能超过40个字符，且中间不能出现空格。3.1.3 语句的分隔、断行和续行语句的分隔、断行和续行1、分隔 在一行书写多个语句时，可以使用分隔符“；”对每个语句加以分隔。如Integer I,j,k;i=2;j=3;k=42、断行 写完一行需要另起一行时，直接按Enter键进行断行。3、续行 一个较长的语句可以通过续行分成几行以增强可读性，在前行的末尾加上“&”即可。3.1.4 特殊字符特殊字符 特殊字符：特殊字符：在字符串中经常需要包含一些特殊的ASCII字符，特别是控制字符，它们不能用常规的输入方法直接输入，需要使用其他字符来代替。特殊的ASCII字符或控制字符用波纹号作为前缀。例如：例如：n n 为换为换行行 r 为回车 ”为双引号 3.1.5 空值空值NULL 空值是一种特殊值，代表数据未定义，值不确定，它与空字符串、数值零的意义完全不同。变量被赋予空值的途径有两种：从数据库读到空值和使用SetNull()函数赋值。测试变量或表达式是否为空值时，使用函数IsNull()，而不是直接使用表达式。例如：String personSetNull(person)If IsNull(person)THEN messagebox(“测试空值”，“person是空值”)3.1.6 数据类型数据类型 PowerScript提供了丰富的数据类型，包括标准数据类型、枚举数据类型和系统对象数据类型三种。标准数据类型包括数值型、字符型、日期型、布尔型等一些最基本的数据类型，共14种，具体如下表所示。数据类型数据类型 说明说明Blob 二进制大对象，用于处理图像、大文本等 Boolean布尔型，只有两个可能值：true或falseChar 单个ASCII字符String 字符串类型，用于存储任意ASCII字符Date 日期，包括年、月、日Time时间，包括小时、分、秒以及秒的小数位Datetime日期及时间Decimal或dec带符号十进制数，最大18位精度Double带符号浮点数，15位有效数字Interger或int16位带符号整数Long 32位带符号整数Real 带符号浮点数，精度6位UnsignedInteger16位无符号整数Unsignedlong或Ulong32位无符号整数枚举类型枚举类型n枚举类型是powerscript定义的特殊常量，常用于对象或控件的属性、系统函数的参数等。n枚举类型实际上是一组值，每个值都以英文单词开始，以感叹号结束。n如：yesno!系统对象数据类型系统对象数据类型nPb中，窗口、菜单、控件等都是系统对象，每一种系统对象实际上都是一种数据类型。编程时，根据需要可以说明系统对象数据类型的变量。n window m_win /说明窗口变量n menu m_menu /说明菜单变量3.1.7 运算符和表达式运算符和表达式 1 1、算术运算符、算术运算符 用于完成数学运算，加、减、乘、除等。2 2、关系运算符、关系运算符 用于将两个操作数进行比较，可以是数值类型也可以 是其他数据类型，比较的结果为true、false和null之一。示例：if ab then 也可以应用于字符串的比较，此时按ASCII码进行比较。如：“abc”=“abc”，运算结果为true “abc”=“ABC”，运算结果为false3 3、逻辑运算符、逻辑运算符 用于构成结果为True或False的逻辑表达式。示例：if not a=10 then 4 4、连接运算符、连接运算符 即符号“+”，用于把两个String型或Blob型变量的内容连接起来，形成新的String型或Blob型数据。示例：string is_address string lname,fname,fullname is_adress=“山东”+“烟台”/is_adress中“山东烟台”fullname=lname+,+fname /两个字符串中间加上，n表达式是由运算符和操作数连接起来、构成符合PowerScript语法规则的式子。nPowerscript具有两种类型的表达式，分别是数字类型表达式和字符类型表达式。3.1.8 运算符和表达式运算符和表达式 3.2 PowerScript语句语句 Power Script用于控制程序的流程，主要有赋值语句、条件控制语句和循环控制语句等。1 1、赋值语句、赋值语句 赋值语句用于给变量、对象属性赋值，是程序中使用最频繁的语句。格式如下：变量名或对象属性变量名或对象属性=表达式表达式简单举例：integer li_age string ls_address ls_address=“北京”li_age=30 2 2、条件语句、条件语句 (1)IF语句:根据表达式值的真假决定下一步执行的语句。单行格式单行格式：IF THEN ELSE多行格式多行格式：IF THEN ElSEIF THEN ELSE END IF简单实例1n从单行编辑框中输入行李的重量，单击“确定”按钮后输出费用。/根据行李的重量，缴纳费用 double ld_weight,ld_pay ld_weight=double(sle_weight.text)if ld_weight50 then ld_pay=ld_weight*0.6 else ld_pay=50*0.4 st_pay.text=string(ld_pay)CHOOSE CASE CHOOSE CASE CASE CASE CASE CASE CASE CASE CASE ELSECASE ELSE END CHOOSEEND CHOOSE(2)CHOOSE CASE语句 Choose Case语句根据判断表达式的值选择不同操作，可同时处理多种情况。简单实例2n从单行编辑框中输入年和月份，单击“确定”按钮后得到该月的天数。Integer li_month,li_day,li_year Boolean lb_byes Li_year=integer(sle_year.text)Li_month=integer(sle_month.text)If mod(li_year,4)=0 and mod(li_year,100)0 or Mod(li_year,400)=0 then Lb_byes=true Else Lb_byes=false End ifChoose case li_month case 1,3,5,7,8,10,12 li_day=31 case 4,6,9,11 li_day=30 case 2 if lb_byes then li_day=29 else li_day=28 end choose st_day.text=string(li_day)循环语句循环语句 1 1、DOLOOPDOLOOP语句语句DO UNTIL LOOP条件为假时执行，条件为真时结束循环，若初始条件为真则什么也不做。DO WHILE LOOP条件为真时执行，条件为假时结束循环，若初始条件为假则什么也不做。DO LOOP UNTIL条件为假时执行，条件为真时结束循环，不管初始条件如何，循环体至少执行一次。DO LOOP WHILE条件为真时执行，条件为假时结束循环，不管初始条件如何，循环体至少执行一次。2、FORNEXTFORNEXT语句语句FOR=TO STEP NEXT3、CONTINUECONTINUE语句语句CONTINUE语句与DOLOOP或FORNEXT语句配合使用，表示开始下一次循环。4、EXITEXIT语句语句EXIT与语句与DOLOOP或FORNEXT语句配合使用，表示跳出循环。例3：计算S=1+3+5+7+99n用不同的循环语句实现，单击“确定”按钮后，结果显示在静态文本框中。1、fornext循环Integer s,IS=0For i=1 to 99 step 2S=s+INextSt_1.text=“s=”+string(s)2、do untilloop循环 integer s,I s=0 i=1 do until i99 s=s+I i=i+2 loop st_1.text=“s=”+string(s)3、do whileloop 循环Integer s,IS=0i=1Do while i99St_1.text=“s=”+string(s)5、do loop while 循环Integer s,IS=0i=1DoS=s+Ii=i+2Loop while i=99St_1.text=“s=”+string(s)其他语句其他语句 CONTINUE:CONTINUE:遇到该语句，将不执行continue语句后面的语 句，回到循环条件处继续执行。RETURNRETURN：返回语句，从当前事件或函数中返回。HALTHALT：结束应用程序的执行。CREATECREATE：为指定的对象类型产生一个对象实例。DESTROYDESTROY：用于撤销由CREATE语句创建的对象实例。3.3 数组变量数组变量3.3.1 变量的作用域变量的作用域全局变量全局变量：在整个应用程序的任何地方都起作用。实例变量实例变量：在一个对象实例的所有程序中起作用。共享变量共享变量：在一个对象的所有实例的程序中起作用。局部变量局部变量：只在当前程序段中起作用。3.3.2 变量声明变量声明n在PB中，所有变量在使用前都要首先予以声明。变量声明的格式为：=初值初值，变量名，变量名=初值初值 n 变量被声明后，若未指定初值，则系统将赋以默认值。数值型变量的默认值为零，字符型变量的默认值为空字符或空串。n例如：Integer a /定义一个整型变量 String stu_num /定义一个字符串变量 Integer score=100 /定义一个整型变量，赋初值1003.3.3 数组数组n数组数组就是一组相同数据类型的带下标的变量集合。n同一数组中的元素使用同一个公用名，还有一个或多个带方括号的下标量，此下标量唯一的标识该数组元素。n数组的声明与变量的声明差别不大，不同之处在于数组声明除了定义名称外，还要设置一个或多个数组的下标量。n例如：Integer ch110 /声明一整型数组，有10个元素 Integer num2 to 10 /声明一整型数组，下标从2到10 Char student 10,10 /声明一二维数组，共1010个元素3.4 使用代词编写通用代码使用代词编写通用代码3.4.1 This代词n This代词用于引用对象本身。n例如有一菜单项m_test，若想在该菜单项旁边标上一个选中标记，可使用下列语句完成。nThis.Check()n等价于 m_test.Check()例4：单击窗体上按钮，按钮文字发生变化3.4.2 Parent代词代词n用于引用父对象。n窗口中的控件窗口中的控件：在窗口中的一个控件的脚本里使用Parent代词来引用该控件所属的窗口。n自定义用户对象自定义用户对象：在一个自定义用户对象的一个控件的脚本中使用Parent代词引用该用户对象。n菜单菜单：在一个菜单项的脚本中使用Parent代词引用此菜单项是父菜单。n例如例如：关闭名为w_main窗口的按钮事件为close(Parent)等价于close(w_main)3.4.3 ParentWindow代词代词n只能在菜单的脚本中使用，它代表运行时菜单所在的窗口。n例如：窗口w_main有一个菜单项m_close，其功能是关闭w_main窗口，则可在菜单项m_close的Clicked事件中编写如下代码：close（ParentWindow）等价于close（w_main）3.4.4 Super代词代词nSuper代词用于一个继承对象的脚本引用它的直接祖先。n例如：在当前窗口的close事件中执行其祖先窗口的close事件脚本，则可以将如下语句添加到当前窗口的close事件脚本中：Call Super：close3.5 3.5 常用标准函数常用标准函数 PowerScript 提供了包含数百种标准函数的函数库，每个函数完成特定的功能，这些函数可以不用声明而直接使用，编程人员不需要了解函数的实现细节，只需知道函数的功能、参数及用法即可，标准函数的使用大大加快了开发速度。1.MessageBox函数nMessageBox函数常用于显示出错、警告、提示等,它将在屏幕上显示一个窗口，用户在响应该窗口后，程序才能继续运行下去。n函数使用格式为：nMessageBox(标题,显示的消息,左侧显示的图标,底部的按钮,默认按钮的编号)单击窗体上的“确定”按钮，弹出如下的对话框int ret ret=messagebox(这是一个例子,是否要存盘?,question!,yesnocancel!,3)例5 MessageBox函数例子2、Open函数：打开一个pb窗口。3、Close函数：关闭一个pb窗口。4、Run函数：在pb中运行其它应用程序。3.6 嵌入式嵌入式SQL语句与数据库操作语句与数据库操作nPB提供了一整套嵌入式SQL语句。利用嵌入式SQL语句，用户可以在程序中灵活的操纵数据库。嵌入式SQL语句必须以分号“；”结束，变量前必须加冒号“：”nSelect语句语句：从数据库中检索第一条满足条件的记录，并将结果放到变量列表中去。nInsert语句语句：在表中插入一条记录。nUpdate语句语句：更新指定表中满足条件的记录。nDelete语句语句：删除指定表中满足条件的记录。习题1.填空题（1）在powerbuilder中，标识符必须以 开头。（2）测试变量式表达是否为空值，可以使用 函数。（3）Powerbuilder 的四种变量类型为 、和 。（4）Powerscript 语言中用作续行的符号为 。2.选择题（1）powerscript 的行注释为 。A /B&C *D*（2）代词 Parent 指 。A 当前控件所在的窗口 B 运行时菜单所在的窗口 C 父对象 D 对象式控件本身字母或下划线字母或下划线isnull全局全局实例实例共享共享局部局部&AA（3）PowerScript算术表达式a=b+4等价于 。A a=ab+4 B a=b+4a C a=1/(b+4)D a=a(b+4)（4）在PowerBuilder中，使用的编程语言是 。A VBScript B PASCAL C PowerScript D PowerDesigner（5）不是PowerBuilder的标准数据类型。A Char B.Integer C.Long D.Popup（6）有语句如下：integer a,b=100,cSetNull(c)b=b+ca=b+1请写出变量a的最后结果值是 。A 100B 101C NULLD 以上都不对DCDC（1）读程序写出结果。integer A=0,B=0,Count FOR Count=1 to 100 A=A+1 IF Count 15 THEN CONTINUE B=B+1 NEXT sle_1.text=A=+string(a)sle_2.text=B=+string(b)（2）设计一个自定义函数，求任意输入的两个数的最大公约数。3.程序题A=100，B=15结束结束