1、VB 笔试模拟试卷 205及答案与解析 1 下面程序运行后输出结果是 ( )。 For I=1 to 2 S=1 For j=0 to I-1 S=S+S*I Next j Print S Next I （ A） 1 1 （ B） 0 2 （ C） 2 9 （ D） 6 9 2 窗体的隐藏和删除，分别用在不同的场合，隐藏 Form1和删除 Form1的命令是( ) （ A） Hide Form1 Unload Form1 （ B） Form1.Hide Form1.Unload （ C） Form1.Hide Unload Form1 （ D） Hide Form1 Form1.Unload
2、3 程序的基本控制结构是 ( )。 （ A） Do-Loop结构、 Do-Loop While结构和 For-Next结构 （ B）子程序结构，自定义函数结构 （ C）顺序结构，选择结构和循环结构 （ D）单行结构，多行结构和多分支结构 4 下列程序段的执行结果为 ( )。 Dim m(10),n(10) I=3 For I=1 to 5 M(t)=t N(I)=2*I+t Next t Print n(I);m(I) （ A） 3 11 （ B） 3 15 （ C） 11 3 （ D） 15 3 5 下列程序段的执行结果为 ( )。 a=6 For k=1 To 0 a=a+k Next k
3、 Print k;a （ A） -1 6 （ B） 1 16 （ C） 1 6 （ D） 11 21 6 下列各种形式的循环中，输出 “*”的个数最少的循环是 ( )。 （ A） a=5:b=8 Do Print“*“ a=a+1 Loop While a b （ B） a=5:b=8 Do Print“*“ a=a+1 Loop Until a b （ C） a=5:b=8 Do Until a-b print“*“ b=b+1 Loop （ D） a=5:b=8 DoUntil a b Print“*“ a=a+1 Loop 7 在窗体上画一个名称为 Command1的命令按钮和两个名称分
4、别为 Text1、 Text2的文本框，然后编写如下事件过程： Private Sub Command1_Click() n=Text1.Text Select Case n Case 1 To 20 x=10 Case2,4,6 x=20 Case Is 10 x=30 Case 10 x=40 End Select Text2.Text=x End Sub 程序运行后，如果在文本框Text1中输入 10，然后单击命令按钮，则在 Text2中显示的内容是 ( )。 （ A） 10 （ B） 20 （ C） 30 （ D） 40 8 在窗体上画一个名称为 Command1的命令按钮，然后编写如
5、下事件过程： Private Sub Command1_Click() Move 500,500 End Sub 程序运行后，单击 命令按钮，执行的操作为 ( ) （ A）命令按钮移动到距窗体左边界、上边界各 500的位置 （ B）窗体移动到距屏幕左边界、上边界各 500的位置 （ C）命令按钮向左、上方向各移动 500 （ D）窗体向左、上方向各移动 500 9 在窗体上画一个命令按钮，其名称为 Command1，然后编写如下事件过程： Private Sub Command1_Click() a=12345 Print Format$(a,“000,00“) End Sub 程序运行后，单
6、击命 令按钮，窗体上显示的是 ( )。 （ A） 123.45 （ B） 12345.00 （ C） 12345 （ D） 00123.45 10 已知数组 a(1 To 10)As Integer,下面调用 GetValue函数正确的是 ( )。 Private Function GetValue(a()As Integer)As Integer For i=1 To 10 Get Value=GetValue+a(i) Next i End Function （ A） S=GetValue(a(1 To 10) （ B） S=GetValue(a) （ C） S=GetValue(a(10
7、) （ D） S=GetValue a 11 计算 z的值，当 x大于等于 y时， z=x；否则 z=y。下列语句错误的是 ( ) （ A） If x =y Then z=x:z=y （ B） If x =y Then z=x Else z=y （ C） z=y:If x =y Then z=x （ D） If x y Then z=y Else z=x 12 在窗体上画一个名称为 Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Static x As Integer Cls For i=1 To 2 y=y+x x=x+2 Nex
8、t Print x,y End Sub 程序运行后，连续三次单击 Command1按钮后，窗体上显示的是 ( )。 （ A） 4 2 （ B） 12 18 （ C） 12 30 （ D） 4 6 13 设有如下程序段： x=2 For i=1 To 10 Step 2 x=x+i Next 运行以下程序后， x的值是 ( )。 （ A） 26 （ B） 27 （ C） 38 （ D） 57 14 在窗体上添加一个文本框，名为 text1，然后编写如下的 load事件过程，则程序的运行结果是 ( )。 Private Sub Form_Load Text1.Text=“ “ Text1.SetF
9、ocus For k=1 to 5 t=t*k Next k Text1.Text=t End Sub （ A）在文本框中显示 120 （ B）文本框中仍为空 （ C）在文本框中显示 1 （ D）出错 15 在窗体上绘制一个命令按钮和一个文本框，名称分别为 Command1和 Text1，然后编写如下程序： Private Sub Command1_Click() a=InputBox(“请输入日期(1 31)“) t=“旅游景点： “_ x Sum= _ End If Next x Print Tab(20);“Sum=“;Sum End Sub 37 图案 表示 _。 38 要选择多个不相
10、邻的控件，按住 _或 SHIFT键不放，再单击要选择的控件。 39 语句 Print5*55/5的输出结果是 _。 40 表达式 Fix(-12.08)+Int(-23.82)的值为 _。 41 数据独立性分为逻辑独立性与物理独立性。当数据的存储结构改变时，其逻辑结构可以不变，因此，基于逻辑结构的应用程序不必修改，称为 _。 42 在程序运行时，如果将框架的 _属性设为 False，则框架的标题呈灰色，同时框架内的所有对象均被屏蔽，不允许用户对其进行操作。 43 VB6.0保存工程文件的快捷键是 _。 44 扩展名为 .bas的文件称为 _。 45 图像框控件使用系统资源比图片框 _。 VB
11、笔试模拟试卷 205答案与解析 1 【正确答案】 C 2 【正确答案】 C 3 【正确答案】 C 4 【正确答案】 C 5 【正确答案】 C 6 【正确答案】 C 7 【正确答案】 A 8 【正确答案】 B 9 【正确答案】 B 10 【正确答案】 B 11 【正确答案】 A 12 【正确答案】 B 13 【正确答案】 B 14 【正确答案】 D 15 【正确答案】 D 16 【正确答案】 D 17 【正确答案】 B 18 【正确答案】 C 19 【正确答案】 B 20 【正确答案】 D 21 【正确答案】 B 22 【正确答案】 D 23 【正确答案】 D 24 【正确答案】 B 25 【正确答案】 B 26 【正确答案】 D 27 【正确答案】 C 28 【正确答案】 D 29 【正确答案】 D 30 【正确答案】 A 31 【正确答案】 A 32 【正确答案】 A 33 【正确答案】 D 34 【正确答案】 A 35 【正确答案】 new1 b 36 【正确答案】 Int(Rnd*99+1) Sum+x 37 【正确答案】 单选按钮 38 【正确答案】 Ctrl 39 【正确答案】 25 40 【正确答案】 -36 41 【正确答案】 物理独立性 42 【正确答案】 Enabled 43 【正确答案】 Ctrl+S 44 【正确答案】 程序模块文件 45 【正确答案】 少
