2011年VFP_数据库复习重点及参考答案.doc

2011年VFP复习重点及参考答案，学生在复习时不要死背答案，要弄清概念，做到触类旁通。 一、选择题1. 将D盘根目录下VFP文件夹设置为默认工作目录的命令是（ C ）A）set date to d:vfp B）set fields to d:vfp C）set default to d:vfp D）set filter to d:vfp2. 二维表中的每一列称为一个字段，在信息模型中也称为关系的一个（ A ）A）属性B）元组C）元素D）实体3. 在关系数据库的基本操作中，从关系中抽取满足条件的元组的操作称为（ C ）A）投影B）更新C）选择D）连接4. 数据库（DB）、数据库系统（DBS）、数据库管理系统（DBMS）三者之间的关系是：（ A ）A）DBS包括DB和DBMSB）DBMS包括DB和DBS C）DB包括DBS和DBMSD）DBS包括DBMS不包括DB5. 二维表中的每一行称为一个记录，在信息模型中也称为关系的一个（ D ）A）分量B）属性C）元素D）元组6. 按照数据模型的不同，数据库管理系统可分为网状型、关系型和（ C ）A）数据型B）逻辑型C）层次型D）概念型7. 在用户观点下，关系模型中数据的逻辑结构是一张（ D ）A）VFP报表B）自由表C）一维表D）二维表8. 字符型常量是用定界符括起来的字符串，字符型常量的定界符包括（ C ）A）英文单引号、英文双引号、圆括号B）中文单引号、中文双引号、方括号C）英文单引号、英文双引号、方括号D）英文单引号、英文双引号、花括号9. 函数len ( str (3.14159 ,6 ,2) )的值为（ C ）A）3.14B）3.1416C）6 D）210. 在关系数据库的基本操作中，从关系中抽取指定列的操作称为（ C ）A）连接B）、插入C）投影D）选择11. 函数mod( 17 , int ( pi( ) ) )的值为（ B ）A）1 B）2 C）3 D）412. 函数year(date()的数据类型是（ A ）A）数值型B）字符型C）逻辑型D）日期型13. 函数bof()和eof()的数据类型是（ D ）A）数值型 B）字符型C）日期型 D）逻辑型14. 函数val (100*2) 的结果是（ A ）A）100.00B）200.00C）100*2 D）20015. 设置日期型数据的年份以4位显示的命令是（ D ）Aset century to 1 Bset century to 4Cset century offDset century on16. 函数len(str(3.14)的结果是（ B ）A）4B）10C）8D）3.1417. 设置严格日期格式应使用的命令是（ B ）A）set strictdate to 0 B）set strictdate to 1 C）set strictdate off D）set strictdate on18. 执行命令store 2011-06-10 TO rq后，表达式day(rq)+asc(A)的值为（ A ）A）75B）65C）10D）类型不匹配19. 函数substr(吉林工程技术师范学院,5,4)的值为（ D ）A）技术师范 B）技术师范 C）工程 D）工程 20. 在下列表达式中，语法上不正确的是：（ C ）A）date()+10 B）date()-10C）date()+2011/05/20 D）date()-2011/05/2021. 教材上的表rsb.dbf打开后，执行下面命令后，使函数EOF（）.T. 的是（ B ）A) display all while 性别=男B) display for 性别=男C) display next 5 for 性别=男D) display while 性别=男22. 函数 SUBSTR(12345.678 , 5 , 3) 的结果是（ B ）A）5.7B）5.6C）5.7D）5.6 23. 如果要在表中某一字段存放很多文本信息，（大于255个字符以上），该字段类型应定义为：（ B ）A）字符型 B）备注型C）逻辑型 D）日期型24. 执行命令store CTOD(06/20/2011) TO x 后，变量x的类型为：（ D ）A）数值型B）字符型C）逻辑型 D）日期型25. 表达式17%5+23的值为（ B ）A）4B）10C）64D）826. 以下关于“视图”的描述正确的是（ C ）A）视图保存在项目文件中B）视图保存在表文件中C）视图保存在数据库中D）视图保存在视图文件中27. 以下关于主索引的说法中正确的是（ D ）A）主索引的关键字值可以为NULLB）在自由表中可以建立主索引C）可以在一个数据库表中建立多个主索引D）数据库中的任何一个数据表只能建立一个主索引28. Visual FoxPro中程序文件的扩展名为（ D ）A）.SPRB）.QPR C）.MPRD）.PRG29. 在下列表达式中，语法上不正确的是：（ D ）A）2010-07-01 +2 2010-07-03 B）123+23412345C）LEN(1234567)+6=13 D）1234+5 =1234530. 设置set exact off ，执行命令x=abcd和 y=ab后，执行命令? x=y ，y=x后显示的结果是（ C ）A) .T. .T.B) .F. .F.C）.T. .F.D) .F. .T.31. 关于Visual FoxPro的变量，下面说法中正确的是：（ C ）A) 数组元素的下标下限是0B) 使用一个简单变量之前要先定义C）数组中各数组元素的数据类型可以不同D) 定义数组后，系统为数组的每个元素赋以逻辑值.T.32. 在do while enddo 循环结构中，exit命令的作用是（ B ）A）退出过程，返回程序开始处B）终止本层循环，将控制转移到本循环结构enddo 后面的第一条语句继续执行C）终止程序的执行D）终止本次循环，转移到do while语句行，开始下一个判断和循环33. 下列关于对象事件的说法，正确的是（ D ）A) 用户可以建立新的事件B) 不同对象可以识别的事件都是一样的C) release是一个事件 D)事件是预先定义好的、能够被对象识别的特定动作34. 主名与表名相同，并且随表的打开而自动打开，在增删记录或修改关键字值时会自动更新的索引文件是（ C ）A) 单索引文件B) 多索引文件C）结构复合索引文件D) 非结构复合索引文件35. s1=数据，s2=数据字典，下列列出的哪个表达式的值为.T. （ C ）A）s1 = s2B）s1 = = s2 C）s1 $ s2D）s2 $ s136. 关于Visual FoxPro数组的叙述中，下面说法中错误的是：（ C ）A）用declare或dimension都可以定义数组 B）Visual FoxPro中数组的下标下界为1C）一个数组中各个数组元素必须是同一数据类型D）新定义数组的各个数组元素初值是.F.37. 在程序中未作过特殊说明的变量均属于什么变量（ A ）A）私有B）公共C）本地D）系统38. 在代码中引用对象时，要指定对象的名字，将文本框默认名字“text1”改为“txt编号”，应设置文本框的哪个属性：（ B ）A）captionB）nameC）formatD）value39. 数据表有20条记录，当前记录号是10，使用INSERT BLANK命令添加一条空记录，此空记录的记录号是：（ C ）A）1B）21C）11D）1040. 如果一个运算表达式中包含有逻辑运算、关系运算和算术运算，那末这样的综合型表达式的运算顺序是（ D ）A）逻辑算术关系B）关系逻辑算术C）算术逻辑关系D）算术关系逻辑41. 有关查询与视图，下列说法中不正确的是：（ B ）A）视图的结果可修改并存回源表，查询的结果只供浏览， B）查询和视图都可以更新数据源C）视图本身不含数据，是在打开它时从源表中提取 D）查询文件是一个独立的文件，视图是数据库的一部分42. 两表之间“临时性”联系称为关联，在两个表之间的关联已经建立的情况下，有关“关联”的正确叙述是：（ D ）A）建立关联的两个表一定在同一个数据库中B）两表之间“临时性”联系是建立在两表之间“永久性”联系基础之上的C）当关闭父表时，子表自动关闭D）当父表记录指针移动时，子表记录指针按一定的规则跟随移动43. 只能在建立它的程序模块中使用，不能在上级程序模块和下级程序模块中使用的变量称为：（ D ）A) 系统变量B）公共变量C）私有变量D）本地变量44. 设置set exact off ，执行命令x=abcd和 y=ab后，执行命令? IIF(x=y,yes,no) , IIF(y=x,yes,no) 后显示的结果是（ C ）A) no noB) yse yesC）yes noD) no yse45. 结构化程序设计的三种基本逻辑结构是（ B ）A）选择结构、循环结构和嵌套结构B）顺序结构、循环结构和选择结构C）选择结构、循环结构和模块结构D）顺序结构、递归结构和循环结构46. 执行命令 ? empty(chr(13) , empty() , empty(chr(0) , empty(space(5)显示的结果是（ B ）A）.F. .T. .F. .F.B）.T. .T. .F. .T. C）.F. .T. .F. .F.D）.T. .T. .T. .T.47. 下面关于关系表达式的正确说法是（ C ）A）关系运算符两边的表达式的类型可以不一致B）关系表达式运算的结果不是逻辑值C）关系运算符在运算顺序上没有优先之分，总是先到先算D）关系运算符只能对字符串进行比较48. 打开查询设计器和运行查询文件cx的命令分别为（ C ）A）modi command 和 do cx.prgB）modi form 和 do form cx.scx C）modi query 和 do cx.qpr D）modi view 和 use cx二、填空题1. 打开表、数据库、查询、视图等各种设计器的命令动词是（modify） 2. 参照完整性删除规则中如果选择“级联”选项，则自动删除哪个表中相关的所有记录：（ 子表 ）3. 用SET RELATION命令建立的表之间的关系是：（ 临时关系 ）4. 数据表有20条记录，当前记录号是10，使用APPEND BLANK命令添加一条空记录，此空记录的记录号是：（ 21 ）5. 在VFP中，数据库设计器中能建立两个表之间的联系，这种联系是（永久性联系）6. 定位记录时，从当前记录向前或向后移动若干条记录位置的命令是：（ skip ）7. 数据库表之间的建立的关系是：（ 永久关系 ）8. 对于用于建立主索引或候选索引的关键字段，要求该字段的各个值必须是：（ 唯一的 ）9. 要在按钮上显示文本“确定”，要设置按钮的哪个属性：（ caption ）10. DELETE命令（非SQL命令）不带范围和条件短语时将逻辑删除表的：（ 当前记录 ）11. 为了确保有关数据库表之间数据的一致性，需要设置的规则为：（ 参照完整性 ）12. 用来刷新表单的方法为（ refresh ）13. 将文本框的value属性值设置为，则在文本框中应输入什么类型的值：（ 日期型 ）14. 事件触发方式分为三种，可由用户触发、系统触发和（ 代码触发 ）15. 创建表单时触发的事件是load、active、init、gotfocus、destroy中的哪一个事件（ init ）16. 能在标签上显示文本的属性是：（ caption ）17. 代码thisform.label2.backcolor=rgb(0,255,0)是将标签的背景色设置成什么颜色：（ 绿色 ）18. 从文本框中取得数据的属性是：（ value ）19. 输入密码时，要求输入数据的输入格式为6位数字，应将文本框的哪个属性设置为999999：（ inputmask ）20. 在表单中新建一个自定义属性x ，在命令按钮的单击事件代码中要引用这个属性时，应该写成：（ thisform.x ）21. 确定控件能否起作用的属性是：（ Enabled ）22. 使某个控件获得焦点的方法是（ setfocus ）23. 表单的init、activate、load三种事件中，其执行的先后顺序是：（ load、init、activate ）24. 当在文本框中输入密码时，想要显示一串星号“*”，需要设置哪个属性：（ passwordchar ）25. 从内存中释放当前表单的方法是：（ release ）26. 能使标签上超过标签宽度的文本内容换行显示的属性是：（ wordwrap ）27. 能将文本框与表中字段进行绑定的属性是：（ controlsource ）28. 文件框在焦点失去之前发生的事件是：（ valid ）29. 将文本框的value属性值设置为0，则在文本框中应输入什么类型的值：（ 数值型 ）30. 当在文本框中输入密码时，想要显示一串星号“*”，需要设置哪个属性：（ passwordchar ）31. 编写事件代码时，常常要引用对象，关键字this表示引用本对象，那么 this.parent表示什么：（ 引用本对象的容器）32. 执行“表单1.scx”的命令为：（do form 表单1 ）33. 创建或修改程序文件的命令是：（ modify command ）34. 函数messagebox(输入的密码错误, 1+48 , 错误信息 )中，48表示信息对话框中有什么图标（ 惊叹号 ）35. 输入编号时，要求输入数据的输入格式为6位数字，应将文本框的inputmask属性设置为：（ 999999 ）36. 修改表单的命令是：（ modify form ）37. 在代码中为表单中标签Label2设置前景色为兰色的命令是：（ thisform. Label2.forecolor=rgb(0,0,255) ）38. 在代码中为表单中标签Label2设置字号为18的命令是：（ thisform. Label2.fontsize=18 ）39. 从内存中释放表单的命令是：（thisform.release）40. 刷新当前表单的命令是：(thisform.refresh)41. 使表单中文本框text2获得焦点的命令是：（thisform.text2.setfocus）42. 在标签2上显示文本框2内容的命令是：(thisform.label2.caption=thisform.text2.value)43. 打开程序编辑窗口的命令是：（modify command ）44. 函数messagebox(输入的密码错误, 1+48 , 错误信息 )中，参数1+48中的1表示信息对话框中有什么按钮（ 确定、取消 ）45. 对循环for i=1 to 5 step 2 ，当循环结束后，循环变量i的值是：（ 7 ）R1R3R2R4R546. 在建立含有参数传递子程序时，子程序的第一条语句必须是（ para ）47. 在某一级程序定义的变量，可以在那一级程序及以下各级子程序中使用，这样的变量称为：（ 私有变量 ）48. 对右图所示的二叉树，写出先序遍历、中序遍历和后序遍历（R1R2R4R5R3 R4R2R5R1R3 R4R5R2R3R1）三、判断题1. 使用二维表来表示实体及实体之间联系的数据模型称为面向对象模型（ ）2. 在建立一对多关系中，要求一端表中的主索引字段值与多端表中的普通索引字段值相同（ ）3. 表中有10条记录，当前记录为第6条记录，执行SKIP -2命令后，当前记录变为第8条记录（ ）4. 实体只能是具体的人和事物，不可以是抽象的概念（ ）5. 自然连接是指在连接运算中，按照关键字段值对应相等为条件的连接操作（ ）6. 要想显示以X开头的所有内存变量，正确的命令是：LIST MEMORY LIKE X*（ ）7. 在输入日期型数据时，可以不用进行任何设置，就可以对变量进行任何格式日期数据的赋值（ ）8. 如果当前打开的数据表中某一字段名与当前某一内存变量重名，则内存变量优先于字段变量（ ）9. 查看数据表的结构可以用表设计器或执行MODI STRU命令（ ）10. 在书写表达式中，中文标点符号和英文标点符号都可以作为Visual FoxPro命令中的分界符（ ）11. 在Visual FoxPro中，逻辑型常量只有两个值，用“真”或“假”表示（ ）12. 对任何合法的Visual FoxPro命令来说，范围的默认选项都是ALL（ ）13. 用ZAP命令可以一次将当前数据表的记录清除，但仍可以用RECALL命令恢复（ ）14. seek索引查询是在当前表的主控索引中按索引关键字搜索满足表达式的全部记录（ ）15. 使用LOCATE 命令在表中查找满足条件的记录，若查不到满足条件记录，EOF( )函数的返回值为 .T. （ ）16. REPLACE命令有计算功能，可以将一个表达式的值计算出来后赋给数据表中的相应字段（ ）17. 结构化复合索引和非结构化复合索引文件的主文件名与表的文件名都相同（ ）18. 两表按关键字建立关联，命令“set relation to into ”中的为子表的别名：（ ）19. 两表按关键字建立临时关联，命令“set relation to into ”中的指的是父表的关键字：（ ）20. 用“视图设计器”设计的视图是作为一个独立的文件保存在磁盘上的（ ）21. 两表要按关键字建立表间临时关联，要求父表必须先按关键字建立索引并设置为主控索引：（ ）22. 用“查询设计器”设计的查询是作为一个独立的文件保存在磁盘上的（ ）23. 在数据库打开以后，可以利用“USE 视图名”命令打开数据库中的视图，并可以在浏览窗口里显示和修改视图中的内容（ ）24. 数据库中“参照完整性”的插入规则是用于指定父表中插入记录时所应遵循的规则（ ）25. 公共变量一旦建立就一直有效，直到程序运行结束返回命令窗口时才消失（ ）26. 数据库中“参照完整性”的更新规则和删除规则是用于指定父表中修改关键字或删除父表中记录时所应遵循的规则（ ）27. 用public 定义的公共变量，在程序终止时才自动清除（ ）28. 在建立含有参数传递子程序时，子程序的第一条语句必须是 para （ ）29. 在本级程序中未经特殊说明的变量均属性私有变量，这些变量只能在本级程序中使用。（ ）30. 在本级程序中用private 声明的私有变量，当本级程序结束返回上级程序时自动清除，不会影响上级程序中同名变量的值（ ）四、写出下列程序的运行结果（注意：这类题不会出原题，切记不要死记硬背，要学会读程序！）常用对象、事件、方法、属性thisform clickvalueThis.parent ReleaseinputMasklabel refreshpasswordchartextcaption controlsourcecommand autosizesetfocus optiongroup forecolorenabledcheckbackcolor gotfocus loadwordwrapvalidinitfontsizeinterval activatefontboldautocenter1. 下列程序执行结果显示的是（ b2000 ） t = 2000do casecase t 2000? acase t 0? bCase t 1000? cendcase? 20002下列程序执行结果显示的是（ .f. ） Store .t. to yastore .f. to ybstore b to nstore y&n t o m? &m3下列程序执行结果显示的是（ ）。i=0do while i=2*i-1? *n=n-1enddoi=i+1enddo4执行下列程序后，输出的结果为（ 11 ，25 ）。s=0for i=1 to 10if mod(i,2)=0loopendifs=s+iendfor? i,s5执行下列程序后，显示的结果分别为（ sub 7,9 ; 3,9 ）x=3y=5do sub? x,yreturnproc subprivate xx=7y=9? sub ,x,yreturn五、对教材中的打开的表rsb.dbf, 写VF命令（注意：这类题不会出原题，切记不要死记硬背，要掌握每个命令的格式！）1. 显示第2条到第6条记录Go 2 （按回车键） List next 52. 冯小珊评上了副教授，并调到a03部门，请用replace命令对rsb.dbf做相应修改。Replace 职称 with 副教授 , 部门代码 with a03 for 姓名=冯小珊3. 恢复所有被逻辑删除的记录recall all4. 对未婚职工按职称升序排序，当职称相同时按姓名降序排序，生成排序表文件pxe2.dbfSort to pxe2 on 职称,姓名/d for .not. 婚否5. 查找性别为“女”的第1条记录；找到后继续往下查找满足条件的记录locate for 性别=女 （按回车键） continue6. 统计1968年以后出生的（含68年）已婚人数，并将结果存入内存变量yhrs。count to yhrs for 婚否 .and. year(出生日期)=19687. 计算教授的平均基本工资，并将结果存入内存变量jspjaverage 基本工资 to jspj for 职称=” 教授”8. 先按部门建索引，索引标识为“dm ” ；再按部门汇总基本工资，结果存入表bmhz.dbfIndex on 部门代码tag dm （按回车键） Total on 部门代码 to bmhz fields 基本工资9. 用SQL命令查询rsb.dbf表中李姓职工的记录，要求显示编号、姓名、性别、职称字段select 编号,姓名,性别,职称 from rsb where 姓名 like 李%10. 打开数据库SJK.DBC ；对表rsb.dbf建立一个用于统计各类职称人数的视图zcstopen database sjk （按回车键） create sql view zcrs as select rsb.职称,count(*) as 人数 from rsb group by 职称11. 写出与replace 基本工资 with 基本工资+50 for 职称=讲师 功能相同的SQL命令update rsb set 基本工资=基本工资+50 where 职称=讲师12. 选择1号工作区 ；打开人事表rsb.dbfSelect 1 （按回车键） use rsb13. 用浏览窗口，浏览姓名中第2个字为开的记录 browse for substr(姓名,3,2)= 开14. 逻辑删除基本工资大于等于3000或基本工资小于等于2000的记录delete for 基本工资=300015. 在表尾追加一条空白记录Append blank16. 建立结构复合索引文件，记录以关键字“性别”降序排序，性别相同的按关键字“出生日期”降序排序索引标识为xbcsrqindex on性别+dtos(出生日期) tag xbcsrq desc17. 指定索引标识“xm”为主控索引 ；索引查询姓名为董开宁 的记录(rsb.dbf已按“姓名”字段建立结构复合索引，索引标识为“XM”)set order to tag xm （按回车键） seek 董开宁18. 计算rsb.dbf中的所有记录的基本工资合计值，并将结果存入内存变量hjSum 基本工资 to hj19. 用Calculate命令计算rsb.dbf中教授的人数、教授的最高、最低和平均基本工资，统计结果存入数组js中。Calculate cnt(),max(基本工资),min(基本工资),avg(基本工资) for职称=教授 to array js20. 先打开数据库SJK.DBC；再打开数据库设计器open database sjk （按回车键） modify database21. 求出计算机系职工的平均基本工资（提示：bmdm表有代码和部门名称字段，rsb表按关键字“部门代码”内连接到bmdm表的”代码”字段）select bmdm.部门名称 ,avg(基本工资) from rsb inner join bmdm on rsb.部门代码=bmdm.代码 where bmdm.部门名称=计算机系22. 写出与 delete for 姓名=陈宏 功能相同的SQL命令delete from rsb where 姓名=陈宏23. 用SQL查询命令创建一个表sqlgzhz.dbf，实现对表rsb.dbf按“性别”分类，对“基本工资”字段进行汇总。select 性别,sum(基本工资) from rsb group by 性别 into table sqlgzhz24. 清除第一字符为a且由两个字符构成变量名之外的所有变量Release all except a?25. 计算表达式48 并赋给变量ab,ac,abcStore 4+8 to ab,ac,abc26. 显示a开头的所有变量List memory like a* 27. 定义具有10个元素的一维数组a，并对a数组所有元素赋值为8Dimension a(10) （按回车键）a=828. 将日期格式设置为美国格式Set date to usa29. 将带有备注文件，已关闭的表rsb复制一个名为rsbbak的表Copy file rsb.* to rsbbak.*30. 为表rsb.dbf设置过滤器，使其后的操作只对职称为讲师的记录起作用。Set filter to 职称=讲师31. 在另一工作区打开了表bmdm,并按“代码”字段建索引。在当前工作区打开了表rsb，要求表rsb以“部门代码”为关键字与表bmdm建立关联Set relation to 部门代码 into bmdm五、编程题（注意：编程题改动不大，一定要背下来，不然会不及格的！）1.在某程序中加一段程序，实现能累计程序运行的次数。并把程序执行的次数存储到一个名为yxcs.dbf的表中。 要求用条件if-else-endif编程实现当表yxcs.dbf存在时累计程序运行的次数，否则创建一个只包含一个字段“运行次数 n(5,0)”的表，并添加一条记录，使运行次数字段的初值为1。If file(yxcs.dbf)use yxcsreplace 运行次数 with 运行次数 + 1elsecreate table yxcs (运行次数 n(5,0) )insert into yxcs values(1)endifuse2.从一个中英文混合的字符串 Hi,张平 Can you Help me? 给我一杯水。 中分别取出所有中文字符和英文字符,并显示出来。提示：汉字机内码字节的最高位为1，所以每次取出汉字字符时字符的ASC码值大于127.Zfc = Hi,张平 Can you Help me? 给我一杯水。Chinese = English = i = 1do while i127chinese=chinese+zfelseenglish=english+zfendifi=i+1enddo? chinese? englishreturn3已知表“成绩.dbf”含有学号、平时、考试、等级四个字段，前三个字段已存有某班学生的数据，平时成绩、考试成绩均填入了百分制数。请以平时成绩20、考试成绩80的比例确定等级并填入等级字段,并列表显示成绩表。等级评分办法是：90分以上为优，7589为良，6074为及格，60分以下不及格。要求用当型循环do while和多分支选择do case语句编写程序。Use 成绩do while not eof()cj = 平时*0.2 + 考试*0.8do casecase cj = 90dj = 优case cj = 75dj = 良case cj = 60dj = 及格otherwisedj = 不及格endcase replace 等级 with djskipenddolist usereturn4用主程序调用依附函数function jchs的形式计算5 ! 3 ! + 7 ! s = jchs(5) - jchs(3) + jchs(7)? 5!-3!+7!= , sReturnFunc jchspara nf = 1for x= 1 to nf = f * xendforreturn f5已知表“成绩.dbf”含有学号、平时、考试、等级四个字段，前三个字段已存有某班学生的数据，平时成绩、考试成绩均填入了百分制数。请以平时成绩20、考试成绩80的比例确定等级并填入等级字段。并以浏览窗口显示成绩表。等级评分办法是：90分以上为优，7589为良，6074为及格，60分以下不及格。要求用表扫描循环scan 和多分支选择do case语句编写程序。use 成绩scancj = 平时*0.2 + 考试*0.8do casecase cj=90dj=优case cj=75dj=良case cj=60dj=及格otherwisedj=不及格endcase replace 等级 with djendscanbrowse usereturn6用主程序调用过程procedure jcgc的形式计算5 ! 3 ! + 7 !jc=0do jcgc with 5 , jck5 = jcdo jcgc with 3 , jck3 = jcdo jcgc with 7 , jck7 = jcs = k5 - k3 + k7? 5!-3!+7!= , sreturnproc jcgcpara n , ff = 1for x= 1 to nf = f * xendforreturn7设计一个表单如下图所示，假定选项按钮组optiongroup1中第3个单选钮为正确答案。要求当用户选择答案后，单击“确定”按钮，可以判断回答正确与否，并以红色（ rgb(255,0,0) ）显示回答的文本信息，如果回答正确，用标签Label2显示信息“回答正确！”，否则显示“回答错误！”。请编写“确定“按钮command1的click事件代码：按钮command4的Click事件代码为：thisform.text1.fontbold=.t.按钮command4的Click事件代码为：thisform.text1.forecolor=rgb(0,0,255)8设计一个表单如下图所示，要求对命令按钮按住鼠标左键时，文本框内显示当前日期，而释放鼠标键则显示当前时间。请编写Command1的MouseDown事件代码和Command1的MouseUp事件代码。Command1的MouseDown事件代码为：Thisform . text1 . value = dtoc ( date( ) )Command1的MouseUp事件代码为：Thisform . text1 . value = time( )9.某银行的客户帐号和密码都存储在表“登录.dbf”中，登录表的结构为：登录(客户姓名 c(6) , 帐号 c(6) , 密码 c(6)