vb考试复习5章-6章习题
第5章选择结构程序设计
-、选择题
1.下列语句正确的是【】。(多选)
(A)If X≠Y Then Print "X不等于Y" (B)If X<>Y Then Print "X不等于Y"
(C)If X> 2.下列语句正确的是【】。 (A)If A≥B Then T=A A=B B=T(B)If A≥B Then T=A;A=B;B=T (C)If A>=B Then T=A A=B B=T (D)If A>=B Then T=A:A=B:B=T 3.下列语句正确的是【】。 (A)If X<3*Y And X>Y Then Y=X^3 (B)If X<3*Y And X>Y Then Y=X3 (C)If X<3*Y:X>Y Then Y=X^3 (D)If X<3*Y And X>Y Then Y=X**3 4.关于语句If x=l Then y=1,下列说法正确的是【】。 (A)x=1和y=1均为赋值语句(B)x=1和y=1均为关系表达式 (C)x=1为关系表达式,y=1为赋值语句(D)x=1为赋值语句,y=1为关系表达式 5.执行以下语句后显示结果为【】。 Dim x As Integer If x Then Print x Else Print x-1 (A)1 (B)O (C)一1 (D)不确定 6.如果X的值小于或等于Y的平方,则打印"OK",表示这个条件的单行格式If语句是【】。 (A)If x<=y2 Then Print "OK" (B)If x<=y^2 Print "OK" (C)If x<=y^2 Then "OK" (D)If x<=y^2 Then Print "OK" 7.如果A为整数且|A|=100,则打印"OK",否则打印"Error",表示这个条件的单行格式If语句是 【】。 (A)If Int(A)=A And Sqr(A)>=1O Then Print "OK" Else Print "Error" (B)If Fix(A)=A And Abs(A)>=100 Then Print "OK" Else Print "Error" (C)If Int(A)=A And (A>=100,A<=-100) Then Print "OK" Else Print "Error" (D)If Fix(A)=A And A>=100 And A<=-100 Then Print "OK" Else Print "Error" 8.下列程序段【】能够正确实现条件:如果X (A)If X A=-15 A=-15 Print A Print A (C)If X A=15:Print A Else A=-15 Else Print A A=-15:Print A End If End If 9.能够实现以下分段函数的程序段是【】。(多选) f(x)= 1+X X≥O 1-X X (A)If X>=O Then Y=1+X (B) If X≥O Then Y=1+X Y=1-X Else Y=1-X End If (C) If X>=O Then Y=1+X (D) If X If X 10.下列【】程序段不能实现以下分段函数。(多选) f(x)= sqr(x+1) x≥1 x2+3 x<1 (A)x=Val(Text1.Text) (B) x=Val(Text1.Text) f=x*x+3 If x>=1Then f=Sqr(x+1) If x>=1 Then f=Sqr(x+1) If x<1 Then f=x*x+3 Print f Print f (C) x=Val(Text1.Text) (D) x=Val(Text1.Text) If x<1 Then If x>=1Then f=Sqr(X+1) f(x)=x*x*+3 f=x*x*+3 Else Print f F(x)=Sqr(X+1) End If Print f 11.计算分段函数: 0 x<0 1 0≤x<1 f(x)= 2 1≤x<2 3 x≥2 下面程序段中正确的是【】。 (A) If x<0 Then y=0 (B) If x>=2 Then y=3 If x<1 Then y=1 If x>=1 Then y=2 If x<2 Then y=2 If x>=0 Then y=1 If x>=2 Then y=3 If x<0 Then y=0 (C) If x<0 Then (D) If x>=2 Then y=0 y=3 ElseIf x>=0 Then ElseIf x>=1 Then y=1 y=2 ElseIf x>=1 Then ElseIf x>=0 Then y=2 y=1 Else Else y=2 y=0 End If End If 12.计算分段函数: 0 x<0 1 0≤x<1 f(x)= 2 1≤x<2 3 x≥2 下面程序段中正确的是【】。 (A) Select Case x (B) Select Case x Case x y=0 y=0 Case x>=O And x<1 Case x<1 y=1 y=1 Case x>=1 And x<2 Case x<2 y=2 y=2 Case Else Case Else y=3 y=3 End Select End Select (C) Select Case x (D) Select Case x Case Is<1 Case Is>=0,Is<1 y=1 y=1 Case Is<2 Case Is>=1,Is<2 y=2 y=2 Case Else Case Is>=2 y=3 y=3 End Select End Select 二、判断程序或程序段的执行结果 1.下列程序段的执行结果为【】。 X=2 Y=1 If X*Y<1 Then Y=Y-1 Else Y=-1 Print Y-X>O (A)True (B)False (C)-1 (D)1 2.下列程序段的执行结果为【】。 J1=10 J2=30 If J1 Print J1 (A)10 (B)30 (C)10 30 (D)30 10 3.下列程序段的执行结果为【】。 X=5 Y=-20 If Not X>O Then X=Y-3 Else Y=X+3 Print X-Y;Y-X (A)-3 3 (B)5 -8 (C)3 –3 (D)25 -25 4.下列程序段的执行结果为【】。 A="1" B="2" A=Val(A)+Val(B) B=Val("12") If A<>B Then Print A-B Else Print B-A (A)-9 (B)9 (C)12-12 (D)0 5.下列程序段的执行结果为【】。 A=75 If A>6O Then I=1 If A>70 Then I=2 If A>80 Then I=3 If A>90 Then I=4 Print "I=";I (A)I=1 (B)I=2 (C)I=3 (D)I=4 6.下列程序段的执行结果为【】。 A="abed" B="bcde" E=Right(A,3) F=Mid(B,2,3) If E (A)cdebcd (B)cdd (C)cdcd (D)bcdcde 7.下列程序段的执行结果为【】。 A=75 If A>60 Then I=1 ElseIf A>80 Then I=3 ElseIf A>9Othen I=4 EndIf Print "I=";I (A)I=1 (B)I=2 (C)I=3 (D)I=4 8.下列程序段的执行结果为【】 A=1:B=O Select Case A Case 1 Select Case B Case O Print "**O**" Case l Print "**1**" End Select Case 2 Print "**2**" End Select (A)**O** (B)**1** (C)**2** (D)O 9.下列程序段的执行结果为【】。 x=Int(Rnd+4) Select Case x Case 5 Print "优秀" Case 4 Print "良好" Case 3 Print "通过" Case Else Print "不通过" End Select (A)优秀(B)良好(C)通过(D)不通过 三、程序填空 1.以下程序用于判断输入的年份是否是闰年。如果年份能被4整除但不能被100整除,或者年份能被 400整除,则该年为闰年;否则不是闰年。 Private Sub Command1_Click() y=InputBox("请输入年份") If (1) Then Print y &"年为闰年" Else Print y &"年不是闰年"L End If End Sub 2.下面的程序用于求三个数中的最大数、最小数。 Private Sub Command1_Click() a=Val(InputBox("请输入第一个数")) b=Val(InputBox("请输入第二个数")) Min =a If b> (1) Then Max=b If b< (2) Then Min=b If (3) Then Max=c If (4) Then Min=c Print "最大数为";Max Print "最小数为";Min End Sub 3.以下程序判断从文本框Text1中输入的数据,如果该数据满足条件:除以3余2,除以5余3,除以7余 4, 则输出；否则将焦点定位在文本框Text1中，选中其中的确文本。 Private Sub Command1_Click() x=Val(Text1.Text) If (1) Then Print x Else (2) (3) (4) End If End Sub 4.下面的程序用于根据文本框A中输入的内容进行以下处理：当A<6.6时，打印"A<6.6"；当A=6.6 时，打印"A=6.6"；当A>6.6时，打印"A>6.6"。 Private Sub Command1_Click() If (1) Then Print "A<6.6" (2) Val(A.Text)=6.6 Then Print "A=6.6" Else Print "A>6.6" (3) End Sub 5.下面的程序用于根据文本框X中输入的内容进行以下处理：若X为2、4、6，则打印"X的值为2、4、 6"；若X为3、5，则打印"X的值为3、5"；若X为7、8，则打印"X的值为7、8"；否则,打印"X不在范围内"。 Private Sub Command1_click() Select Case Val(X.Text) Case (1) Print "X的值为2、4、6" Case (2) Print "X的值为3、5" Case (3) Print "X的值为7、8" (4) Print "X不在范围内" End Select End Sub 6.下面程序用来计算: A+B (A>5) N= B/A (A=5) A=Val(Text1.Text) B=val(Text2.Text) Select Case A Case (1) N=A+B Case (2) N=B/A Case (3) N=O End Select Text3.Text=N End Sub 第六章循环结构程序设计 一、判断程序或程序段的执行结果 1.下列程序段的执行结果为【】。 I=0 For G=10 To 19 Step 3 I=I+1 Next G Print I (A)4 (B)5 (C)3 (D)6 2.下列程序段的执行结果为【】。 X=0 For K=1 To 10 Step 2 X=X+K Next K Print K;X (A)-1 6 (B)-1 16 (C)1 6 (D)11 31 3.下列程序段的执行结果为【】。 K=0 For I=1 To 3 A=I^I^K Print A Next I (A)1 1 1 (B)1 4 9 (C)0 0 0 (D)1 2 3 4.下列程序段的执行结果为【】。 N=10 For K=N To 1 Step -1 X=Sqr(K) X=X-2 Next K Print X-2 (A)-3 (B)-1 (C)1 (D)1.16227765 5.下列程序段的执行结果为【】。 X=1 Y=1 For I=1 To 3 F=X+Y Print F Next I (A)2 3 6 (B)2 2 2 (C)2 3 4 (D)2 3 5 6.下列程序段的执行结果为【】。 A="ABBACDDCBA" For I=6 To 2 Step -2 X=Mid(A,I,I) Y=Left(A,I) Z=Right(A,I) Z=X & Y & Z Next I Print Z (A)ABA (B)AABAAB (C)BBABBA (D)ABBABA 7.给出下面程序段的输出结果【】。 For X=1.5 To 5 Step 1.5 Print X Next X 8.给出下面程序段的输出结果【】。 For I=-5 To –Lo Step -1 X=X+I Print X Next I 9.给出下面程序段的输出结果【】。 Z="ABCDEFGABCDEFG" For I=6 To 2 Step -3 U=String(I,Z) V=Left(Z,I) W=Mid(Z,I,I) X=Right(Z,I) Y=X+W+V+U Next I Print U,V,W,X,Y 10.给出下面程序段的输出结果【】。 For I=O To 3 Print Tab(4*I+1);I;"2" & I Next I 11.给出下面程序段的输出结果【】。其中,Trim函数用于去除字符串前后的空格。For I=1 To 7 Print Tab(8-I);String(I,Trim(Str(I))) Next I 12.下列程序段的执行结果为【】。 A=0:B=1 Do A=A+B B=B+1 Loop While A<10 Print A;B (A)10 5 (B)A B (C)0 1 (D)10 30 I=4 A=5 Do I=I+1 A=A+2 Loop Until I>=7 Print "I=";I Print "A=";A (A) I=4 (B)I=7 (C)I=8 (D)I=7 A=5 A=13 A=7 A=11 14.下列程序段的执行结果为【】。 N=O J=1 Do Until N>2 N=N+1 J=J+N*(N+1) Loop Print N;J (A) 0 1 (B)3 7 (C)3 21 (D)3 13 15.给出下面程序段的输出结果【】。 P=O S=0 Do P=P+2 S=S+P Loop While P<11 Print "S=";S 16.给出下面程序段的输出结果【】。 M1=1 M2=1 Do While M2<>6 M1=M1*M2 M2=M2+1 Loop Print "M1=";M1, "M2=";M2 17.下列程序段的执行结果为【】。 N=0 For I=1 To 3 For J=5 To 1 Step -1 N=N+1 Next J Next I Print N;J;I (A) 12 0 4 (B)15 0 4 (C)12 3 1 (D)15 3 1 18.下列程序段的执行结果为【】。 A=0 B=0 For I=-1 To –2 Step -1 Next J A=A+1 Next I Print A;B (A) 2 4 (B)-2 2 (C)4 2 (D)2 3 19.下列程序段的执行结果为【】。 K=0 For J=1 To 2 For I=1 To 3 K=I+1 Next I For I=1 To 7 K=I+1 Next I Next J Print K (A)10 (B)6 (C)11 (D)16 20.下列程序段的执行结果为【】。 For X=5 To 1 Step -1 For Y=1 To 6-X Print Tab(Y+5); "*"; Next y Print Next X (A)***** (B)***** (C)* (D) * **** **** ** *** *** *** *** ***** ** ** **** ******* * * ***** ********* 21.下列程序段的执行结果为【】。 S=0:T=0:U=O For X=1 To 3 For Y=1 To X For Z=Y T0 3 S=S+1 Next Z T=T+1 Next Y U=U+1 Next X Print S;T;U (A)3 6 14 (B)14 6 3 (C)14 3 6 (D)16 4 3 22.给出下面程序段的输出结果【】。 For a=1 To 6 Print Tab(7-a); For b=1 To 2*a-1 Print "*"; Next b Next a N=1 Do For k=N To 5 Print "*"; Next k Print N=N+1 Loop Until N>5 24.给出下面程序段的输出结果【】。 For A=O To 1 For B=1 To 2 For C=2 To 3 Print (A=O Or B=1) And (C=2 And A=B) Or Not (C=3); Next C Next B Next A 25.给出下面程序段的输出结果【】。 Dim i As Integer,j As Integer,k As Integer k=0 For i=O To 10 Step 3 For j=1 To 10 If j>5 Then k=k+4:Exit For k=k+1 Next j Print I,k If i>8 Then Exit For Next i Print i,k 二、程序填空 1.以下程序用来产生20个(0,99)之间的随机整数,并将其中的偶数打印出来。 Private Sub Command1_Click() Randomize For I=1 To 20 X=Int(Rnd* (1) ) If X/2= (2) Then Print X Next I End Su b 2.以下程序用来计算由键盘输入的N个数中正数之和,负数之和,正数的个数,负数的个数。其中用C 累加负数之和,IC累加负数的个数,D累加正数之和, ID累明加正数的个数。 Private Sub Command1_Click() N=lO C=0:IC=0:D=0:ID=O For k=I To N A=Val(InputBox("请输入A")) If A If A>O Then D= (3) : (4) Next k Print "负数的个数为:",IC Print "正数的和为:",D End Sub 3.下面是一个体操评分程序。20位评委，除去一个最高分和一个最低分,计算平均分（设满分为100 分）。 Private Sub Command1_Click() Max=0 Min=10 For I=1 To 20 N=Val(InputBox("请输入分数")) If (1) Then Max=N If (2) Then Min=N S=S+N Next I S= (3) P=S/18 Print "最高分";Max,"最低分";Min Print "最后得分:";P End Sub 4.搬砖问题:36块砖，36人搬,男的搬4块,女的搬3块,2个小儿抬1块,要求1次全部搬完,问需男、女、 小儿各多少人。 Private Sub Command1_click() For Male =1 To 9 For Female =1 To 12 For Boy =2 To 36 Step 2 If Boy + Female + Male =36 And (1) Then Print Male,Female,Boy End If Next Boy Next Female Next Male End Sub 5.以下程序用于计算N=1+(1+3)+(1+3+5)+…+(1+3+5+…+39)。 Private Sub Command1_Click() T=O M=1 Sum =0 Do T=T + (1) Sum = Sum + (2) M=M + 2 Loop While (3) Print "Sum=";Sum End Sub 6.以下程序用于计算数学表达式1^2-2^2+3^2-4^2+...+(N-1)^2-N^2。 Private Sub Command1_Click() N=val(InputBox("请输入大于零的偶数N:")) S=0 I=1 C=1 C= (1) I= (2) Loop While (3) Print "S=";S End Sub 7.以下程序用于求S=1+3+3^2+3^3+…+3^10的值。 Private Sub Command1_Click() S= (1) T=1 For I=1 To 10 T= (2) S=S + T Next I Print "S=";S End Sub 8.以下程序输入N个书名,并将书名中含有连续3个字母COM的所有书名显示出来。Private Sub Command1_Click() n=InputBox("请输入数量:") For i=1 To n bookname=InputBox("请输入书名:") l=Len (1) If l>=3 Then If (2) Then Print bookname End If Next i End Sub 9.以下程序用于在带垂直滚动条的文本框Textl中输出3到100之间的全部素数。Private Sub Command1_Click() Text1.Text =" For N=3 To lOO K=Int(sqr(N)) I=2 Flag =O DO While I<= (1) And Flag =0 If N Mod I=O Then Flag =1 Else I=I+1 Loop If (2) Then Text1.Text=Text1.Text & Str(N) & Chr(13) & Chr(10) End If Next N End Sub 10.以下程序用来输出20个在开区间(10,87)中的随机整数R,每行输出4个整数。Private Sub Command1_Click() For I=1 To 20 R= (1) Print R; If (2) Then Print Next I End Sub Private Sub Command1_Click() Dim N As String,C AS String,DAS String N=Text1.Text M= (1) For I=M To 1 Step –1 C=Mid(N,I,1) D=D & (2) Next I (3) =D End Sub 12.以下程序用于在单击图片框Picture1时显示图6_1所示的结果。 Private Sub Picture1_Click() Picture1.Print Tab(5); "*" For I=1 To 4 Picture1.Print (1) Next I For I=3 To 1 Step –1 Picture1.Print (2) Next I Picture1.Print Tab(5);"*" End Sub 13.以下程序在窗体上打印出如图6_2示的数据。 Private Sub Fonm_Click() For N=1 To 6 Print Tab(20-3*N); For M=1 To 2*N-1 If M<=N Then (1) Else (2) Print A Next M Print Next N End Sub 14.单击窗体时输出"斐波那契数列"的前20项。该数列第一项为0,第二项为1,其后每一项的值都是 前两项之和。即:0,1,1,2,3,5,8,13,…从题后供选择的答案中选出正确答案,填入以下程序中相应处,构成完整程序。 Private Sub Fonm_Click() X1=0 X2=1 N=0 Do While (1) Print X1,X2 X1= (2) X2= (3) N=N+1 Loop End Sub 供选择的答案: (1)(A)N<10 (B)N<9 (C)N<10 (D)N<20 (2)(A)X1+X2 (B)X2 (C)X1+N (D)X2+N (3)(A)X1+X2 (B)X2 (C)X1+N (D)X2+N 处,构成完整程序。 Private Sub Form_Click() For N=1 To 6 Print (1) For M=1 To 6 Print "*"; Next M Print (2) For M=1 To 6 Print "*"; Next M Print Next N End Sub 供选择的答案: (1)(A)Tab(6-N); (B)Tab(6+N); (C)Tab(7-N); (D)Tab(7+N); (2)(A)Tab(12+N); (B)Tab(11+N); (C)Tab(11-N); (D)Tab(12-N); 16.单击命令按钮Command1时利用台劳级数展开式求sin x 的近似值。展开式为: x-x^3/3!+x^5/5!-…+(-1)^i*x^(2i+1)/(2i+1)!+… (i=0,1,2,...,n) 从题后供选择的答案中选出正确答案，填入以下程序中相应处，构成完整程序。（设在文本框Text1中输入的是角度，以上公式中的x为弧度） Private Sub Command1_Click() X1=Val(Text1.Text) X=X1*3.1415926/180 N=Val(Text2.Text) Y= (1) F=1 For I=1 To N (2) S=1 For k=1 To (3) T=T*K S= (4) Next k F=(-1)*F Y=Y+F* (5) Next I Print "sin(";X1;")=";Y End Sub 供选择的答案: (1)(A)O (B)X (C)1 (D)N (2)(A)T=X (B)T=0 (C)T=N (D)T=1 (3)(A)2*I+1 (B)I+1 (C)2*I (D)I (4)(A)S*K (B)S*X (C)X*N (D)S*N (5)(A)T/S (B)S*F (C)S/T (D)S/F 17.单击命令按钮Command1时利用梯形法求sinx的定积分,区间为[0,2]。从题后供选择的答案中选 出正确答案,填入以下程序中相应处,构成完整程序。 Private Sub Command1_Click() A=0 B=2 N=30 For k= (1) To N T=(Sin(A+(K-1)*H)+Sin(A+K*H))*H/2 S= (2) Next k Print (3) End Sub 供选择的答案: (1)(A)0 (B)1 (C)N (D)A (2)(A)S+1 (B)T (C)T+T (D)S+T (3)(A)"Area=";S (B)T (C)S=S (D)K 18.单击命令按钮Command1时利用矩形法求(1+e^x)的定积分,区间为[0,1]。从题后供选择的答案中 选出正确答案,填入以下程序中相应处,构成完整程序。 Private Sub Command1_Click() A=0 B=1 N=100 X=A:H=(B-A)/N F0= (1) S=0 For I=1 To N S1=F0*H S= (2) X= (3) F0=1+Exp(X) Next I Print S End Sub 供选择的答案:E (1)(A)0 (B)1+Exp(H) (C) 1+Exp(X) (D)H (2)(A)S+1 (B)S+S1 (C) S+F0 (D)S1 (3)(A)X+H (B)X+1 (C) 1+Exp(X) (D)S 试卷编号：25 所属语言：Visual Basic 试卷方案：VB程序设计 试卷总分：100分 共有题型：4种 一、单选共15题（共计30分） 第1题（2.0分）题号:2299 难度:中第1章 将调试通过的工程经"文件"菜单的"生成.exe文件"编译成.exe后,将该可执行文件转到其他机器上不能运行的主要原因是(). A:运行的机器上无VB系统所需的动态连接库 B:缺少.frm窗体文件 C:该可执行文件有病毒 D:以上原因都不对 答案：A 第2题（2.0分）题号:2344 难度:中第2章 下列字符串常量中,最大的是(). A:"北京" B:"上海" C:"天津" D:"广州" 答案：C 第3题（2.0分）题号:2436 难度:中第2章 能正确表达a≤1或a≥5的逻辑表达式是(). A:a<=1或a>=5 B:a<=1,a>=5 C:a<=10 Or a>=5 D:a<=l And a>=5 答案：C 第4题（2.0分）题号:2539 难度:中第2章 用一个程序段对一个对象被单击(或双击)做出响应,从而实现指定的操作,称为(). A:可视化程序设计 B:事件驱动编程机制 C:过程化程序实际方法 D:非过程化程序设计语言 答案：B 第5题（2.0分）题号:2601 难度:中第3章 在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Option Base 1 Private Sub Command1_Click() K = 3 If X < 3 Then Print X + 3; If X < 4 Then Print X + 4; If X < 5 Then Print X + 5; If X< 6 Then Print K + 6; Print End Sub 程序运行后,单击命令按钮,则窗体上显示的内容是(). A:6 7 8 9 B:7 8 9 C:8 9 D:9 答案：B 第6题（2.0分）题号:2662 难度:中第3章 运行下面程序后,在窗体中显示的是(). Private Sub Form_Click() a$="*": b$="$" For k=1 To 3 x$=String$(Len(a$)+k,b$) Print x$; Next k Print End Sub A:*** ** **** B:*$*$*$ C:1*$2*$3*$ D:$$$$$$$$$ 答案：D 大学VB考试题库 一、单项选择题 1、与传统的程序设计语言相比,Visual Basic最突出的特点是（）。 A、结构化程序设计 B、程序开发环境 C、事件驱动编程机制 D、程序调试技术 2、赋值语句：a=123& MID("123456",3,2)执行后，a变量中的值是（）。 A、"12334" B、123 C、12334 D、157 3、保存一个工程至少应保存两个文件，这两个文件分别是（B）。 A、文本文件和工程文件 B、窗体文件和工程文件 C、窗体文件和标准模块文件 D、类模块文件和工程文件 4、以下能在窗体Form1的标题栏中显示"VisualBasic窗体"的语句是（C）。 A、https://www.wendangku.net/doc/9a12757832.html,="VisualBasic窗体" B、Form1.Title="VisualBasic窗体" C、Form1.Caption="VisualBasic窗体" D、Form1.Text="VisualBasic窗体" 5、为了装入一个VisualBasic应用程序，应当（D） A、只装入窗体文件（.frm） B、只装入工程文件（.vbp） C、分别装入工程文件和标准模块文件（.bas） D、分别装入工程文件、窗体文件和标准模块文件 6、赋给一个数组的数据类型一定要（A）。 A、相同 B、不相同 C、两可 D、都不对 7、下面正确的赋值语句是（C）。 A、x+y=30 B、y=π*r*r C、y=x+30 D、3y=x 8、VisualBasic 6.0集成环境的主窗口中不包括（C）。 A、标题栏 B、菜单栏 C、状态栏 D、工具栏 9、以下叙述中错误的是(C)。 A、Visual Basic 是事件驱动型可视化编程工具 B、Visual Basic应用程序不具有明显的开始和结束语句 C、Visual Basic工具箱中的所有控件都具有宽度（Width）和高度（Height）属性(计时器) D、Visual Basic中控件的某些属性只能在运行时设置 10、要使Print方法在Form_Load事件中起作用，要对窗体的(C)属性进行设置。 A、Backcolor B、ForeColor C、AutoRedraw D、BackStyle 11、若要使命令按钮不可操作，要对(A)属性进行设制。 A、Enabled B、Visible C、BackColor D、Caption 12、以下叙述中错误的是(B)。 A、一个工程中可以包含多个窗体文件 B、在一个窗体文件中用Private定义的通用过程能被其他窗体调用 C、在设计VB程序时，窗体、标准模块、类模块等需要分别保存为不同类型的磁盘文件。 D、一个工程默认的启动对象是Form1 13、Cls方法可以清除窗体或图片框中的(C)内容。 A、在设计阶段使用Picture设置的背景位图 B、在设计阶段放置的控件 C、在运行阶段产生的图形和文字 D、以上均可 14、设x=3,y=5,则以下表达式值为真的是 (C) A、(-3+5>x) And (y>0) B、(x<0) Eqv (y>0) C、(x>y) Or (y>0) D、x>=y And y>10 15、为了防止用户随意将光标置于控件之上，应将进行(D)设置。 A、将控件的TabIndex属性设置为0 2011-2012学年第一学期算法与程序设计期末考试题 班级：姓名：分数： 一、单项选择题（每题4分） 1.算法是解决问题的( ) A.程序代码 B.方法与步骤 C.计算公式 D.最终结果 2.以下不能作为vb常量的的是( ) A.“Good Luck” B. PI C. 1.5E-3 D. 16.34 3.以下各表达式中, 计算结果为0的是( ) A. INT(12.4)+INT(-12.6) B. CINT(12.4)+CINT(-12.6) C. FIX(13.6)+FIX(-12.6) D. FIX(12.4)+FIX(-12.6) 4.设a=″Visual Basic″，下面使b=″Basic″的语句是( ) A.b=Left(a，8，12) B.b=Mid(a，8，5) C.b=Right(a，5，5) D.b=Left(a，8,5) 5.inputbox() 函数返回值类型为( ) A.数值 B.字符串 C.数值和字符串 D.变体 6.下列关于For…Next语句的说法正确的是( ) A. 循环变量、初值、终值和步长都必须为数值型 B.Step后的步长只能为正数 C. 初值必须小于终值 D.初值必须大于终值 7.下列符号中，只有( )是合法的VB变量名。 A．xy23 B．23xy C．Sub D．xy8[1] 8.数学表达式Sin30°写成VB表达式是( ) A．Sin30 B．Sin(30) C．Sin(30°) D．Sin(30*3.14/180) 9.在VB的运算中，级别最高的是( ) A．= B．And C．Or D．Not 10.判断任意3条线段a、b、c能否构成三角形的表达式为( ) A．a+b>=c Or a+c>=b Or b+c>=a B．Not(a+b 2012二级VB上机考试试题题库 VB考试上机试题 1) .新建一个工程，实现单击Command1将text1中的内容复制（或者剪切）到Text2中。（要求使用Clipboard对象）保存。 窗体上一个text文本框，两个command按钮，caption分别为“剪切”，“恢复”，运行后要求在text1中输入文本，点“剪切”，把text1中的内容剪切掉，点”恢复“，把text1中的内容恢复出来。提示：定义一个变量用来存放text1中的内容。 2) .新建一个工程，文本框text1,使用户输入字母一律转换为大写显示（焦点在最右端）保存。 3) .新建一个工程，实现功能：在窗体中实现由下向上滚动显示“您好！网络之家”这几个字。保存。 4) .新建一个工程，在Form1界面创建Form2，Form3两个子菜单的Forms菜单，选择Form2子菜单，以无模式显示Form2,选择Form3子菜单，以有模式显示Form3.保存。5) .新建一个工程，在界面上放置一个工具条Toobar1,在工具条上有三个按纽，按下第一个按钮时用MsgBox显示：“第一个按纽被按下”；按下第二个按纽时用MsgBox显示：“第二个按纽被按下”；按下第三个按纽时用MsgBox显示：“第三个按钮被按下”。保存。 6) 。新建一个工程，包含两个窗体Form1,Form2。实现功能制作－－－欢迎界面，时间为三秒，三秒后，Form1消失，Form2出现。保存。 7) 。新建一个工程，实现功能限制：在Text1中只能输入10个字母，超过的在Text2中显示。保存。 8) 。新建一个工程，实现功能单击Text1框时，Text1中的内容被全选。保存。 9) 。新建一个工程，实现功能点击Command1按钮，读取系统的汉字字型，在ComBox列表框中显示。保存。 10) 。新建一个工程，实现单击Commmand1将Text1的内容剪切到Text2中。（上次的那道题目是复制）保存。 11) 。新建一个工程，其中含五个单选按钮，两个面板StratusBar1. 第一面板题“欢迎探讨”，点击单选按钮时，第二个面板标题为选中的标题号。保存。 12) 。新建一个工程，使用打开对话框找到某一文件（硬盘上任意一文本文件），带全路径的文件名，显示在一文本框内。保存。 第一部分：客观题 1、 单项选择题 1、在窗体模块的通用段中声明变量时，不能使用的关键字是（ ） A、 Dim B、 Public C、Private D、 Static 2、在设计阶段，当双击窗体上的某个控件时，所打开的窗口是 （ ） A、工程资源管理器窗口 B、工具箱窗口 C、 属性窗口 D、代码窗口 3、若要使某可见控件获得焦点，可使用（ ）方法来实现。 Ａ、Refresh Ｂ、Setfocus Ｃ、Gotfocus Ｄ、Value 4、下列不可作为VB变量名的是（ ） A、ABT1 B、Alpha C、ABC D、4*Delta 5、表达式 5 Mod 3+3\5*2的值是 （ ） A、 0 B、 6 C、4 D、 2 6、下列语句中，正确的赋值语句是（ ） A、 i + j = 10 B、 2i = j C、 j = i + j D、 i * j = 0 7、执行下列程序段后，x的值是（ ）。 n = 4: x = 1: i = 1 Do x = x * i i = i + 1 Loop While i < n A、 2 B、 6 C、 10 D、 14 8、当用户在窗体上单击鼠标时，不会触发的事件是（ ） Ａ、Click Ｂ、MouseDown Ｃ、MouseUp Ｄ、DblClick 9、下列为整型变量的是（ ） A、 x! B、 x# C、x$ D、 x% 10、要从For循环中直接退出循环，可使用的语句( )。 A、Exit Do B、Exit Loop C、Exit For D、Stop 11、下列逻辑表达式中，能正确表示条件“x，y都是奇数”的是 （ ） A、x Mod 2 =1 Or y Mod 2 =1 B、x Mod 2 =0 Or y Mod 2=0 2007年春 江苏省高等学校非计算机专业学生 计算机基础知识和应用能力等级考试 二级试卷 试卷语种：Visual Basic 第一部分计算机基础知识 1．微电子技术是信息技术领域的关键技术，它以集成电路（IC）为核心。在下列有关叙述中，错误的是。 A．A．目前IC芯片（如CPU芯片）的集成度可达数千万个电子元件 B．B．Moore定律指出，单块IC的集成度平均每半年翻一番 C．C．从原料熔练到最终产品包装，IC的制造工序繁多，工艺复杂，技术难度非常高 D．D．非接触式IC卡采用电磁感应方式无线传输数据，所以又称为射频卡或感应卡 2．在下列有关通信中使用的传输介质的叙述中，错误的是。 A．A．计算机局域网中大多使用无屏蔽双绞线，其无中继有效传输距离大约100m B．B．同轴电缆可用于传输电视信号 C．C．光纤价格高，一般不在校园网和企业网中使用 D．D．微波的波长很短，适合于长距离、大容量无线通信 3．二进制数（1010） 2与十六进制数（B2） 16 相加，结果为。 A．(273) 8B.(274) 8 C.(314) 8 D.(313) 8 4.设有一段文本由基本ASCII字符和GB2312字符集中的汉字组成，其代码为B0 A1 57 69 6E D6 D0 CE C4 B0 E6，则在这段文本中含有。 A．1个汉字和9个西文字符 C.3个汉字和5个西文字符 B.2个汉字和7个西文字符 D.4个汉字和3个西文字符 5.在下列有关CPU的叙述中,错误的是 . A. A.CPU的主要组成部分有运算器、控制器和寄存器组 B. B.CPU的主要功能是执行指令，不同类型CPU的指令系统通常有所 不同 C. C.为了加快运算速度，CPU中可包含多个算术逻辑部件（ALU） D. D.目前PC机所有的CPU芯片均为Intel公司的产品 6．PC机在加电启动过程中会运行POST程序、引导程序、系统自举程序等。若在启动过程中，用户按某一热键（通常是Del键）则可以启动CMOS设置程序。这些程序运行的顺序是。 A．A．POST程序->CMOS设置程序->系统自举程序->引导程序 B．B．POST程序->引导程序->系统自举程序->CMOS设置程序 C．C．CMOS设置程序->系统自举程序->引导程序->POST程序 D．D．POST程序->CMOS设置程序->引导程序->系统自举程序 7.目前PC机一般都有USB和FirWire接口,用于连接各种外部设备.在下列关于这两种接口的叙述中,错误的是 . A. https://www.wendangku.net/doc/9a12757832.html,B是一种串行接口,可以连接键盘、鼠标器、优盘、数码相机等 多种设备 VB期末考试试题A卷 一、填空题 1、VB程序设计的主要特点是（1）和（2）。 2、在VB中，最主要的两种对象是（3）和（4）。 3、工程是构成应用程序文件的（5）。 4、方法是VB提供的一种（6），用来完成一定的操作。 5、浮点类型数据包括单精度型和___（7）__数据。 6、事件是窗体或控件对象识别的___（8）____。 7、可用窗体的___（9）_ 方法在窗体中显示文字。 8、复选框控件Value属性指示复选框处于____（10）___或禁止状态(暗淡的)中的某一种。 9、在VB中，修改窗体的（11）和（12）属性值，可改变窗体的大小。 10、双击工具箱中的控件图标，可在窗体的（13）出现一个尺寸为缺省值的控件。 11、在MsgBox函数中，如果缺省title参数，则使用（14）作为消息框的标题。 12、设x＝34.58，语句Print Format(x,“000.0”)的输出结果是（15）。 13、在VB 中，数值型变量的初值为（16），Varant型变量的初值为（17），布尔型变量的初值为（18）。 14、设置窗体的（19）属性，可在窗体上显示图片。 15、程序运行工程中，清除MP图片框中的图片应使用语句（20）。 二、选择题 1、菜单控件只包括一个事件，即（1），当用鼠标单击或键盘选中后按“回车”键时触发该事件，除分隔条以外的所有菜单控件都能识别该事件。 A、GotFocus B、Load C、Click D、KeyDown 2、滚动条控件(如图所示)的Max属性所设置的是（2）。 A、滚动框处于最右位置时，一个滚动条位置的Value属性最大设置值 B、单击滚动条和滚动箭头之间的区域时，滚动条中滚动块的最大移动量 C、单击滚动条的箭头区域时，滚动条中滚动块的最大移动量 D、滚动条控件无该属性 3、SQL 语句 Select * Form student 中的 *表示（3）。 A、所有记录 B、所有字段 C、所有表 D、都不对 4、以下选项中，不属于标签的属性是（4）。 A、Enabled B、Caption C、Default D、Font 5、要求改命令按钮显示的文本，应当在属性窗口中改变的属性是（5） 【HNCE网上考试系统 v9.6】本套软件使用权属于：郑州大学 考试课程: 考试时间:100分钟考场:第一考场考试日期:2013.05.24 考号：姓名：剩余时间：99:42 保存交卷退出帮助 A B C D A B C D A B C D A B C D A B C D A B C D A B C D A 命令 B 命令 C 命令 D 命令 A B C D A B C D A B C D A B C D A B C D A B C D A B C D A 模块文件 B 件的属性 C 源文件 D 包含多个工程文件及属于该工程的其他文件 A 该窗体文件并没有被删除 B 窗体文件被删除 C 程仍然包含这个窗体 D A B C D A B C D A B C D A B C D A可以实现交换两个变量值，而S2不能 B 个变量值，而S1不能 C 现交换两个变量值 D 现交换两个变量值 A B C D A B C D A 过程调用后均不保存值 B 有变量都是Static型的变量 C 所有变量都是Private型的变量 D 所有变量都是非全局Public A 用Dim语句或Static语句声明的变量 B 明它的过程 C Static语句声明的 D 程执行完毕后就被释放了 A B C D A B C D A B C D A B C D 声明段 A B C D A B C D A B C D A B C D A B C D A B C D A 同 B Sub过程不可以 C 值，而Function过程能通过过程名返回值 D 或直接使用过程名调用，而 A工程中可以有多个窗体，但最多只能有一个窗体作为启动窗体 B 声明Public类型的变量来传递数据 C 大化、最小化或正常（保持设计时大小）等三种状态 D A 菜单 B 过程代码都放在窗体文件中 C 名必须相同 D 是设计阶段时显示的位置 全国计算机VB等级考试历年全真试题 （共15套，含答案） ２００５年4月份二级VB真题（附参考答案） （考试时间90分钟，满分100分） 一、选择题((1)~(35)每小题2分，共70分) 下列各题A)、B)、C)、D)四个选项中，只有一个选项是正确的，请将正确选项涂写在答题卡相应位置上，答在试卷上不得分。 (1)数据的存储结构是指 A) 存储在外存中的数据B) 数据所占的存储空间量 C) 数据在计算机中的顺序存储方式D) 数据的逻辑结构在计算机中的表示 (2)下列关于栈的描述中错误的是 A)栈是先进后出的线性表B) 栈只能顺序存储 C)栈具有记忆作用D) 对栈的插入与删除操作中，不需要改变栈底指针 (3)对于长度为n的线性表，在最坏情况下，下列各排序法所对应的比较次数中正确的是 A) 冒泡排序为n/2 B) 冒泡排序为n C) 快速排序为n D) 快速排序为n(n-1)/2 (4)对于长度为n的线性表进行顺序查找，在最坏情况下所需要的比较次数为 A) log2n B) n/2 C) n D) n+1 (5)下列对于线性链表的描述中正确的是 A)存储空间不一定是连续，且各元素的存储顺序是任意的 B)存储空间不一定是连续，且前件元素一定存储在后件元素的前面 C)存储空间必须连续，且前件元素一定存储在后件元素的前面 D)存储空间必须连续，且各元素的存储顺序是任意的 (6)下列对于软件测试的描述中正确的是 A)软件测试的目的是证明程序是否正确 B)软件测试的目的是使程序运行结果正确 C)软件测试的目的是尽可能多地发现程序中的错误 D)软件测试的目的是使程序符合结构化原则 (7)为了使模块尽可能独立，要求 A)模块的内聚程度要尽量高，且各模块间的耦合程度要尽量强 B)模块的内聚程度要尽量高，且各模块间的耦合程度要尽量弱 C)模块的内聚程度要尽量低，且各模块间的耦合程度要尽量弱 D)模块的内聚程度要尽量低，且各模块间的耦合程度要尽量强 (8)下列描述中正确的是 A) 程序就是软件 B) 软件开发不受计算机系统的限制 C) 软件既是逻辑实体，又是物理实体 D) 软件是程序、数据与相关文档的集合 (9)数据独立性是数据库技术的重要特点之一。所谓数据独立性是指 A) 数据与程序独立存放 B) 不同的数据被存放在不同的文件中 C) 不同的数据只能被对应的应用程序所使用 D) 以上三种说法都不对 (10) 用树形结构表示实体之间联系的模型是 大一VB期末考试试卷及答案 1．在代码中引用一个控件时，应使用控件的（ b ）属性。 A．Caption B．Name C．Text D．Index 2．设变量x = 4，y = -1，a = 7，b = -8,下面表达式（ a ）的值为“假”。 A．x+a <= b-y B． x > 0 AND y < 0 C．a = b OR x>y D． x+y > a+b AND NOT (y < b) 3．表达式Int(Rnd*71)+10产生的随机整数范围是（ c ）。 A．（10，80） B．（10，81） C．[10，80] D．[10，81] 4．函数Sgn(3.1416)的返回值是（ c ）。 A．-1 B．0 C．1 D．以上都不对 5．67890属于（ d ）类型数据。 A．整型 B．单精度浮点数 C．货币型 D．长整型 6．下列变量名中正确的是（ d ）。 A．3S B．Print C．Select My Name D．Select_1 7．下列赋值语句（ a ）是有效的。 A．sum = sum -sum B．x+2 = x + 2 C．x + y = sum D．last = y / 0 8．以下的控件或方法具有输入和输出双重功能的为（ b ）。 A．Print B．Textbox C．Optionbutton D．Checkbox 9．若要获得列表框中被选中的列表项的内容，可以通过访问（ d ）属性来实现。 A．Name B．ListIndex C．ListCount D．Text 10．下列代码的运行结果为（ b ）。 Private Sub command1_click() Dim m(10) 1、VB应用程序中可以包括三种模块：( 窗体模块)、( 标准模块) 和类模块。 2、下列过程不能在标准模块中定义的是( A )。 A、事件过程 B、子过程 C、函数过程 D、公共过程 3、以下叙述中错误的是D A、如果过程被定义为Static类型，则该过程中的局部变量都是Static类型 B、Sub过程中不能嵌套定义Sub过程 C、Sub过程中可以嵌套调用Sub过程 D、事件过程可以像通用过程一样由用户定义过程名 2、在某一窗体模块中定义的全局级过程，若被该模块外的模块所调用，必须在该过程名前加上( 窗体名称)。 2、自定义的过程有两种形式：＿Sub＿和＿Function＿。 3、用于退出过程的语句是( D )。 A、Exit B、Exit For C、Exit Do D、Exit Sub 4、在过程的参数列表中列入__ Optional __关键字，就可以指定过程的参数为可选的。 5、如果使用Call关键字来调用一个需要参数的过程，参数就必须要加上__括号__。 1、在窗体代码中有以下事件过程的声明，其中Private表示( B ) Private Sub lblAbc_Change() …… End Sub A、此过程可以被任何其它过程调用 B、此过程只可以被本窗体模块中的其它过程调用 C、此过程不可以被其它过程调用 D、此过程只可以被本工程中的其它过程调用 9、假定已定义了一个过程Sub Add(a As Single,b As Single)，则正确的调用语句是( A )。 A、Add 12,5 B、Call(2*x,Add(1.57)) C、Call Add x,y D、Call Add(12,12,x) 10、要想在过程调用后返回两个结果，下面的过程定义语句合法的是( C )。 A、Sub Procl(ByVal,n,ByVal m) B、Sub Procl(n,ByVal m) C、Sub Procl(n,m) D、Sub Procl(ByVal n,m) 6、写出单击命令按钮Command1时的窗体显示结果。 Public Sub Proc(ByRef n As Integer,ByVal m As Integer) n=n Mod 10 m=m\10 End Sub Private Sub Command1_Click() Dim x as Integer,y As Integer x=15:y=30 Call Proc(x,y) Print x;y VB 期末考试试题A 卷 一、填空题 1、VB 程序设计的主要特点是可视化设计和事件编程。 2、在VB 中，最主要的两种对象是窗体（form ）和控件。 3、工程是构成应用程序文件的集合。 4、方法是VB 提供的一种特殊子程序，用来完成一定的操作。 5、浮点类型数据包括单精度型和___双精度__数据。 6、事件是窗体或控件对象识别的__动作___ 。 7、可用窗体的__print_ 方法在窗体中显示文字。 8、复选框控件Value 属性指示复选框处于 _____ 选中___或禁止状态（暗淡的）中的某一种。 9、在VB中，修改窗体的高度（height）和宽度（width ）属性值，可改变窗体的大小。 10、双击工具箱中的控件图标，可在窗体的中央出现一个尺寸为缺省值的控件。 11、在MsgBox 函数中，如果缺省title 参数，则使用工程1 作为消息框的标题。 12、设x = 34.58，语句Print Format（x, “ 000.0”）的输出结果是34.6。 13、在VB 中，数值型变量的初值为0 ，Varant 型变量的初值为空，布尔型变量的初值为FALSE 。 14、设置窗体的picture 属性，可在窗体上显示图片。 15、程序运行工程中，清除MP 图片框中的图片应使用语句cls 。 二、选择题 1 、菜单控件只包括一个事件，即C ，当用鼠标单击或键盘选中后按“回车”键时触发该事件，除分隔条以外的所有菜单控件都能识别该事件。 A、GotFocus B 、Load C 、Click D 、KeyDown 2、滚动条控件（如图所示）的Max 属性所设置的是A 。 A 、滚动框处于最右位置时，一个滚动条位置的Value 属性最大设置值 B 、单击滚动条和滚动箭头之间的区域时，滚动条中滚动块的最大移动量 C、单击滚动条的箭头区域时，滚动条中滚动块的最大移动量 D、滚动条控件无该属性 3、SQL 语句Select * Form student 中的*表示 B 。 A、所有记录 B、所有字段 C、所有表 D、都不对 4、以下选项中，不属于标签的属性是 C 。 A、Enabled B、Caption C、Default D 、Font 5、要求改命令按钮显示的文本，应当在属性窗口中改变的属性是 A 。 A、Caption B 、Name C、Text D、Label 6、设置一个单选按钮（OptionButton）所代表选项的选中状态，应当在属性窗口中改变的属性是 D 。 A、Caption B 、Name C、Text D、Value 7、允许在菜单项的左边设置打勾标记，下面哪种论述是正确的？ D 。 A、在标题项中输入&,然后打勾 B、在索引项中打勾 C、在有效项中打勾 D、在复选项中打勾 8、当执行以下过程时，在窗体上将显示 A 。 Private Sub Command1_Click（） Print "VB"; Print "Hello! "; Print "VB" 如果要将窗体中的某个命令按钮设置成运行时无法显示，应该设置它的属性。 类是对象的抽象，对象则是类的具体化。在窗体上建立的一个控件称为。 能够获得一个文本框中被选取文本的内容的属性是。 以下属于Visual Basic合法的数组元素是。 设置命令按钮的属性时，只有将属性设置为1，Picture属性才有效，否则无效。 VB有三种工作模式，它们分别是___________模式。 下列函数中，________函数返回的值是数值型的。 类是对象的抽象，对象则是类的具体化。在窗体上建立的一个控件称为。 以下控件中没有Print方法是( ) 以下叙述中错误的是 ( ) A）打开一个工程文件时，系统自动装入与该工程有关的窗体、标准模块等文件 B）保存Visual Basic程序时，应分别保存窗体文件及工程文件 C）Visual Basic应用程序只能以解释方式执行 D）事件可以由用户引发，也可以由系统引发 下列数组声明语句中的数组a包含了_________个数组元素。( ) Dim a(4,-1 to 1,0 to 3) 复选框的Value属性为0时，表示( ) 复选框的Value属性为2时，表示( ) 主过程通过参数传递将一个参数传递给子过程A，并能够通过参数传递返回一个结果，下列子过程的正确定义 以下不属于Visual Basic系统的文件类型是。 A）.frm B）.bat C）.vbg D）.vbp 按变量名的定义规则，是合法定义的变量名。 结构化程序由三种基本结构组成，下面属于三种基本结构之一的是_______ 执行以下程序段后，变量c$的值为________。 a$="Visual Basic Programming" 大学 VB 考试题库 一、单项选择题 1、与传统的程序设计语言相比,Visual Basic最突出的特点是（C）。 A、结构化程序设计 B 、程序开发环境 C、事件驱动编程机制 D 、程序调试技术 2、赋值语句：a=123& MID("123456",3,2)执行后，a变量中的值是（C）。 A、 "12334" B 、 123 C、 12334 D 、 157 3、保存一个工程至少应保存两个文件，这两个文件分别是（B）。 A、文本文件和工程文件 B 、窗体文件和工程文件 C、窗体文件和标准模块文件 D 、类模块文件和工程文件 4、以下能在窗体Form1的标题栏中显示"VisualBasic窗体"的语句是（C）。 A、 ="VisualBasic窗体" B、 ="VisualBasic窗体" C、 ="VisualBasic窗体" D、 ="VisualBasic窗体" 5、为了装入一个VisualBasic应用程序，应当（D） A、只装入窗体文件（.frm ） B、只装入工程文件（.vbp ） C、分别装入工程文件和标准模块文件（.bas ） D、分别装入工程文件、窗体文件和标准模块文件 6、赋给一个数组的数据类型一定要（A）。 A、相同 B 、不相同C、两可 D 、都不对 7、下面正确的赋值语句是（C）。 A、 x+y=30 B 、y=π*r*r C 、y=x+30 D、 3y=x 8、 VisualBasic集成环境的主窗口中不包括（C）。 A、标题栏 B 、菜单栏 C 、状态栏 D 、工具栏 9、以下叙述中错误的是(C) 。 A、 Visual Basic是事件驱动型可视化编程工具 B、 Visual Basic应用程序不具有明显的开始和结束语句 C、Visual Basic 工具箱中的所有控件都具有宽度（Width ）和高度（ Height ）属性 ( 计时器 ) D、 Visual Basic中控件的某些属性只能在运行时设置 10、要使 Print方法在Form_Load事件中起作用，要对窗体的(C) 属性进行设置。 A、 Backcolor B、ForeColor C、 AutoRedraw D、 BackStyle 11、若要使命令按钮不可操作，要对(A) 属性进行设制。 A、 Enabled B、 Visible C、 BackColor D 、 Caption 实验三 第1题四则运算题 设计如下窗体,为五个命令按钮编写5段代码完成四则运算及退出程序,其中在计算除法时,如果第二个数就是零,在消息框中显示信息“除数为零”。 Public Class Form1 Private Sub Button1_Click(ByVal sender As System、Object, ByVal e As System、EventArgs) Handles Button1、Click Dim a, b As Single a = TextBox1、Text b = TextBox2、Text TextBox3、Text = a + b End Sub Private Sub Button2_Click(ByVal sender As System、Object, ByVal e As System、EventArgs) Handles Button2、Click Dim a, b As Single a = TextBox1、Text b = TextBox2、Text TextBox3、Text = a - b End Sub Private Sub Button3_Click(ByVal sender As System、Object, ByVal e As System、EventArgs) Handles Button3、Click Dim a, b As Single a = TextBox1、Text b = TextBox2、Text TextBox3、Text = a * b End Sub Private Sub Button4_Click(ByVal sender As System、Object, ByVal e As System、EventArgs) Handles Button4、Click Dim a, b As Single a = TextBox1、Text b = TextBox2、Text 大学vb课程题库全集 vb单选、操作部分 一、单项选择题 1、与传统的程序设计语言相比,Visual Basic最突出的特点是（C）。 A、结构化程序设计 B、程序开发环境 C、事件驱动编程机制 D、程序调试技术 2、赋值语句：a=123 & MID(\执行后，a变量中的值是（C）。 A、\ B、123 C、12334 D、157 3、保存一个工程至少应保存两个文件，这两个文件分别是（B）。 A、文本文件和工程文件 B、窗体文件和工程文件 C、窗体文件和标准模块文件 D、类模块文件和工程文件 4、以下能在窗体Form1的标题栏中显示\窗体\的语句是（C）。 A、https://www.wendangku.net/doc/9a12757832.html,=\窗体\B、Form1.Title=\窗体\C、Form1.Caption=\窗体\D、Form1.Text=\窗体\ 5、为了装入一个Visual Basic应用程序，应当（D） A、只装入窗体文件（.frm） B、只装入工程文件（.vbp） C、分别装入工程文件和标准模块文件（.bas） D、分别装入工程文件、窗体文件和标准模块文件 6、赋给一个数组的数据类型一定要（A）。 A、相同 B、不相同 C、两可 D、都不对 7、下面正确的赋值语句是（C）。 A、x+y=30 B、y=π*r*r C、y=x+30 D、3y=x 8、Visual Basic 6.0集成环境的主窗口中不包括（C）。 A、标题栏 B、菜单栏 C、状态栏D、工具栏 9、以下叙述中错误的是(C)。 A、Visual Basic 是事件驱动型可视化编程工具 B、Visual Basic应用程序不具有明显的开始和结束语句 C、Visual Basic工具箱中的所有控件都具有宽度（Width）和高度（Height）属性 D、Visual Basic中控件的某些属性只能在运行时设置 10、要使Print方法在Form_Load事件中起作用，要对窗体的(C)属性进行设置。 A、Backcolor B、ForeColor C、AutoRedraw D、BackStyle 11、若要使命令按钮不可操作，要对(A)属性进行设制。 A、Enabled B、Visible C、BackColor D、Caption 12、以下叙述中错误的是(B)。 A、一个工程中可以包含多个窗体文件 B、在一个窗体文件中用Private定义的通用过程能被其他窗体调用 C、在设计VB程序时，窗体、标准模块、类模块等需要分别保存为不同类型的磁盘文件。 D、一个工程默认的启动对象是Form1 13、Cls方法可以清除窗体或图片框中的(C)内容。 A、在设计阶段使用Picture设置的背景位图 B、在设计阶段放置的控件 VB期末考试试题（A卷） 一、选择题 1.要改变控件的宽度，应修改该控件的（ B ）属性。 A、TOP B、width C、Left D、Height 2.将命令按钮Command1设置为不可见，应修改该命令按钮的（A）属性。 A、Visible B、Value C、Caption D、Enabled 3.单机滚动条两端的任何一个滚动箭头，将触发该滚动条的（ C ）事件。 A、Scroll B 、KeyDown C、change D、Dragver 4.（ D ）对象具有clear方法。 A、图片框 B、窗体 C、复选框 D、列表框 5.中心定义图片框控件的坐标系统，可采用该图片框的（ A ） A、scale B、Scale X C、scale Y D、setFocus 6.将通过对话框CommdDialog1的类型设置成另存为对话框，可调用该控件的（ B）方法。 A、Showopen B、Showsave C、ShowColor D、ShowFont 7.形状控件所显示的图形不可能是（ D ） A、圆 B、椭圆 C、圆角正方形 D、等边三角形 8.由Fro K=10 TO oslept 3：next K循环语句控件的循环次数是（ B ） A、12 B、0 C、-11 D、-10 9.下列数据类型中，占用内存最大值是（ D ） A、Boolwan B、Byte C、Lnteger D、Single 10.如果在图片框上使用绘图方法绘制一个实心圆，则图片框的（ C ）属性决定了该图片的颜色。 A、BackColro B、Forelklor C、Fillcolor D、Dlawstyle 一、选择题 1.要在垂直位置上移动控件，应利用控件的（C） 期期末末考考试试题题 一、单项选择题（共10分） 1．在代码中引用一个控件时，应使用控件的（ ）属性。 A ．Caption B ．Name C ．Text D ．Index 2．设变量x = 4，y = -1，a = 7，b = -8,下面表达式（ ）的值为“假”。 A ．x+a <= b-y B ． x > 0 AND y < 0 C ．a = b OR x>y D ． x+y > a+b AND NOT (y < b) 3．表达式Int(Rnd*71)+10产生的随机整数范围是（ ）。 A ．（10，80） B ．（10，81） C ．[10，80] D ．[10，81] 4．函数Sgn(3.1416)的返回值是（ ）。 A ．-1 B ．0 C ．1 D ．以上都不对 5．67890属于（ ）类型数据。 A ．整型 B ．单精度浮点数 C ．货币型 D ．长整型 6．下列变量名中正确的是（ ）。 A ．3S B ．Print C ．Select My Name D ．Select_1 7．下列赋值语句（ ）是有效的。 A ．sum = sum -sum B ．x+2 = x + 2 C ．x + y = sum D ．last = y / 0 8．以下的控件或方法具有输入和输出双重功能的为（ ）。 A ．Print B ．Textbox C ．Optionbutton D ．Checkbox 9．若要获得列表框中被选中的列表项的内容，可以通过访问（ ）属性来实现。 A ．Name B ．ListIndex C ．ListCount D ．Text 10．下列代码的运行结果为（ ）。 Private Sub command1_click() Dim m(10) For k = 1 To 10 m(k) = 11 – k next k 1、(选择题) 算法的时间复杂度是指（） A.设计该算法所需的工作量 B.执行该算法所需要的时间 C.执行该算法时所需要的基本运算次数 D.算法中指令的条数 A B C D 参考答案：C 【解析】算法的时间复杂度是指执行算法所需要的计算工作量。它与算法程序执行的具体时间并不一致，因为算法执行的具体时间受到所使用的计算机、程序设计语言以及算法实现过程中许多细节的影响。算法的计算工作量是用算法所执行的基本运算次数来度量的。故选C 选项。 2、(选择题) 某棵树的度为4，且度为4、3、2、1的结点数分别为1、2、3、4，则该树中的叶子结点数为（） A.11 B.9 C.10 D.8 A B C D 参考答案：A 【解析】由题目可以知道，若四种度的结点分开成子树，共包含结点(4+1)+2×(3+1)+3×(2+1)+4×(1+1)=30个，当组合成一棵树时，任选一个度不为0的结点作为根结点，则新的树结点个数为30-2-3-4=21个，则该树中叶子结点个数为21-1-2-3-4=11。 故选择A选项。 3、(选择题) 下列叙述中正确的是 A.二分查找法适用于任何存储结构的有序线性表 B.二分查找法只适用于顺序存储的有序线性表 C.二分查找法适用于有序循环链表 D.二分查找法适用于有序双向链表 A B C D 参考答案：B 【解析】二分法查找也称拆半查找，能使用二分法查找的线性表必须满足两个条件：顺序存储结构以及线性表有序。循环链表和双向链表都不是顺序存储结构，故B选项正确。 4、(选择题) 下面属于面向对象方法中对象基本特点的是 A.多态性 B.方法唯一性 C.可修改性 D.灵活性 A B C D 参考答案：A 【解析】对象的基本特点如下：计算机题库VB25
大学VB考试题库
vb期末考试试题
2012年全国计算机等级考试二级VB上机考试试题题库
VB期末考试试题
全国计算机二级VB考试真题和答案
大学-VB期末考试试题
VB期末考试模拟题1讲解
全国计算机VB等级考试历年全真试题(共15套,含答案)
大一VB期末考试试卷及答案
VB考试题及答案
大学VB期末考试试题
VB期末考试复习题目
大学VB考试卷试题库题集.doc
大学计算机VB程序设计考试题目
大学vb课程题库全集
VB期末考试试题(A、B卷)[1]
Vb期末考试题
2020年计算机二级VB题库 计算机二级考试题库