会计信息化习题.doc

三、综合题 试说明Local变量和Instance变量的区别？ 答：在事件和函数中定义的变量都是Local变量，它的作用范围仅在所在的事件和函数内，在别的事件和函数中不起作用。Instance变量是一种特殊的变量，它的作用范围是不仅在对象的全部事件及函数，而且包括该对像的所有控件的事件及函数。 请说明PB的 Parent、This代词的作用是什么? 答：Parent 用于引用当前对象的父对象或包含当前对象的对象，它可以用于窗口中的控件、用户对象和菜单。 This 用于引用包含当前程序的对象，即引用当前对象自身的属性或事件等。 举例说明adaptive sever anywhere数据库的操作步骤 答：（1）单击工具栏上的database图标 （2）在弹出的database画板中，打开objects子窗口，展开“ODB ODBC”项下的utilities目录 （3）双utilities目录下的“Create ASA database”项，弹出“Create adaptive server anywhere database”对话框 （4）单击“Browse……”按钮，??出“create Database”对话框，在对话框中选择\mypbex目录，在文件名一栏中输入数据库名称“mydatabase”,单击保存，返回“Create adaptive server anywhere database”。 （5）使用默认的用户usetid项“dba”和默认的口令password项“sql”,单击OK按钮。PB在\mypbex目录下创建一个ASA数据库mydatabase.db，同时，自动为数据库配置ODBC和DB Profile,并且已经连接到新建数据库 编写下面修改密码窗口修改按钮的代码： 要求：sle_xmm和sle_qrmm中的数据要相同；原密码不能输入错误；密码修改成功或失败都要有弹窗信息提示。（用户名g_yhm和密码联系数据库表c_oper中的yhm和psdl两列。） 答：string r_ymm,r_xmm,r_qrmm,r_password,r_yhm integer Net r_ymm=trim(sle_ymm.text) r_xmm=trim(sle_xmm.text) r_qrmm=trim(sle_qrmm.text) select yhm,psd into :r_yhm,:r_password from c_oper where yhm=:g_yhm; if trim(r_password) r_ymm then messagebox(提示,原始密码错误！请重新输入！) return end if if r_xmmr_qrmm then messagebox(提示,两次密码输入不一致！请重新输入！) return end if update c_oper set psd=:r_xmm where yhm=:g_yhm; if sqlca.sqlcode=0 then commit; messagebox(提示,密码更改成功！) sle_ymm.text= sle_xmm.text= sle_qrmm.text= else rollback; messagebox(提示,密码更改失败！) end if 为下面的代码改错并说明该段代码的功能：（数据库名为test） SQLCA.DBMS = ODBC SQLCA.AutoCommit =True SQLCA.DBParm = ConnectString=DSN= test1;UID=sql;PWD=dba connect; if sqlca.sqlcode 1 then MessageBox (数据库连接错误, sqlca.sqlerrtext) return end if 正确的代码： SQLCA.DBMS = ODBC SQLCA.AutoCommit = False SQLCA.DBParm = ConnectString=DSN=test;UID=dba;PWD=sql connect; if sqlca.sqlcode 0 then MessageBox (数据库连接错误, sqlca.sqlerrtext) return end if 下面是一段登录窗口某控件判断用户合法性的代码，请改正有关代码的错误： string r_pass ,integer r_count g_oper_code=sle_oper_code.text r_pass=sle_password.text select count(*) to :r_count from c_opera