VisualFoxPro表单设计及答案

1、四、 VF 窗体设计共 2 题 （共计 45 分）第 1 题 （15.0 分）题号 :8如样张所示设计一个名为Form1 的表单，表单上有三个标签（Label1 、 Label2 、 Label3 ），标题分别为“选课系统”、“图书管理系统”、 “成绩查询系统”，当用鼠标单击任何一个标签时，其他两个标签的标题文本互换。.caption第 2 题 （15.0 分）题号 :32如样张所示设计一个名为Form1 的表单，包含一个文本框控件 text1 和两个按钮 command1 和 command2，按钮的标题分别是“加一操作”和“减一操作”，文本框初始值为 0，当单击一次“加一操作”按钮时， 文

2、本框中的数值加1。当单击一次“减一操作”按钮时，文本框中的数值减1。*Text1:过程Initthis.value=0* 加一操作* 减一操作第 3 题 （15.0 分）题号 :16如样张所示设计一个名为Form1 的表单，有三个标签（ Label1 、 Label2 、 Label3 ），分别为金额、存期、到期本息和。 三个文本框 （ Text1 、 Text2 、Text3 ）要求根据用户输入的存款额和存期（月），单击“计算”按钮（ Command1），显示到期后应得的本息和。 当存期小于 12 时，利息为 1.8 ；当存期大于等于12 小于 24 时，利息为 2.5 ；当存期大于等于24

3、 小于 36 时，利息为 2.8 ；当存期大于等于 36 时，利息为 3.2 ，计算结果保留两位小数。 * 计算do casecase y=0 x=x*(1+0.0018)y)x=x*(1+0.0025)y)x=x*(1+0.0028)y)x=x*(1+0.0032)y)存期必须大于等于 0endcasereturn第 4 题（15.0 分）题号 :30如样张所示设计一个名为Form1 的表单， 要求窗体标题为“邮件发送界面”，添加三个标签控件（ Label1,Label2,Label3） , 标题文本分别是“收件人”，“邮件主题”，“邮件正文”，添加两个文本框控件（text1,text2），

4、一个列表框（List1 ）。再添加两个按钮command1,command2），标题文本分别是“发送”、“退出”。当用户点击发送按钮时，弹出一个对话框，内容为“你是否确定发送？”。当点击退出按钮时，退出表单。发送messagebox( 你是否确定发送？)* 退出release thisform第 5 题（15.0 分）题号 :12如样张所示设计一个名为Form1 的表单， 该表单的功能是：有两个标签（Label1 、Label2 ），分别是“小写”和“大写”。在 TEXT1 中输入一个小写字母，然后点击“转换”按钮（ Command1），就能在TEXT2 中输出其大写字母。单击“清除”按钮（C

