VB程序设计综合测试

5/5中国地质高校(武汉)远程与连续训练学院VB程序设计课程综合测试2学习层次：专升本时间：90分钟一.选择题1．以下4个选项中，属性窗口未包含的是。A、对象列表 B、工具箱 C、属性列表 D、信息栏2．转变控件在窗体中的上下位置应修改该控件的属性。A、Top B、Left C、Width D、Right3．在VisualBasic中，称对象的数据为。A、属性 B、方法 C、大事 D、封装4．货币类型数据小数点后面的有效位数最多只有。A、1位 B、6位 C、16位 D、4位5．下列程序段的输出结果是。4a=10:b=10000:x=log(b)/log(a):Print"lg(10000)=";xA、lg(10000)=5 B、lg(10000)=4 C、4 D、56．下列关于SelectCase的叙述中，错误的是。A、Case10To100 表示推断Is是否介于10与100之间B、Case"abc","ABC" 表示推断Is是否和"abc"、"ABC"两个字符串中的一个相同C、Case"X" 表示推断Is是否为大写字母XD、Case-7,0,100 表示推断Is是否等于字符串"-7，0，100"7．将命令按钮Command1设置为窗体的取消按钮，可修改该控件的属性。A、Enabled B、Value C、Default D、Cancel8．下列属性用来表示各对象（控件）的位置。A、Text B、Caption C、Left D、Name9．文本框中选定的内容，由下列属性来反映。A、SelText B、SelLength C、Text D、Caption10．列表框的属性返回或设置列表框中各列表项的文本。A、Selected B、List C、Text D、Caption11．滚动条的属性用于指定用户单击滚动条的滚动箭头时，Value属性值的转变量。A、LargeChange B、SmallChange C、Value D、Change12．将CommonDialog通用对话框以“打开文件对话框”方式打开，可选方法。A、ShowOpen B、ShowColor C、ShowFont D、ShowSave13．通用对话框可以通过对属性的设定来过滤文件类型。A、Action B、FilterIndex C、Font D、Filter14．在设计菜单时，为了创建分隔栏，要在中输入单连字符（-）。A、名称栏 B、标题栏 C、索引栏 D、显示区15．VisualBasic用以下哪一条指令来绘制直线。A、Line方法 B、Pset方法 C、Point属性 D、Circle方法推断题1．属性是VisualBasic对象性质的描述，对象的数据就保存在属性中。2．很多属性可以直接在属性表上设置、修改，并立即在屏幕上看到效果。3．保存VisualBasic文件时，若一个工程包含多个窗体或模块，则系统先保存工程文件，再分别保存各窗体或模块文件。4．窗体中的控件，是使用工具箱中的工具在窗体上画出的各图形对象。5．单击“启动”菜单项将窗体装入内存时，肯定触发窗体的load大事和Activate大事。6．Byte类型的数据，其数值范围在-255～255之间。7．一个表达式中若有多种运算，在同一层括号内，计算机按函数运算→规律运算→关系运算→算术运算的挨次对表达式求值。8．在行If语句中，关键字EndIf是必不行少的。9．For/Next循环正常（未执行ExitFor）结束后，掌握变量的当前值等于终值。10．用关键字Public声明的过程可以被其他模块调用。11．Sub过程名在过程中必须被赋值。12．如果命令按钮Default属性为True，那么任何时候按Enter键都相当于单击该命令按钮。13．文本框控件常用大事有Change大事、KeyPress大事等，此外它也支持鼠标的Click大事和DblClick大事。14．在窗体上建立的控件的标题文字或显示内容的默认字体为窗体字体。15．复选框不支持鼠标的双击大事，如果双击则系统会解释为两次单击大事。三.填空题1．对象的3要素是、、。2．设置对象的属性有两种方法，一种是在设计时在窗口中设置；另一种是在运行时设置，设置格式为。大部分属性可以用以上两种方法进行设置，而有些属性只能用其中一种方法设置。3．每当一个窗体成为活动窗口时触发大事，当另一个窗体或应用程序被激活时在原活动窗体上产生大事。4．表达式2*4^3+4*6/3+3^2的值是。5．语句PrintNot10>15And8<5+2的输出结果为。6．算术式ln(x)+sin(30º)的VisualBasic表达式为。7．SelectCase结构中测试表达式的值，在其表达式列表中用表示。8．一维长整型数组a作过程形参写作“a()AsLong”，二维长整型数组b作过程形参写作“”。9．声明Single类型全局变量x，写作。10．VisualBasic窗体的位置、大小属性值的度量单位为，与窗体坐标刻度（有关/无关）。四.程序阅读题（写出下列程序的运行结果）程序1.请写出输入8、9、3、0后窗体上的显示结果。PrivateSubForm_Click()DimiAsInteger,sumAsInteger,mAsIntegerDom=InputBox("请输入m","累加和等于"&sum)Ifm=0ThenExitDosum=sum+mLoopPrintsumEndSub程序2.请写出单击窗体、输入5后，窗体上的显示结果。PrivateSubForm_Click()DimiAsInteger,jAsInteger,mAsIntegerm=InputBox("请输入数组的行、列数")ReDima(m,m)AsIntegerCallP(a,m)Fori=1TomForj=1Toi:PrintTab(j*3);a(i,j);:NextjPrintNextiEndSubPrivateSubP(b()AsInteger,nAsInteger)DimiAsInteger,jAsIntegerFori=1Tonb(i,1)=1:b(i,i)=1NextiFori=3TonForj=2Toi-1b(i,j)=b(i-1,j-1)+b(i-1,j)Nextj,iEndSub五、程序填空题1．【程序说明】下列程序求两个正整数m、n的最大公约数。PrivateSubForm_Click()DimmAsInteger,nAsInteger,rAsIntegerm=InputBox("请输入M的值："):n=InputBox("请输入N的值：")Printm;"和";n;"的最大公约数是："r=mModnDoUntil（1）m=n:n=r:r=（2）LoopPrintnEndSub2．【程序说明】下列过程用选择法对double类型数组按值从小到大排序。PrivateSubSort((1))DimiAsInteger,jAsInteger,kAsInteger,tAsDoubleFori=1To(2)k=iForj=i+1TonIf(3)Thenk=jNextjt=a(i):a(i)=a(k):a(k)=tNextiEndSub六、程序设计题1．在窗体上建立4个命令按钮Command1、Command2、Command3和Command4。要求：（1）命令按钮的Caption属性分别为“字体变大”、“字体变小”、“加粗”和“标准”。（2）每单击Command1按钮和Command2按钮一次，字体变大或变小3个单位。（4）4个按钮每单击一次都在窗体上显示“欢迎使用VB”。（5）双击窗体后可以退出。答案选择题1.B 2．A 3．A 4．D 5．B 6．D 7．D8．C 9．A 10．B 11．B 12．A 13．D 14．B 15．A推断题1．√ 2．√ 3．× 4．√ 5．√ 6．× 7．×8．× 9．× 10．√ 11．× 12．× 13．√ 14．√ 15．√填空题1．属性、方法、大事2．属性、<对象名>.<属性名>=<表达式>3．Activate、Deactivate4．1455．False6．Log(x)+Sin(3.141593/6)7．IS8．b()AsLong9．PublicxAsSingle10．缇、无关程序阅读题（写出下列程序的运行结果）程序1.20程序2. 111121133114641程序填空题1．（1）r=0 （2）mModn2．（1）a()AsDouble （2）n-1 （3）a(j)<a(k)程序设计题程序1．界面设计略，过程设计如下：PrivateSubCommand1_Click()'字体变大Form1.FontSize=Form1.FontSize+3Form1.Cls:Print"欢迎使用VB"EndSubPrivateSubCommand2_Click()'字体变小Form1.FontSize=Form1.FontSize-3Form1.Cls:Print"欢迎使用VB"EndSub