计算机信息管理基础-第12讲.ppt

《计算机信息管理基础-第12讲.ppt》由会员分享，可在线阅读，更多相关《计算机信息管理基础-第12讲.ppt（86页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、重庆大学全日制本科计算机基础系列课程重庆大学全日制本科计算机基础系列课程重庆大学全日制本科计算机基础系列课程重庆大学全日制本科计算机基础系列课程计算机信息管理基础计算机信息管理基础重庆大学计算机学院重庆大学计算机学院曾一曾一第第12讲讲PowerBuilder编程基础编程基础重庆大学计算机学院重庆大学计算机学院曾一曾一计算机信息管理基础计算机信息管理基础本章主要内容本章主要内容nPowerBuilderPowerBuilder编程基础编程基础nPowerBuilderPowerBuilder的各主要元素的各主要元素nPBPB脚本脚本PowerScriptPowerScript 计算机信息管理基

2、础计算机信息管理基础1.PowerBuildern一种可视化的面向对象的快速应用程序开发环境。一种可视化的面向对象的快速应用程序开发环境。n面面向向对对象象的的，整整个个应应用用程程序序由由大大量量对对象象组组成成，对对象象之之间存在消息传递间存在消息传递 。nPBPB中，窗口中，窗口(window)(window)是主要的用户界面是主要的用户界面 。nPBPB是一个开放的应用程序开发环境，它可以访问很多是一个开放的应用程序开发环境，它可以访问很多常用的后台数据库系统。常用的后台数据库系统。nPBPB的应用程序是事件驱动的，这就是说运行于该环境的应用程序是事件驱动的，这就是说运行于该环境下的程

3、序并不是顺序执行的，而是用户通过各种动作下的程序并不是顺序执行的，而是用户通过各种动作控制应用程序的流程。控制应用程序的流程。计算机信息管理基础计算机信息管理基础PowerBuilder界面界面菜单栏 工具栏 系统树窗口 剪贴窗口 属性区 工作区 输出窗口 计算机信息管理基础计算机信息管理基础应用程序结构应用程序结构应用程序结构应用程序结构应用属性应用属性计算机信息管理基础计算机信息管理基础应用程序对象的属性应用程序对象的属性应用程序对象的属性应用程序对象的属性General选项卡选项卡应用程序对象名称应用程序对象名称应用程序的显示名称应用程序的显示名称设置状态条的默认文本，设置状态条的默认文

4、本，默认设置为默认设置为Ready Ready 定义显示数据窗口消息定义显示数据窗口消息对话框时的默认标题对话框时的默认标题 计算机信息管理基础计算机信息管理基础应用程序对象的附加属性应用程序对象的附加属性应用程序对象的附加属性应用程序对象的附加属性计算机信息管理基础计算机信息管理基础2.2.应用程序对象的方法和事件应用程序对象的方法和事件（1）Open事件事件nopen事件是一个重要的事件，它表明了应事件是一个重要的事件，它表明了应用程序对象开始执行。用程序对象开始执行。n该事件只发生一次，且必须为其编写脚本该事件只发生一次，且必须为其编写脚本代码。代码。nOpen事件脚本的功能应该是初始化

5、运行环事件脚本的功能应该是初始化运行环境，并打开程序的主窗口。境，并打开程序的主窗口。计算机信息管理基础计算机信息管理基础应用程序对象的方法和事件应用程序对象的方法和事件应用程序对象的方法和事件应用程序对象的方法和事件计算机信息管理基础计算机信息管理基础应用对象的事件应用对象的事件-openn脚本脚本/设置事务对象的参数设置事务对象的参数SQLCA.DBMS=ODBCSQLCA.AutoCommit=FalseSQLCA.DBParm=ConnectString=DSN=my_db；uid=dba；pwd=sql“/连接数据库连接数据库CONNECTUSINGSQLCA;/连接数据库连接数据库

