欢迎来到天天文库
浏览记录
ID:47592762
大小:3.21 MB
页数:52页
时间:2019-09-22
《2015单考单招VB模拟精彩试题及问题详解》由会员上传分享,免费在线阅读,更多相关内容在工程资料-天天文库。
1、实用标准文档2015年VB操作题第一套试题一:(30分)用VB编制一个程序,初始界面如图1,文本框显示程序运行输入的文本(文本框有垂直滚动条,文本为红色)。程序运行时可通过复选框对文本字形进行设置,效果如图2,只有当文本框内容非空时“结束”按钮才有效,单击“结束”按钮结束程序运行。图1图2操作要求:1.(4分)创建一个标准EXE工程,将其窗体文件和工程文件分别以test1.frm、test1.vbp为文件名保存到考生文件夹下。2.(12分)参照图1和图2完成界面设计:按表添加相关对象并设置相关的属性:表1(每个属性1分,共12分)对象名属性属性值对象名属性属性值Form1capt
2、ion字体效果Label1namelab1Label1caption请您留下宝贵意见Text1nametxt1Text1multilinetrueText1scrollbars2Text1forecolor&H000000FF&Check1caption加粗Command1namecmd1Check2caption斜体Command1caption结束Command1enabledfalse3.(1)(4分)编写适当的事件(2分):只有当文本框内容非空时“结束”按钮才有效。文案大全实用标准文档(不用能VB函数)(代码2分)(2)(4分)单击“加粗”复选框时,文本框中的文字显示加粗
3、效果;否则取消;(要求不能用IF语句来实现)(事件2分,一条代码2分)(3)(4)单击“斜体”复选框时,文本框中的文字显示斜体效果,否则取消。(要求不能用IF语句来实现)(事件2分,一条代码2分)4.(2分)保存窗体文件和工程文件,生成可执行文件test1.exe保存到试题目录下的“试题一”文件夹。PrivateSubCheck1_Click()txt1.FontBold=Nottxt1.FontBoldEndSubPrivateSubCheck2_Click()txt1.FontItalic=Nottxt1.FontItalicEndSubPrivateSubCommand1_
4、Click()EndEndSub'答案两种:'方法一:'PrivateSubTxt1_Change()'IfTxt1.Text=""Then'cmd1.Enabled=False'Else'cmd1.Enabled=True'EndIf'EndSub'方法二PrivateSubTxt1_Change()Iftxt1.Text<>""Thencmd1.Enabled=True文案大全实用标准文档Elsecmd1.Enabled=FalseEndIfEndSubPrivateSubcmd1_Click()EndEndSub试题二(25分)1.(13分)有一个VB程序,其功能是:根据身
5、高和体重判断胖瘦,程序运行界面如图3和图4所示。胖瘦条件:如果身高与体重之差大于等于110,则表示“你太瘦了!”;如果身高与体重之差小于等于100,则表示“你太胖了!”;如果身高与体重之差在100――110之间,则表示“你的身材真好!”图1图2打开某路径下的工程文件test2-1.vbp,完成下列操作:(1)(3分)当用户在文本框1输入身高时,命令按钮command1有效,添加适当的事件和代码实现此功能。(事件1分,一句代码2分)(2)(8分)完成相应注释1和注释2处的修改,实现根据身高和体重判断胖瘦的功能并显示“退出”按钮注释3处添加一条代码(2分),同时“计算”按钮无效注释4
6、处添加一条代码(2分)。(每格2分,共4分)(3)(2分)保存窗体文件和工程文件,生成可执行文件test2-1.exe保存到试题目录下的“试题一”文件夹。文案大全实用标准文档PrivateSubCommand1_Click()DimhAsSingle,wAsSingle,xAsSingleh=Val(Text1.Text)w=Val(Text2.Text)x=h-wIfx>=110ThenLabel4.Caption="你太瘦了!"ElseIfx>100ThenLabel4.Caption="你的身材真好!"ElseLabel4.Caption="你太胖了!"EndIfComma
7、nd2.Visible=TrueCommand1.Enabled=FalseEndSubPrivateSubCommand2_Click()EndEndSubPrivateSubText1_Change()Command1.Enabled=TrueEndSub2.(12分)填空完成VB程序,其功能是求某一天是这一年的第几天,界面设计和程序运行效果如图5所示。文案大全实用标准文档图5打开某路径下的工程文件test2-2.vbp,完成下列操作:(1)10分)输入某一天(年、月、日),
此文档下载收益归作者所有