《VFP题目及答案》由会员分享，可在线阅读，更多相关《VFP题目及答案（13页珍藏版）》请在金锄头文库上搜索。
1、1. 在两个文本框中分别输入用户名和密码，点击“注册”按钮，出现三种情况：a) 若至少一个文本框为空，者提示“用户名或密不能为空!”b) 若输入的用户名的已经在后台的“用户”表中存在,则提示“此用户名已被占用,请重新输入！”c) 排除上述两种情况,则出现“注册成功”信息，并把该新注册的用户名及密码写入后台的“用户”表中2. 输入用户名和密码，点击“登录”按钮,可能出现的三种情况:a) 该用户已在用户表中，而且密码也正确，则出现“您已成功登录本系统”的信息;b) 若用户名已存在于后台的“用户”表中，则显示“密码错误”的信息c) 若用户名不在用“户表”中，则显示“您尚未注册”的信息3. 点击“退出
2、”按钮，退出程序注册(comand1） cliif all(tisorm.ext1.au）= or allt（thir.texalu)=esaebox(用户名或密码不能为空！，17,提示）elssele 用户loate fo用户名allt(thisfrmtextale)i fnd()mesaebo(此用户名已被占用，请重新输入！,49,提示)eseappendbakreplac 用户名 t alltrim(tisfrmxt.vaue)rec 密码 h allri(thsfrm.text.val)esagbo(注册成功,65,恭喜!)hif.tet.vlu=thisform.tet2.vle=n
3、dfedif登入(comnd） clcif llt(hisform.text1vle）=or allt(hisom.tt.alue)=mesagebo(用户名或密码不能为空！，17,提示）elseslect 用户loct for alt(用户名)=al（tsrm.text1.value）f fund()ialt（密码)=all(thsfm.tt2.lue)mesageox(您已成功登录本系统!,恭喜)elsmessaebox(密码错误!，49,提示)ndfelsemesabox(您尚未注册！,49,提示）ndifedf选择左边组合框中的课程号，右侧列表中显示该课程的全部成绩。Cob1 inte
4、rctivehngselec 课程loate or 课程号this.valuethisormfsh在左上角文本框中输入学号,点击“查找”按钮，右侧显示该学生的相关信息。若输入学号为空,则出现“学号不能为空”的提示;若所输入的学号不在学生表中,则显示“查无此人!”查找（commnd1) Cicksele 学生f llt(thrm.ext1.vale)=messebo（学号不能为空)tsor.text1stfouslsocate o 学号=lt（thrm.tt1.al)if not un()mesagebox(查无此人!,1,出错啦!)hisfmext1.valuehifor.txt1sefcsn
5、ifendifhsfr.refes点击“转换”按钮,完成摄氏到华氏、华氏到摄氏、摄氏到摄氏、华氏到华氏的转换。转换（ommad1) Clki at(hisform.text1.value）=returnelif val（tsfom.text1.alue)=0retuelsei bo1.value=tisform.cobo2.valuethisfomtxt2.value=hisfom.text1.alueelsef bo1.vale=摄氏sfom.tet2.alue=9/5*al（thsform.text.alue)+32lsetisfor.text.vale(val(thisorm.tet.v
6、au)-32)5/9endiendifendiifhiormreres1 点击“出题”按钮,由程序随机产生两个两位数的正整数,分别填写在左侧的两个文本框中；2 用户输入上述两个数相加的结果，点击“答题”按钮，出现以下两种可能的情况：a) 若用户计算正确，则给出“答对了，真棒!”的提示b) 若用户给出的答案错误，则给出“不对啊，再仔细想想！”的提示。3 点击“退出”按钮，退出程序出题（coman1) clicisfomx1vale=nt(rand（)*90)+1hisfrm.ext2.vale=int(n()）+10thisfom.tx3.value=thisformrfsh答题(comnd2)
7、 clik=vl(thisform.tet.val)b=tisfor.text1.auec=tisform.text2.vlef =b+cessageox(答对了,真棒!，6,coguatios）eeessaex(不对啊，再仔细想想!,17,出错啦!)eni1.用户选择组合框中的学号,右侧文本框中显示相应的姓名;2.点击“确定”按钮,出现两个可能的情况：:c) 若用户勾选了至少一个运动项目,则把学号、姓名及所报项目写入后台的“报名表”,且在界面的表格控件中显示报名结果d) 若用户没有勾选任何运动项目,则不写表。点击“清空报名表”按钮，则清空后台“报名表”中的所有数据，并在界面的表格控件中反映出
8、来。.点击“退出”按钮，退出程序。确定(ommand）n0ifhifor.cbo.alue=unenifslect 报名表ifthsfom.check1value=.tn=1endififthisreck.value.tn=1ndifif thifomhek3auet.ndif =1ppen blankreplace 学号 wit thsfor.cobo.vlue，姓名 with tifrm.txt姓名.vauihior.heck1.value.t.reace 项目1 with hiorm.chec1.ctonedifif thisfrmcheckvalet.repla 项目2with ths
9、form.che2.pionendiff hisfor.hec.vale=.t.replae项目with ifor.ceck3.captionendifnifthsformresh清空报名表selet 报名表zapthisorm.rfeshomb nteractivchahifor.ck.valu=.thisfor.chec.vale.thisform.hec3.value=.f.thsfrmresh.点击“查找”按钮，可能出现的三种情况：a) 若学号文本框为空，则出现“学号不能为空”的提示b) 若在成绩表中找不到输入的学号，则出现“没有找到该学生的成绩”的提示c) 若输入的学号在成绩表中找到
10、，则右侧的表格控件显示该学生的所有成绩,并在下方的文本框中显示该学生所有课程的平均成绩。.点击“退出”按钮，退出程序。查找if ll(thisfomtext1value）=messgeb(学号不能为空!)reurnendifsel 成绩locte f alt（学号)=alt（tsm.tx1.value)if fn(）sele * from 成绩 wher lt（学号)=all(thisform.ext.al) io urr 个人成绩thisform.grd1ecodsoretp=1thsrmgrid.recordsurc=个人成绩thsform.ri1.vsible=.ee ag（成绩) as
11、 平均成绩 om 个人成绩 nto cursr pjcjsepjctorm.text.vl=平均成绩lsemessageox(没有找到该学生的成绩!）hisform.grid.viible.f.ndifthsfo.rersh1.点击“产生三个整数”按钮,由程序随机生成三个随机的整数,分别填写在三个文本框中：2.点击“排序输出”按钮，在下方的三个文本框中按从大到小的顺序分别输出上述三个数。3.点击“退出”按钮，退出程序。产生三个整数thisfor.text1.value=in(and()*10)thisom.tex.vleint(rand()*100）thisormtex3.luit(rn（)1
12、00)tisfotet4.vlue=tisform.txt5.alue=hisfor.exvale=thisform.efreh排序输出x=thifom.te.alue=hiformet2.aluez=thifom.t.valueifxytx=yy=tenififxtxzz=tendifif zty=zz=tedifthisform.text4.value=thisform.txalue=yhsom.text6vluezthisorm.reesh在程序文件pr中完成，要求运行时提示用户输入起止数字,然后显示找到的所有素数。并输出这些素数的平均值。inut 开始: o starnpu 结束: end
