欢迎来到天天文库
浏览记录
ID:51226488
大小:42.02 KB
页数:3页
时间:2020-03-10
《VisualFoxPro表单设计及答案.doc》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库。
1、四、VF窗体设计共2题(共计45分)第1题(15.0分)题号:8如样张所示设计一个名为Form1的表单,表单上有三个标签(Label1、Label2、Label3),标题分别为“选课系统”、“图书管理系统”、“成绩查询系统”,当用鼠标单击任何一个标签时,其他两个标签的标题文本互换。Label1:t=thisform.label2.captionthisform.label2.caption=thisform.label3.captionthisform.label3.caption=tlabel2:t
2、=thisform.label1.captionthisform.label1.caption=thisform.label3.captionthisform.label3.caption=tlabel3:t=thisform.label1.captionthisform.label1.caption=thisform.label2.captionthisform.label2.caption=t第2题(15.0分)题号:32如样张所示设计一个名为Form1的表单,包含一个文本框控件text1和两个按
3、钮command1和command2,按钮的标题分别是“加一操作”和“减一操作”,文本框初始值为0,当单击一次“加一操作”按钮时,文本框中的数值加1。当单击一次“减一操作”按钮时,文本框中的数值减1。*Text1:过程Initthis.value=0*加一操作x=thisform.text1.valuethisform.text1.value=x+1*减一操作x=thisform.text1.valuethisform.text1.value=x-1第3题(15.0分)题号:16如样张所示设计一个名为
4、Form1的表单,有三个标签(Label1、Label2、Label3),分别为金额、存期、到期本息和。三个文本框(Text1、Text2、Text3)要求根据用户输入的存款额和存期(月),单击“计算”按钮(Command1),显示到期后应得的本息和。当存期小于12时,利息为1.8‰;当存期大于等于12小于24时,利息为2.5‰;当存期大于等于24小于36时,利息为2.8‰;当存期大于等于36时,利息为3.2‰,计算结果保留两位小数。*计算x=val(thisform.text1.value)y=va
5、l(thisform.text2.value)docasecasey<12andy>=0x=x*((1+0.0018)^y)thisform.text3.value=str(x,10,2)casey<24andy>=12x=x*((1+0.0025)^y)thisform.text3.value=str(x,10,2)casey<36andy>=24x=x*((1+0.0028)^y)thisform.text3.value=str(x,10,2)casey>=36x=x*((1+0.0032)^y)
6、thisform.text3.value=str(x,10,2)otherwisethisform.text3.value='存期必须大于等于0'endcasereturn第4题(15.0分)题号:30如样张所示设计一个名为Form1的表单,要求窗体标题为“邮件发送界面”,添加三个标签控件(Label1,Label2,Label3),标题文本分别是“收件人”,“邮件主题”,“邮件正文”,添加两个文本框控件(text1,text2),一个列表框(List1)。再添加两个按钮(command1,comma
7、nd2),标题文本分别是“发送”、“退出”。当用户点击发送按钮时,弹出一个对话框,内容为“你是否确定发送?”。当点击退出按钮时,退出表单。*发送messagebox('你是否确定发送?')*退出releasethisform第5题(15.0分)题号:12如样张所示设计一个名为Form1的表单,该表单的功能是:有两个标签(Label1、Label2),分别是“小写”和“大写”。在TEXT1中输入一个小写字母,然后点击“转换”按钮(Command1),就能在TEXT2中输出其大写字母。单击“清除”按钮(C
8、ommand2),则清除TEXT1和TEXT2中的内容;单击“退出”按钮(Command3)退出程序。*转换ifthisform.text2.value=''thisform.text2.value=upper(thisform.text1.value)endif*清除thisform.text1.value=''thisform.text2.value=''*退出releasethisform第6题(15.0分)题号:22如样张所示设计一个名称为For
此文档下载收益归作者所有