VF背答案的题

《VF背答案的题》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、19二、简单应用2.打开考生文件夹下的表单six（如图所示），"登录"命令按钮Click事件中的程序功能是：当用户输入用户名和口令以后，单击"登录"按钮时，程序根据自由表"用户表"的内容进行操作，若在"用户表"中找不到相应的用户名，则提示"用户名错误"，若用户名输入正确，而口令输入错误，则提示"口令错误"。在"登录"命令按钮Click事件中空行处填加适当的语句，使其能够正确运行。注意：不得做其他修改。USE用户表GOTOPflag=0&&添加一条语句答案为：dowhilenoteof()IFAlltrim(用户名)==Alltrim(Thisform.T

2、ext1.Value)IFAlltrim(口令)==Alltrim(Thisform.Text2.Value)WAIT"欢迎使用"WINDOWTIMEOUT2ELSEWAIT"口令错误"WINDOWTIMEOUT2&&添加一条语句答案为：endifflag=1EXITENDIF&&添加一条语句答案为：skipENDDO&&添加一条语句答案为：ifflag=0WAIT"用户名错误"WINDOWTIMEOUT2ENDIF31二、简单应用（2小题，每题20分，计40分）在考生文件夹下，完成如下简单应用：1.在考生文件夹下已有表单文件formone.scx，如下

3、图所示，其中包含一个列表框、一个表格和一个命令按钮。第9页共9页请按下面要求完成相应的操作：1)在表单的数据环境中添加orders表。2)将列表框List1设置成多选，另外将其的RowSourceType属性值设置为"8-结构"、RowSource设置为orders。3)将表格Grid1的RecordSourceType的属性值设置为"4-SQL说明"。4)修改"显示"按钮的Click事件代码。当单击该按钮时，表格Grid1内将显示在列表框中所选orders表中指定字段的内容。解题思路：1.打开表单，在表单任意位置，右击—数据环境，选择orders表，添

4、加到数据环境中2.设置list1的multiselect为.t.(真值)；RowSourceType属性值设置为"8-结构"、RowSource设置为orders。3.设置表格Grid1的RecordSourceType的属性值设置为"4-SQL说明"4.修改“显示”按钮的click事件下的代码：s=""f=.T.***FOUND***FORi=1TOthisform.List1.ColumnCount第一个错误应改为：fori=1tothisform.list1.listcountIFthisform.List1.Selected(i)IFf***FO

5、UND***s=thisform.List1.value第二个错误应改为：thisform.list1. list(i)f=.F.ELSE***FOUND***s=s+thisform.List1.value第三个错误应改为：s=s+”,”+thisform.list1.list(i)ENDIFENDIFENDFORst="select&sfromordersintocursortmp"thisform.Grid1.RecordSource=st66二、简单应用（2小题，每题20分，计40分）在考生文件夹下完成如下简单应用：1.打开程序文件cylinde

6、r.prg，请按要求修改程序并运行程序。*本程序的功能为输入圆柱体的半径和高，计算圆柱体表面积。*请将程序修改为函数调用方式(注意不得增删语句行)。SETTALKOFFCLEARLOCALcareaINPUT"请输入圆柱体的半径"TOr第9页共9页INPUT"请输入圆柱体的高"TOhDOcyaWITHr,h,carea第一个错误应改为：carea=cya(r,h)?"圆柱体的表面积为：",careaRETURNPROCEDUREcyaPARAMETERSa,b,c第二个错误应改为：parametersa,bLOCALpaipai=3.14159c=2*(

7、pai*a^2)+2*pai*a*bRETURN第三个错误应改为：returncENDPROC70二、简单应用（2小题，每题20分，计40分）student是一个"学生"表，其中包含学号(C8)、姓名(C8)、性别(C2)、政治面目(C4)、班级(C5)等字段。考生目录下的modi1.prg程序文件的功能是显示输出所有政治面目为"群众"的"男"生的姓名和班级，每行输出一个学生的信息；程序中有三处错误，请加以改正。说明：程序中******ERRORFOUND******的下一行即为错误所在行。请用改正后的程序行覆盖错误所在行，不要插入或删除任何程序行。2.

8、建立命令文件sprog.prg，该命令文件包含如下两条语句：●第一条语句使用SQ