6、/打开窗口打开窗口IFSQLCA.SQLcode0thenmessagebox(数据库连接失败数据库连接失败!,SQLCA.SQLErrText,stopSign!,OK!)ELSEopen(w_main)/打开主窗口打开主窗口Endif计算机信息管理基础计算机信息管理基础计算机信息管理基础计算机信息管理基础计算机信息管理基础计算机信息管理基础应用对象的事件应用对象的事件-closen脚本：脚本：/断开与数据库的连接断开与数据库的连接DISCONNECTUSINGSQLCA;/判断断开数据库的情况判断断开数据库的情况IFSQLCA.SQLcode大于abFalse小于a=大 于 等于a=bFa

7、lse=小 于 等于a=bTrue不等于abTrue计算机信息管理基础计算机信息管理基础n n逻辑运算符逻辑运算符逻辑运算符逻辑运算符运算符含义示例NOT逻辑非IfNOTa=10ThenAND逻辑与Ifa10ANDa100ThenOR逻辑或Ifa100Thenn n连接运算符连接运算符连接运算符连接运算符n连接运算符连接运算符“+”用于把用于把String型变量的内容连接起来。型变量的内容连接起来。例如：例如：stringTestTest=中国中国+重庆重庆/Test中包含中包含中国重庆中国重庆计算机信息管理基础计算机信息管理基础运算符的优先级运算符的优先级运算符的优先级运算符的优先级 优先级

8、优先级运算符运算符意义意义1(最高最高)()括号括号2+,-,+,-一元运算符一元运算符3幂运算幂运算4*,/乘、除乘、除5+,-加减及连接运算加减及连接运算6=,=,=,关系运算关系运算7NOT逻辑反逻辑反8AND逻辑与逻辑与9(最低最低)OR逻辑或逻辑或计算机信息管理基础计算机信息管理基础6 6）表达式）表达式）表达式）表达式n n表达式是由算术运算符、关系运算符及逻辑运算符表达式是由算术运算符、关系运算符及逻辑运算符表达式是由算术运算符、关系运算符及逻辑运算符表达式是由算术运算符、关系运算符及逻辑运算符连接起来的变量、常量构成的语法单位。连接起来的变量、常量构成的语法单位。连接起来的变量

9、、常量构成的语法单位。连接起来的变量、常量构成的语法单位。计算机信息管理基础计算机信息管理基础7 7）基本语句）基本语句）基本语句）基本语句（1 1）赋值语句）赋值语句）赋值语句）赋值语句语法格式为：nvariablename=expressionn其中，variablename代表变量名，expression代表表达式，也可以是字符串、数字、变量或常量以及数组等。在赋值语句中，若等号右边是表达式，则先将其结果转化为等号左边变量的类型后，再赋值给变量。如：s=a*h/2 计算机信息管理基础计算机信息管理基础（2）条件控制语句）条件控制语句nIF语句语句（a）单行）单行IFTHEN语句语句n语法

10、格式为：语法格式为：IFconditionTHENaction1ELSEaction2（b）多行多行IFTHEN语句语句n语法格式为：语法格式为：IF condition1 THENAction1 ELSEIF condition2 THEN Action2ELSE Action3END IF注意：多行注意：多行IFTHEN语句即使只有语句即使只有action1一个语句块，也需要一个语句块，也需要ENDIF表示多行表示多行IFTHEN的结束。的结束。计算机信息管理基础计算机信息管理基础nCHOOSECASE语句语句n适用于多分支选择结构适用于多分支选择结构n语法格式为：语法格式为：CHOOSE

11、CASEtest_expressionCASEexpression_list1statementblock1CASEexpression_list2statementblock2CASEexpression_listnstatementblocknCASEELSEstatementblockn+1ENDCHOOSE计算机信息管理基础计算机信息管理基础其中test_expression 是测试表达式，expression_list 是判断表达式，statements 是满足条件时执行的语句块，方括号表示该成分可以省略。expression_list可以使用如下的形式：用逗号分隔的一组数据，例如2

