1、南京工程学院vb题库10套南京工程学院vb题库。试卷编号:8956所属语言:Visual Basic试卷方案:09-10-2程序设计基础VB模拟试卷总分:100分共有题型:6种一、判断 共5题 (共计10分)第1题 (2.0分)三种基本控制结构是:顺序结构、选择结构和循环结构.答案:Y第2题 (2.0分)欲在PictureBox控件上设置其它控件,可以通过把窗体上原已设计好的控件拖动到PictureBox控件上来实现.答案:N第3题 (2.0分)如果在过程调用时使用按地址传递参数,则在被调过程中不可以改变实参的值.答案:N第4题 (2.0分)用For循环写的程序不能用While循环来写.答案:
2、N第5题 (2.0分)Timer是时钟控件的唯一事件.答案:Y二、单项选择 共20题 (共计40分)第1题 (2.0分)函数Len(Str(Val(123.4)的值为().A:11B:5C:6D:8答案:C第2题 (2.0分)在中断状态下可以运行代码,也可以在运行状态中作为输出结果的窗口称为().A:本地窗口B:立即窗口C:观察窗口D:栈窗口答案:B第3题 (2.0分)表达式Len(123程序设计ABC)的值是A:10B:14C:20D:17答案:A第4题 (2.0分)有如下程序代码: Private Sub Form_MouseDown(Button As Integr ,Shift As
3、Integer , X As Single,Y As Single) FillColor=QBColor(Int(Rnd*15) FillStyle=Int(Rnd*8) Circle(x,y),250 End Sub 该程序的功能是:A:鼠标拖曳时在窗体中构造一个圆B:双击鼠标时在窗体中构造一个圆C:单击鼠标时在窗体中构造一个圆D:加载时在窗体中构造一个圆答案:C第5题 (2.0分)执行以下程序段后,变量c的值为() a=Visual Basic Programing:b=Quickc=b & UCase(Mid(a,7,6) & Right(a,11)A:Visual BASIC Prog
4、ramingB:Quick Basic ProgramingC:QUICK Basic ProgramingD:Quick BASIC Programing答案:D第6题 (2.0分)、/、Mod、*等4个算术运算符中,优先级最低的是().A:B:/C:ModD:*答案:C第7题 (2.0分)参与运算的两个表达式均为True,运算结果也为True,则该逻辑运算符为:A:ANDB:IMPC:NOTD:XOR答案:A第8题 (2.0分)在文本框中欲使掩码符(如*)起作用,必须设置MultiLine属性值为().A:FalseB:TrueC:-1D:1答案:A第9题 (2.0分)若要使命令按钮不可操
5、作,要对()属性进行设置.A:EnabledB:VisibleC:BackColorD:Caption答案:A第10题 (2.0分)当用户按下并且释放一个键后会触发KeyPress、KeyUp和KeyDown事件,这三个事件发生的顺序是().A:KeyPress、KeyDown 、KeyUpB:KeyDown、KeyUp、KeyPressC:KeyDown、KeyPress、KeyUpD:没有规律答案:C第11题 (2.0分)将调试通过的工程经文件菜单的生成.exe文件编译成.exe后,将该可执行文件转到其他机器上不能运行的主要原因是().A:运行的机器上无VB系统所需的动态连接库B:缺少.f
6、rm窗体文件C:该可执行文件有病毒D:以上原因都不对答案:A第12题 (2.0分)为了使列表框中的项目按字母顺序排列,应设置哪个属性?A:ListB:SortedC:StyleD:Text答案:B第13题 (2.0分)单击滚动条两端的任一个滚动箭头,将触发该滚动条的()事件.A:ScrollB:KeyDownC:ChangeD:Dragover答案:C第14题 (2.0分)下列哪个变量的取法是不正确的().A:sTmeB:T_TempC:T12%D:T_12答案:C第15题 (2.0分)函数InStr(VB程序设计教程,程序)的值为().A:1B:2C:3D:4答案:C第16题 (2.0分)数
7、学关系3x10表示成正确的VB表达式为A:3=x10B:3=x AND x=3 OR x10D:3=x AND x Then Print a(i); Next iEnd Sub程序运行后,单击命令按钮,在窗体上显示的内容是A:1 2B:1 2 3C:3 4 5D:4 5答案:D第18题 (2.0分)与传统的程序设计语言相比,Visual Basic最突出的特点是().A:结构化程序设计B:程序开发环境C:事件驱动编程机制D:程序调试技术答案:C第19题 (2.0分)在窗体上画一个名称为Command1的按钮,并有下面程序,当按下Command1按钮后,程序输出的结果是Private Sub C
8、ommand1_Click() Dim a%, b% a = 50: b = 100 Print 调用前, A=; a, B=; b Swap a, b Print 调用后, A=; a, B=; bEnd SubPrivate Sub Swap(ByVal x%, y%) Dim t% t = x: x = y: y = tEnd SubA:调用前A=50 B=100调用后A=50 B=100B:调用前A=50 B=100调用后A=100 B=50C:调用前A=50 B=100调用后A=50 B=50D:调用前A=50 B=100调用后A=100 B=100答案:C第20题 (2.0分)若要
9、禁止窗体被用户移动,通过设置可达此要求的窗体的属性是().A:MaxButtonB:MoveableC:MoveD:ControlBox答案:D三、程序填空 共1题 (共计10分)第1题 (10.0分)Option Explicit-【程序填空】-功能: 本程序实现功能:将顺序文本文件 “MYFILE.TXT” 的 内容一个字符一个字符地读入文本框txtTest中-Private Sub Form_Click() Dim InputData As String * 1 txtTest.Text = *SPACE* Open App.Path & MYFILE.TXT For 【?】 As #1
10、 *SPACE* Do While 【?】 EOF(1) Input #1, InputData *SPACE* txtTest.Text = txtTest.Text + 【?】 Loop Close #1 End Sub答案:=(答案1)=Input=(答案2)=Not=(答案3)=InputData四、程序改错 共1题 (共计10分)第1题 (10.0分)-【程序改错】-题目:随机产生n个两位正整数(n由输入对话框输入,且n0), 求出其中的偶数之和,并在标签框Label1上显示。-Option ExplicitPrivate Sub Command1_Click() Dim n As
11、Integer Dim i As Integer, sum As Long Dim rnddat As Integer n = Val(InputBox(Please input a integer, Input N value) *FOUND* sum = n If n 0 Then For i = 1 To n *FOUND* rnddat = (Int(90 * Rnd) Me.Print rnddat; *FOUND* If rnddat / 2 = 0 Then sum = sum + rnddat End If Next i Label1.Caption = sum End IfE
12、nd Sub答案:=(答案1)=sum=0=(答案2)=rnddat = (10 + Int(90 * Rnd)=或=rnddat = ( 10 + Int(90 * Rnd)=(答案3)=If rnddat Mod 2 = 0 Then=或=If rnddat / 2 = int(rnddat/2) Then=或=If rnddat / 2 = cint(rnddat/2) Then五、程序设计 共1题 (共计20分)第1题 (20.0分)-【程序设计】-题目: (事件)单击窗体。 (响应)求sum=1+4+4+16+64+1024.前8项的和, 请将sum结果值输出到窗体上。使用 do w
13、hile.loop语句完成程序-答案:-Dim i As IntegerDim s1 As LongDim s2 As Longi = 1s1 = 1: s2 = 4sum = sum + s1 + s2 Do While i = 3 s1 = s1 * s2 s2 = s1 * s2 sum = sum + s1 + s2 i = i + 1 LoopPrint sum-六、VB窗体设计 共1题 (共计10分)第1题 (10.0分)-【窗体设计】-题目:界面上部放置一标签,标签内容为“一身正气铸警魂”, 按图菜单编辑器内容,设计一个可以改变窗体中标签字号 及颜色的菜单程序,程序运行界面如图2所示。菜单项属性如下表。菜单项 名称 快捷键字号(&S) fontsize.36号 Size1 Ctrl+A.48号 Size2 Ctrl+B.- G.退出 exit Ctrl+X 颜色(&C) color .红色 red Ctrl+C.蓝色 blue Ctrl+D各控件属性设置如下表:对象名称 Name属性 Caption属性 窗体 默认 默认 标签 label1 一身正气铸警魂 -
copyright@ 2008-2022 冰豆网网站版权所有
经营许可证编号:鄂ICP备2022015515号-1