《计算机信息管理基础-第12讲》由会员分享，可在线阅读，更多相关《计算机信息管理基础-第12讲（86页珍藏版）》请在金锄头文库上搜索。
1、重庆大学全日制本科计算机基础系列课程计算机信息管理基础计算机信息管理基础重庆大学计算机学院重庆大学计算机学院 曾一曾一第12讲PowerBuilderPowerBuilder编程基础编程基础重庆大学计算机学院重庆大学计算机学院 曾一曾一计算机信息管理基础本章主要内容本章主要内容nPowerBuilder编程基础nPowerBuilder的各主要元素nPB脚本PowerScript计算机信息管理基础1.PowerBuilder1.PowerBuildern一种可视化的面向对象的快速应用程序开发环境。n面向对象的，整个应用程序由大量对象组成，对象之 间存在消息传递 。nPB中，窗口(window)
2、是主要的用户界面 。nPB是一个开放的应用程序开发环境，它可以访问很多 常用的后台数据库系统。nPB的应用程序是事件驱动的，这就是说运行于该环境 下的程序并不是顺序执行的，而是用户通过各种动作 控制应用程序的流程。计算机信息管理基础PowerBuilderPowerBuilder界面界面 菜单栏 工具栏 系统树 窗口 剪贴窗 口 属性区 工作区 输出窗口 计算机信息管理基础应用程序结构应用程序结构应用属性计算机信息管理基础应用程序对象的属性应用程序对象的属性General选项卡应用程序对象名称 应用程序的显示名称 设置状态条的默认文本 ，默认设置为Ready 定义显示数据窗口消息 对话框时的默
3、认标题 计算机信息管理基础应用程序对象的附加属性应用程序对象的附加属性计算机信息管理基础2.2.应用程序对象的方法和事件应用程序对象的方法和事件（1）Open事件nopen事件是一个重要的事件，它表明了应 用程序对象开始执行。n该事件只发生一次，且必须为其编写脚本 代码。nOpen事件脚本的功能应该是初始化运行环 境，并打开程序的主窗口。计算机信息管理基础 应用程序对象的方法和事件应用程序对象的方法和事件计算机信息管理基础应用对象的事件应用对象的事件- -openopenn脚本 /设置事务对象的参数 SQLCA.DBMS = “ODBC“ SQLCA.AutoCommit = False SQ
4、LCA.DBParm = “ConnectString=DSN=my_db；uid=dba；pwd=sql “/连接数据库 CONNECT USING SQLCA; /连接数据库/打开窗口 IF SQLCA.SQLcode大于a bFalse=大于等 于a = bFalse不等于a 10 AND a 100 Then n n连接运算符连接运算符n连接运算符“+” 用于把String型变量的内容连接起来。 例如：string Test Test = “中国“ + “重庆“ / Test 中包含“中国重庆“计算机信息管理基础运算符的优先级运算符的优先级 优先级运算符意义1(最高)( )括号2+ ,
5、 - ,+,-一元运算符3幂运算4* , /乘、除5+ , -加减及连接运算6= , , = , 关系运算7NOT逻辑反8AND逻辑与9(最低)OR逻辑或计算机信息管理基础6 6）表达式）表达式n n表达式是由算术运算符、关系运算符及逻辑运算符表达式是由算术运算符、关系运算符及逻辑运算符 连接起来的变量、常量构成的语法单位。连接起来的变量、常量构成的语法单位。计算机信息管理基础7 7）基本语句）基本语句（1 1）赋值语句）赋值语句语法格式为：nvariablename = expressionn其中，variablename代表变量名，expression代表 表达式，也可以是字符串、数字、变
6、量或常量以及数 组等。 在赋值语句中，若等号右边是表达式，则先将其结果转 化为等号左边变量的类型后，再赋值给变量。 如：s=a*h/2 计算机信息管理基础 （2）条件控制语句nIF语句 （a）单行IFTHEN语句n语法格式为： IF condition THEN action1 ELSE action2 （b）多行IFTHEN语句n语法格式为： IF condition1 THENAction1ELSEIF condition2 THENAction2 ELSEAction3 END IF 注意：多行IFTHEN语句即使只有action1一个语句块，也需要 END IF表示多行IFTHEN的结
7、束。 计算机信息管理基础nCHOOSE CASE语句n适用于多分支选择结构n语法格式为： CHOOSE CASE test_expression CASE expression_list1 statementblock1 CASE expression_list2 statementblock2 CASE expression_listn statementblockn CASE ELSE statementblock n+1 END CHOOSE 计算机信息管理基础其中test_expression 是测试表达式， expression_list 是判断表达式，statements 是满足条
8、件时执行的语句块，方括号表示该 成分可以省略。expression_list可以使用如下的形式：用逗号分隔的一组数据，例如2,4,7用to 表示一个区间范围，例如2 to 15用is 代表测试值，后跟关系运算符和比较值，例如 is 30组合运用上述三种方法，并用逗号进行分隔，例如 5,6,8 to 12,is 20计算机信息管理基础（3）循环控制语句n PowerScript 的循环语句有两种形式DO LOOP和 FOR NEXT ，可以与EXIT 和 CONTINUE 语句配合使用nDO LOOP 循环n四种形式结构分别为:DO UNTIL condition LOOPDO WHILE co
9、ndition LOOPDO LOOP UNTIL conditionDO LOOP WHILE conditionDO 表示循环的开始，LOOP 表示循环的结束，condition 表示循环条件,是逻辑表达式，其值为True 或False计算机信息管理基础nDO UNTIL conditionLOOP语法格式为： DO UNTIL condition Statementblock LOOPn执行过程为先判断控制条件condition，如果为false，则执行 语句块statementblock，执行到LOOP后，接着 判断条件condition，直到结果为true时结束循环 。 计算机信息管
10、理基础nDO WHILE conditionLOOP的语法格式： DO WHILE condition Statementblock LOOPn执行过程为先判断控制条件condition，如果为true，则执行 语句块statementblock，执行到LOOP后，接着 判断条件condition，直到结果为false时结束循环 。计算机信息管理基础nDOLOOP UNTIL condition的语法格式： DO Statementblock LOOP UNTIL conditionn执行过程为先执行语句块statementblock，然后判断控制条 件condition，如果为false，则
11、继续执行语句块 statementblock，直到condition的结果为true时 结束循环。 计算机信息管理基础nDOLOOP WHILE condition的语法格式为 ： DO Statementblock LOOP WHILE conditionn执行过程先执行语句块statementblock，然后判断控制条 件condition，如果为true，则继续执行语句块 statementblock，直到condition的结果为false 时结束循环。计算机信息管理基础nFORNEXT语句语法格式为： FOR varname = start TO end STEP increment
12、 Statementblock NEXT其中，varname 是循环变量，可以是任意的数值 类型，start、end 分别是循环变量的初值和终值 。increment 是每次循环后循环变量的步长增量 ，缺省值为1 ，statements 是一组语句称做循环 体。FOR -NEXT 语句的执行过程为：循环变量 varname 从start 开始到end 为止，重复执行循环 体，每执行一次varname，被重新赋新值为 varname + increment 。计算机信息管理基础（4）EXIT语句EXIT语句是中途结束循环的语句。注意：如果在 循环嵌套中使用EXIT语句，那么执行EXIT语句只 能
13、退出当前层的循环，而不能退出所有循环。 （5）CONTINUE语句CONTINUE语句控制循环的执行使之返回循环开 始处。 计算机信息管理基础（6）RETURN语句nRETURN 语句立即终止事件处理，程序或函数的执行把控 制返回到调用程序，其语法格式为：RETURN expression n其中expression 是个表达式，其值作为事件处理程序或函 数的返回值。（7） HALT语句nHALT 语句用于终止应用程序的运行，其语法为：HALT CLOSEn其中CLOSE 是个可选项，当HALT 语句不带CLOSE 选项 时，该语句立即终止应用程序的运行；当HALT 语句带 CLOSE 选项时
14、，执行到该语句后应用程序先执行应用对象 的Close 事件处理程序，之后再终止应用程序的运行。计算机信息管理基础8 8）常用标准函数）常用标准函数（1）MessageBox( )函数 使用MessageBox( )函数可以向用户显示或提示各种信 息。语法如下： MessageBox ( title,text,icon , button ,default )ntitle是一个被用来确定MessageBox标题的字符串。ntext是在MessageBox中显示的文本。nicon用来指示显示在MessageBox左侧的图标。可 选的值有Information! StopSign!、Exclamati
15、on!、 Question!、None!。计算机信息管理基础nbutton用来指示你想要显示的命令按钮的集合。这些 值是OK!、OKCancel!、YesNo!、YesNoCancel!、 RetryCancel!、AbortRetryIgnore!。默认值是OK! 。ndefault指定默认的按钮n函数返回值：Integer，函数执行成功时返回用户选 择的按钮编号例如1,2,3 等，发生错误时返回-1 n举例：ll=MessageBox (“保存修改“,“您修改了数据现在是 否保存“,Question!,YesNoCancel!) 计算机信息管理基础（2）Open函数n打开一个PowerBu
16、ilder窗口n格式：Open ( window -name) （3）Close函数n关闭一个PowerBuilder窗口n格式：Close ( window-name)n例如：下面的代码关闭窗口w_employee 然后打开窗口 w_departmentsClose(w_employee)Open(w_departments)计算机信息管理基础（4）数据类型检查函数 数据类型检查函数又称为Is簇函数它们用来判断一个字 符串是否符合某种数据类型的格式，返回值是一个布 尔类型的值。Is簇函数的语法格式为：nIs*(string)其中string为要测试的字符串。nIsNumber( )用于测试某字符串是否为有效数值。nIsDate( )检测指定的字符串是否包含有效日期。nIsTime( ) 检测指定的字符串是