12、,4,7用to 表示一个区间范围，例如2 to 15用is 代表测试值，后跟关系运算符和比较值，例如is 30组合运用上述三种方法，并用逗号进行分隔，例如5,6,8 to 12,is 20计算机信息管理基础计算机信息管理基础（3）循环控制语句）循环控制语句nPowerScript的循环语句有两种形式的循环语句有两种形式DO LOOP和 FOR NEXT，可以与EXIT 和CONTINUE 语句配合使用nDOLOOP循环循环n四种形式结构分别为四种形式结构分别为:DO UNTIL condition LOOPDO WHILE condition LOOPDO LOOP UNTIL conditi

13、onDO LOOP WHILE conditionDO 表示循环的开始，LOOP 表示循环的结束，condition 表示循环条件,是逻辑表达式，其值为True 或False计算机信息管理基础计算机信息管理基础nDOUNTILconditionLOOP语法格式为：语法格式为：DO UNTIL conditionStatementblockLOOPn执行过程为执行过程为先判断控制条件condition，如果为false，则执行语句块statementblock，执行到LOOP后，接着判断条件condition，直到结果为true时结束循环。计算机信息管理基础计算机信息管理基础nDOWHILEco

14、nditionLOOP的语法格式：的语法格式：DO WHILE conditionStatementblockLOOPn执行过程为执行过程为先判断控制条件condition，如果为true，则执行语句块statementblock，执行到LOOP后，接着判断条件condition，直到结果为false时结束循环。计算机信息管理基础计算机信息管理基础nDOLOOPUNTILcondition的语法格式：的语法格式：DO StatementblockLOOP UNTIL conditionn执行过程为执行过程为先执行语句块statementblock，然后判断控制条件condition，如果为fa

15、lse，则继续执行语句块statementblock，直到condition的结果为true时结束循环。计算机信息管理基础计算机信息管理基础nDOLOOPWHILEcondition的语法格式为：的语法格式为：DO StatementblockLOOP WHILE conditionn执行过程执行过程先执行语句块statementblock，然后判断控制条件condition，如 果 为 true，则 继 续 执 行 语 句 块statementblock，直到condition的结果为false时结束循环。计算机信息管理基础计算机信息管理基础nFORNEXT语句语法格式为：语句语法格式为：F

16、OR varname=start TO end STEP incrementStatementblockNEXT其中，varname 是循环变量，可以是任意的数值类型，start、end 分别是循环变量的初值和终值。increment 是每次循环后循环变量的步长增量，缺省值为1，statements 是一组语句称做循环体。FOR-NEXT 语句的执行过程为：循环变量varname 从start 开始到end 为止，重复执行循环体，每执行一次varname，被重新赋新值为varname+increment。计算机信息管理基础计算机信息管理基础（4 4）EXIT语句语句EXIT语句是中途结束循环的

17、语句。注意：如果在循环嵌套中使用EXIT语句，那么执行EXIT语句只能退出当前层的循环，而不能退出所有循环。（5）CONTINUE语句语句CONTINUE语句控制循环的执行使之返回循环开始处。计算机信息管理基础计算机信息管理基础（6 6）RETURNRETURN语句语句nRETURN语句立即终止事件处理，程序或函数的执行把控语句立即终止事件处理，程序或函数的执行把控制返回到调用程序，其语法格式为：制返回到调用程序，其语法格式为：RETURNexpressionn其中其中expression是个表达式，其值作为事件处理程序或函是个表达式，其值作为事件处理程序或函数的返回值。数的返回值。（7 7）

