《VB程序设计试题及答案.docx》由会员分享，可在线阅读，更多相关《VB程序设计试题及答案.docx（11页珍藏版）》请在三一办公上搜索。
1、VB程序设计期末摹拟试题及答案双击自动滚屏发布者：汤中艮发布时间：2022-12-7阅读：1639次VB期末复习题及答案综合复习题一、填空题1 .创建一个VB应用程序三个主要的步骤是、和2 .当程序运行时，要求窗体中的文本框呈现空白，则在设计时，应当在此文本框的窗口中，把此文本框的属性设置成空白。3 .Label和TeXtBOX控件用来显示和输入文本，如果仅需要让应用程序在窗体中显示文本信息，可使片L控件；若允许用户输入文本，则应使用控件。4 .窗体的常用方法有、和。5 .要想在代码中给名为txtshow的文本框赋予文本：GOODWORK,应当编写的语句是6 .若命令按钮的名称为Cmdopen
2、,程序要求单击该命令按钮时，打开一个窗口frml,请对以下事件过程填空。PrivateSubCmdopenEndSub7 .VisualBasic6种类型的表达式是、oVisualBasic根据表达式的来确定表达式的类型。8 .表达式937Mod22的值是。9 .已知a=3,b=4,c=5,表达式abandNotcaOrcbAndcaAndNotb=1.7AndW=62.5B、T=62.5C、T1.7AndW=1.7OrWa+brb-lc-lAndc+aaXorbc-2EndSub7 .#12/31/1999#-#12/20/1999#的运算结果是#12/11/1999#8 .可以在窗体的通用
3、部份声明静态变量。9 .使用声明语句建立一个变量后，ViSUalBaSiC会自动对数值类型的变量赋初值0,变长的字符串被初始化为一个零长度的字符串，定长字符串用空格填充，Variant变量被初始化为Empty,布尔型的变量被初始化为Falsea10 .事件过程通常由事件驱动执行，而Sub过程通过过程调用执行。11 .将焦点主动设置到指定的控件或者窗体上应采用SetFOCUS方法。12 .当图象控件(Image)的StretCh属性为TrUe时，Image控件能自动调整自己的尺寸与显示的图片匹配。四、读程序题，写出程序运行结果。1. PrivateSubForm_Click()ForI=1To9
4、Forj=1To30-3*IPrintNextjFork=1ToIPrintk;NextkFork=I-1To1Step-1Printk;NextkPrintNextIEndSub2.OptionExplicitPrivateSubCommandl_Click()StaticSAsIntegerDimiAsIntegerS=IFori=1To5S=S*iNextiPrintSEndSub3.ForX=5To1Step-1ForY=1To6-XPrintTab(Y+5);NextYPrintNextX4.PrivateSubForm_Activate()Print&*6zNot2=3Print&
5、-5*6;Not2=3PrintPrintPrint30+602?30+60EndSub5.X=IDoWhileX=10IfXMod7=0ThenY=X+6ElseZ=XX=X+21.oopPrintX,Y,Z五、编程题1 .设计一个计算程序。该程序用户界面如图所示，由四个文本框：文本框1(textl)、文本框2(text2)、文本框3(text3).文本框4(text4),和三个按钮：命令按钮1(command)、命令按钮2(command2)命令按钮3(Command4)组成。程序运行后，用户单击清除按钮，则清除文本框中显示的内容。单击计算按钮，如果成绩填写不彻底，则给出提示信息，否则计算
6、三科平均成绩。单击退出按钮则退出。2 .设计程序。要求：从文本框Textl中接收输入的数据，当单击确定按钮(Commandl)时，如果该数据满足条件：除以3余2,除以5余3,除以7余4,则输出；否则将焦点定位在文本框Textl中，选中其中的文本。3 .设计一个欢迎程序。该程序用户界面如图所示。要求程序运行后，用户选中粗体复选框时，标签(Labell)中的文字(欢迎您！)的字体变成粗体，用户选中斜体复选框时，标签的字体变成斜体。若取销选中，则恢复原字体。单击结束，则退出。4 .任意输入3个数，求大小排第二的那个数，写出程序代码。VB期末复习参考答案一、填空题1 .创建应用程序界面设置属性编写代码
7、2 .属性、text3 .LabelTextBox4 .Load方法Show方法Hide方法Unload方法5 .6 .Click。、frml.show7 .算术表达式字符串表达式关系表达式布尔表达式日期表达式对象表达式运算符8 .19 .TrueFalse10 .1211 .Sin(x)2+Sqr(x2-y2)/(2*x)12 .DimA(lTo5,-2To6)AsString13 .单击双击装载多响应某个事件后所执行的程序代码cmdlClick14 .完成某种特定的功能对象名.方法名Forml.Show15. AutoSizeStretch16.FiIeCopy二、单项选择题1. B 2.
8、 C3. C4. D 5. D 6. B 7. B8. D 9. D10. C11. D 12. A 13. C三、指出下列句中的错误,修改或者说明原因。1 .int.sum不正确。变量名中不能包括小数点。2 .变量名的长度最长可达255个字符。3 .3.6,4因为a不是整型变量。4 .不正确。程序不可以改变字符的长度，这是VB规定。5 .不彻底正确。Variant是一种特殊的数据类型，除了定长字符串数据及用户定义类型外，可以包含任何种类型的数据，这是VB规定。6 . False。逻辑表达式计算结果。7 .不正确。两个日期型数据相减，其结果是一个数值型数据。8 .不正确。静态变量为局部变量，只
9、能在过程中声明。9.正确。10.正确。11.正确。12.不正确。该属性设为TUre时，Image控件不能自动调整自己的尺寸与显示的图片匹配，而可以使图片自动扩展以适应控件的尺寸。四、读程序题，写出程序运行结果。1.程序运行后，单击窗体,输出结果为:123456789876543212. 程序运行后，单击按钮Commandl,输出结果为：120。3.*4.aabb-30Falseaabb-30False30+609030+60905.11139五、编程题1.PrivateSubCommandl_Click()Textl.Text=Text2.Text=Text3.Text=Text4.Text=
10、EndSubPrivateSubCommand2_Click()a=Trim(Textl1Text)b=Trim(Text2.Text)c=Trim(Text3.Text)Ifa=Orb=Orc=ThenMsgBox成绩填写不彻底！VbCritiCalElseText4.Text=(Val(a)+Val(b)+Val(c)/3EndIfPrivateSubCommand3_Click()UnloadMeEndSub2.PrivateSubCommandl_Click()x=VaI(Textl,Text)IfxMod3=2AndxMod5=3AndxMod7=4ThenPrintxElseTex
11、tl.SetFocusTextl.SeIStart=OTextl.SeILength=Len(Textl,Text)EndIfEndSub3.PrivateSubCheckl_Click()IfCheckl.Value=1Then1.abell,Font-Bold=TrueElse1.abell,Font,Bold=FalseEndIfEndSubPrivateSubCheck2_Click()IfCheck2.Value=1Then1.abell.Font.Italic=TrueElse1.abell,Font.Italic=FalseEndIfEndSubPrivateSubCommandl_Click()UnloadMe4.a=输入第一个数：b=输入第二个数：c=输入第三个数：IfabThent=a:a=b:b=tIfacThent=a:a=c:c=tIfbcThent=b:b=c:c=tMsgBox求大小排第二的数是：&b)I 4打印本页P及闭窗I I