5、ommand2），则清除当单击（ click ）此按钮时文本框会按要求显TEXT1和 TEXT2中的内容；单击“退出”按钮示；添加一个命令按钮command2，标题文本（Command3）退出程序。改为“退出”，当单击（click ）此按钮时关* 转换闭当前表单。if thisform.text2.value=* 显示thisform.text2.value=upper(thisformthisform.text1.value=year(date().text1.value)thisform.text2.value=month(date()endifthisform.text3.value=d

6、ay(date()* 清除* 退出thisform.text1.value=release thisformthisform.text2.value=第 8 题 （15.0 分）题号 :24* 退出如样张所示设计一个名称为Form1 的登陆界release thisform面表单， 要求表单上有两个标签（Label1 、第 6 题 （15.0 分）题号 :22Label2 ），一个文本框（Text1 ）和 一个命令如样张所示设计一个名称为Form1 的表单 , 求按钮（ Command1），两个标签的标题属性分别100 到 500 之间能被 28 整除的数，要求表单为“请输入登陆密码”和“”，

7、命令按钮的上有一个标签 （ Label1），一个编辑框 （ Edit1 ）标题属性为“关闭”。运行表单， 当文本框输和两个命令按钮（ Command1、 Command2），标入正确密码“ 123456”时，第二个标签的标签的标题属性为“ 100到 500 之间能被 28 整题属性由空值变为“欢迎使用”，当文本框输除的数： ”， 两个按钮的标题属性分别为“开入为非上述密码时，第二个标签的标题属性由始”和“退出”。 运行表单时， 通过开始按钮空值变为“对不起，密码错误”。 点击关闭按控制，在编辑框显示输出结果，点击退出按钮钮结束表单运行。 （注意：设置文本框的结束表单运行。passwordcha

8、r 属性为 * ，使输入密码隐藏）* 开始*text1for x=100 to 500if thisform.text1.value=123456if mod(x,28)=0thisform.label2.caption=欢迎使用 !thisform.edit1.value=thisform.edit1else.value+str(x)thisform.label2.caption=对不起，密endif码错误 !endforendif* 退出* 关闭release thisformrelease thisform第 7 题 （15.0 分）题号 :28第 9 题 （15.0 分）题号 :6如样

9、张所示设计一个名为Form1 的表单，要求如样张所示设计一个名为Form1 的表单， 表单添加一个标签 label1 ，标题文本改为“今天上有两个命令按钮（Command1、 Command2）、是”；添加一个文本框text1 ，用来显示系统两个文本框（ Text1 、 Text2 ）和两个标签当前的日期所对应的年份；要求添加一个标签（ Label1 、Label2 ），按钮标题分别为“计算”label2 ，标题文本改为“年”；添加一个文本和“关闭”、 两个标签分别显示“请输入N 的框 text2 ，用来显示系统当前的日期对应的月值”，“ N！=”字样，两个文本框分别用来接份；要求添加一个标签

10、label3，标题文本改收输入的 N 值和输出 N！。运行表单，在第一为“月”； 要求添加一个标签label4 ，标题个文本框中输入 N 的值，单击“计算”按钮计文本改为“日”；添加一个文本框text3 ，用算 N！，并在第二个文框中输出计算结果；单来显示系统当前的日期对应的日期；添加一个击“关闭”按钮，关闭表单。命令按钮 command1，标题文本改为“显示”，* 计算for i=i-1 to 1 step -1按钮（ Command2），则清除的内容；单击退出按钮（TEXT1 和 TEXT2 中Command3）退出x=x*i程序。endforreturn* 关闭release thisf

11、orm第 10 题（ 15.0 分）题号 :20如样张所示设计一个表单，表单名为Form1。要求添加两个文本框text1和 text2，用来分别显示输入的字符串和反向显示的原字符串；添加两个命令按钮command1和 command2，标题文本分别改为“反串显示”和“退出”，先在第一个文本框中输入字符，然后单击“反串显示”按钮， 这时在第二个文本框中反向显示输入的原字符串，当单击“退出”按钮时退出表单运行界面。* 反串显示m=for i=k to 1 step -1m=m+substr(x,i,1)endfor退出release thisform第 11 题（ 15.0 分）题号 :26如样张

12、所示设计表单，文件名为Form1，其中表单标题为“大小写转化”；文本框控件TEXT1实现数据的录入；文本框控件TEXT2完成结果的显示；“转化为小写”按钮Command1）实现将 TEXT1中的内容转为为小写在 TEXT2 中显示；“转化为大写”按钮Command2）实现将 TEXT1中的内容转为为大写在 TEXT2 中显示；“退出”按钮Command3），能实现退出功能。第 13 题 （15.0分）题号 :10如样张所示设计一个名为Form1 的表单，该表单的功能是： 若在 TEXT1中输入一个除数 （整数），然后点击开始按钮（Command1），就能求出 1 至 200之间能被此除数整除的

13、数之和，并将结果在TEXT2 中输出。单击清除古希腊哲学大师亚里士多德说：人有两种，一种即“吃饭是为了活着”,一种是 “活着是为了吃饭 ”一.个人之所以伟大，首先是因为他有超于常人的心。“志当存高远”, “物长宜放眼量风”,这些古语皆鼓舞人们要树立雄无数个自己，万千种模样，万千愫情怀。有的和你心手相牵，有的和你对抗，有的给你雪中送炭，有的给你烦忧与其说人的一生是同命运抗争，与性格妥协，不如说是与自己抗争，与自己妥协。人最终要寻找的，就是最爱的那个自己。只是这个自己，有人终其一生也未找到；有人只揭开了冰山的一角，有人有幸会晤一次，却已用尽一生。人生最难抵达的其实就是自己。我不敢恭维我所有的自己都

14、是美好的，因为总有个对抗的声音：“你还没有这样的底气。”很惭愧，坦白说，自己就是这个样子：卑微过，像一棵草，像一只蚁，甚至像一粒土块，但拒绝猥琐！懦弱过，像掉落下来的果实，被人掸掉的灰尘，但拒绝屈膝，宁可以卵击石，以渺小决战强大。自私过，比如遇到喜欢的人或物，也想不择手段，据为己有。贪婪过，比如面对名利、金钱、豪宅名车，风花雪月，也会心旌摇摇，浮想联翩。倔强过，比如面对误解、轻蔑，有泪也待到无人处再流，有委屈也不诉说，不申辩，直到做好，给自己证明，给自己看！温柔过，当爱如春风袭来，当情如花朵芳醇，黄昏月下，你侬我侬。强大过，内刚外柔，和风雨搏击，和坎坷宣战，不失初心，不忘梦想，虽败犹荣。这样的自己一个个站到镜中来，千面万孔。有的隐着，有的浮着，有的张扬，有的压抑，有的狂狷，有的沉寂，有的暴躁，有的温良庸俗的自己，逐流的自己，又兼点若仙的自己，美的自己，丑的自己，千篇一律的自己，独一无二的自己。我们总想寻一座庙宇，来安放尘世的疲惫，寻一种宗教，来稀释灵魂里的荒凉。到头来，却发现，苦苦向往的湖光山色，原来一直在自己的心里，我