18、HALTHALT语句语句nHALT语句用于终止应用程序的运行，其语法为：语句用于终止应用程序的运行，其语法为：HALTCLOSEn其中其中CLOSE是个可选项，当是个可选项，当HALT语句不带语句不带CLOSE选项选项时，该语句立即终止应用程序的运行；当时，该语句立即终止应用程序的运行；当HALT语句带语句带CLOSE选项时，执行到该语句后应用程序先执行应用对象选项时，执行到该语句后应用程序先执行应用对象的的Close事件处理程序，之后再终止应用程序的运行。事件处理程序，之后再终止应用程序的运行。计算机信息管理基础计算机信息管理基础8）常用标准函数）常用标准函数（1）MessageBox()函

19、数函数使使用用MessageBox()函函数数可可以以向向用用户户显显示示或或提提示示各各种种信信息。语法如下：息。语法如下：MessageBox(title,text,icon,button,default)ntitle是一个被用来确定是一个被用来确定MessageBox标题的字符串。标题的字符串。ntext是在是在MessageBox中显示的文本。中显示的文本。nicon用用来来指指示示显显示示在在MessageBox左左侧侧的的图图标标。可可选选的的值值有有Information!StopSign!、Exclamation!、Question!、None!。计算机信息管理基础计算机信息管

20、理基础nbutton用用来来指指示示你你想想要要显显示示的的命命令令按按钮钮的的集集合合。这这些些值值是是OK!、OKCancel!、YesNo!、YesNoCancel!、RetryCancel!、AbortRetryIgnore!。默默认认值值是是OK!。ndefault指定默认的按钮指定默认的按钮n函函数数返返回回值值：Integer，函函数数执执行行成成功功时时返返回回用用户户选选择的按钮编号例如择的按钮编号例如1,2,3等，发生错误时返回等，发生错误时返回-1n举例：举例：ll=MessageBox(保存修改保存修改,您修改了数据现在是否您修改了数据现在是否保存保存,Question

21、!,YesNoCancel!)计算机信息管理基础计算机信息管理基础（2）Open函数函数n打开一个打开一个PowerBuilder窗口窗口n格式：格式：Open(window-name)（3）Close函数函数n关闭一个关闭一个PowerBuilder窗口窗口n格式：格式：Close(window-name)n例如：例如：下面的代码关闭窗口下面的代码关闭窗口w_employee然后打开窗口然后打开窗口w_departmentsClose(w_employee)Open(w_departments)计算机信息管理基础计算机信息管理基础（4）数据类型检查函数）数据类型检查函数数数据据类类型型检检查

22、查函函数数又又称称为为Is簇簇函函数数它它们们用用来来判判断断一一个个字字符符串串是是否否符符合合某某种种数数据据类类型型的的格格式式，返返回回值值是是一一个个布布尔类型的值。尔类型的值。Is簇函数的语法格式为：簇函数的语法格式为：nIs*(string)其中string为要测试的字符串。nIsNumber()用于测试某字符串是否为有效数值。用于测试某字符串是否为有效数值。nIsDate()检测指定的字符串是否包含有效日期。检测指定的字符串是否包含有效日期。nIsTime()检测指定的字符串是否包含有效时间。检测指定的字符串是否包含有效时间。nIsNull()测试某变量或表达式的值是否为测试某

23、变量或表达式的值是否为Null。计算机信息管理基础计算机信息管理基础（5）数据类型转换函数）数据类型转换函数Integer(string)将字符串转化为整将字符串转化为整型型Long(string)将字符串转化为长整将字符串转化为长整型型Real(string)将字符串转化为实将字符串转化为实型型Double(string)将字符串转化为双精度将字符串转化为双精度型型Dec(string)将字符串转换成将字符串转换成Decimal类型的值类型的值 String()各种不同的数据类型转化为字符串各种不同的数据类型转化为字符串计算机信息管理基础计算机信息管理基础9)自定义函数自定义函数n参数的传递

24、方式有以下三种：参数的传递方式有以下三种：Value 表示值传递，将实际参数的值传递给函数。Reference地址传递，把实际参数的地址传递给函数，如果函数修改了形式参数的值，则实际参数的值也就被修改了。Readonly只读地址传递，把实际参数的地址传递给函数，但不允许修改参数的值。计算机信息管理基础计算机信息管理基础9)自定义函数自定义函数n自定义全局函数自定义全局函数（1）选择FileNew菜单项，或在工具栏中单击New图标，打开New对 话 框，单 击 PB Object选项卡。（2）选择Function图标，然后单击OK按钮，或者直接双击该图标，打开Function画板 计算机信息管理

25、基础计算机信息管理基础9)自定义函数自定义函数（3）在Function Name项中输入函数名，自定义全局函数的命名一般用“f_”开头，命名规则即标识符的命名规则；在Return Type下拉列表框中选择函数的返回值类型，如果函数没有返回值，则选择“None”项；在Pass By下拉列表框中选择参数传递方式；在Argument Type下拉列表框中选择参数类型；在Argument Name项中输入参数名（即形式参数，简称形参），命名规则即标识符的命名规则。（4）编写完函数脚本后可以编译并保存该函数。计算机信息管理基础计算机信息管理基础7.数据窗口数据窗口n数据窗口的设计思想一个数据窗口通常由数

26、据窗口控件数据窗口控件和数据窗口对数据窗口对象象两部分组成。数据窗口控件数据窗口控件是被粘贴到窗口上的窗口级对象，提供了一个展示数据窗口对象的窗户，它可以在窗口中通过画板工具栏创建。数据窗口对象数据窗口对象直接关联数据表，主要用于显示数据并允许用户增删改数据。通过在数据窗口中控件的Data Object属性中设置有关的数据窗口对象的名字，将数据窗口对象和窗口联系在一起，并把数据对象显示给用户。计算机信息管理基础计算机信息管理基础n数据窗口对象有两个重要术语：数据窗口对象有两个重要术语：数据源和数据显示风格数据源和数据显示风格数据源指如何获取数据，即数据的来源。显示风格指数据窗口对象以何种格式显

27、示给用户，即用户如何和数据窗口交互。n创建数据窗口对象的步骤创建数据窗口对象的步骤:File-New-DataWindow-选择表现风格、数据源（Data source）设置数据表及数据列保存 计算机信息管理基础计算机信息管理基础n数据窗口对象的工作带数据窗口对象的工作带计算机信息管理基础计算机信息管理基础数据窗口中各工作带的作用数据窗口中各工作带的作用工作带名工作带名作作用用标题带（Header）用来显示位于屏幕或页面顶端的信息，如列标题、报表标题及其它页眉信息（如日期等）细目带（Detail）用来显示和操作来自数据源的数据，是数据窗口的主体汇总带（Summary）用来显示所有数据的汇总信息

28、，如求总和、平均值等脚注带（Footer）显示位于屏幕或页面底端的信息，如页数、页号、报表注释信息等计算机信息管理基础计算机信息管理基础数据窗口的应用数据窗口的应用n数据窗口对象定义好之后，一般要与窗口界面上的数数据窗口对象定义好之后，一般要与窗口界面上的数据窗口控件相关联，用户通过数据窗口控件据窗口控件相关联，用户通过数据窗口控件(dw_1)操操作数据窗口对象，进而操作数据库。作数据窗口对象，进而操作数据库。n下面一小段程序代码说明了使用默认事务对象下面一小段程序代码说明了使用默认事务对象SQLCA连接到一个连接到一个ASA数据库，以及检索该数据库数据库，以及检索该数据库的方法：的方法：SQ

29、LCA.DBMS=ODBCSQLCA.AutoCommit=FalseSQLCA.DBParm=ConnectString=DSN=my_DB;UID=dba;PWD=sqlconnect;dw_1.settransobject(SQLCA)IF SQLCA.SQLCode 0 THENMessageBox(连接失败,不能连接到数据库原因为+SQLCA.SQLErrText)RETURNEND IFdw_1.retrieve()/数据从数据库检索到数据窗口中Disconnect；计算机信息管理基础计算机信息管理基础数据窗口数据窗口上述程序段包括下列几步：上述程序段包括下列几步：与数据库连接为数

30、据窗口设置事务对象进行数据库处理（查询、修改）断开与数据库连接即：即：/写在应用的open事件中 创建事务对象，并赋值，使其与数据库相连。connect；/写在窗口的open事件 settransobject()retrieve()/写在应用的close事件中 disconnect 删除自己创建的事务对象(destroy)计算机信息管理基础计算机信息管理基础数据窗口数据窗口n常用函数说明：常用函数说明：nSettransobject()：将一个事务对象与DataWindow控件联系起来。nRetrieve()：读取数据库中的数据。nInsertRow(row)：向DataWindow控件插入一

31、个新行。nDeleteRow(row)：从DataWindow控件中删除一行。当参数的值为0 时删除当前行。nUpdate()：将DataWindow中所做的改变应用到数据库中。计算机信息管理基础计算机信息管理基础数据窗口常用函数数据窗口常用函数n连接事务对象的函数连接事务对象的函数Settransobject()函数n参数为事务对象n例：dw_1.Settransobject(sqlca)n滚动数据行函数滚动数据行函数Scroll()和ScrollToRow()函数 nlong dwcontrol.Scroll(long number)nnumber指定要滚动的方向和行数。number为正数

32、，表示向下滚动；若number为负数，表示向上滚动。如果该函数执行成功，那么将返回数据窗口控件中可见的第一行的行号；如果执行失败，则返回-1。计算机信息管理基础计算机信息管理基础数据窗口常用函数数据窗口常用函数nRetrieve()函数函数Retrieve函数的功能是用指定的事务对象从数据库中把数据检索到数据窗口进行显示。Retrieve函数的语法格式为:long dwcontrol.Retrieve(any argument,any argument.)其中：argument是可选参数，它表示在数据窗口对象中定义的检索参数，这些参数的顺序必须和定义时的顺序相同。如果调用成功，则返回检索出的记

33、录行数；否则，返回-1。计算机信息管理基础计算机信息管理基础数据窗口常用函数数据窗口常用函数(*)nInsertRow()函数用来在数据窗口的主缓冲区中插入一条新记录。其语法格式为：long dwcontrol.InsertRow(long row)其中：row用于指定新行的插入位置。若row为0，则表示在所有记录的最后插入新行。例如：dw_1.InsertRow(0)计算机信息管理基础计算机信息管理基础数据窗口常用函数数据窗口常用函数(*)nDeleteRow()函数函数DeleteRow函数用来在数据窗口的主缓冲区中删除一行。其语法格式为：Integer dwcontrol.DeleteR

34、ow(long row)其中：row表示要删除的行的行号。若row为0，则表示要删除当前行。例如：dw_1.DeleteRow(5)表示删除数据窗口控件中的第5条记录。计算机信息管理基础计算机信息管理基础数据窗口常用函数（数据窗口常用函数（*）nUpdate()函数函数Update函数用来把数据窗口上数据的变化更新到数据库中。Update函数的语法格式为：integer dwcontrol.Update(boolean accept,boolean resetflag )其中：参数accept是一个布尔值，如果该值为true，表示在更新之前调用AcceptText函数。参数resetflag用来确定数据窗口更新后是否重设更新标记。该函数执行成功，则返回1，否则返回-1。例如:if dw_1.Update()0 thencommit;/提交elsemessagebox(,无法对数据保存!)rollback;/返回end ifn注释：在调用update函数后，必须做事务的管理工作，即：使用SQL语句COMMIT或ROLLBACK来结束更新操作。计算机信息管理基础计算机信息管理基础本讲回顾本讲回顾nPowerBuilder编程基础编程基础应用对象 窗口对象和常用窗口控件 建立菜单 脚本语言powerscript 数据窗口 函数计算机信息管理基础计算机信息管理基础TheEND