国家二级（VB）机试模拟试卷292
选择题
1.对建立良好的程序设计风格，下面描述正确的是()。(A)
A. 程序应简单、清晰、可读性好
B. 符号名的命名只要符合语法
C. 充分考虑程序的执行效率
D. 程序的注释可有可无
解析：程序设计应该简单易懂，语句结构应该简单直接，不应该为提高效率而把语句复杂化。
2.表达式Int(-15．8)+Fix(-15．8)+Int(15．8)+Fix(15．8)的运算结果是( )。(A)
A. -1
B. -2
C. 0
D. 1
解析：本题考查函数Int的功能，Int(x)的作用是取不大于x的最小的整数，Fix(x)则是简单的取整数部分。
3.工程文件中包含一个模块文件和一个窗体文件。模块文件的程序代码是：
Public x As Integer
Private y As Integer
窗体文件的程序代码是：
Dim a As Integer
Private Sub Form_Load()
Dim b As Integer
a＝2：b＝3：x＝10：y＝20
End Sub
Private Sub Command1_Click()
a＝a＋5：b＝b＋5：x＝x＋5：y＝y＋5
Print a； b； x； y
End Sub
运行程序，单击窗体上的命令按钮，则在窗体上显示的是( )。(D)
A. 5 5 15 5
B. 7 5 15 25
C. 7 8 15 5
D. 7 5 15 5
解析：程序在模块文件中定义x为整型全局变量，在整个工程中都起作用，而y定义为整型私有变量，只能在本模块文件中起作用。在窗体文件中变量a在本窗体文本中起作用，窗体加载事件中定义的变量b和没有声明的变量y，只在本事件过程起作用。程序窗体加载时，对后边有影响的变量值为a为2，x为10，没有指定初值的变量值默认为0，因此单击命令按钮后，a＝a＋5＝7，b＝b＋5＝5，x＝x＋5＝15，y＝y＋5＝5，结果输出7 5 15 5。
4.下面不能在信息框中输出“Visual Basic”的是( )。(C)
A. x=MsgBox(\\
B. MsgBox(\\
C. MsgBox\\
D. Call MsgBOX \\
解析：MsgBox()函数用于显示提示信息，并可返回一个代表用户单击了哪个按钮的Integer类型值，当其作为函数使用时必须将参数放在括号内部，而返回值可以赋值给一个变量，也可以单独使用此函数而不将其返回值赋值给变量；MsgBox过程也用于显示提示信息，作为过程必须使用Call关键字来进行调用，其参数不能加括号。
5.在窗体上有一个文本框Text1和一个标签Label1，要求运行程序时，在文本框中输入的内容立即显示在标签中(如图1所示)，则空白处应填入的内容是( )。
(C)
A. GetFocus
B. Click
C. Change
D. LostFOCBS
解析：本题考查文本框的事件。文本框的GetFocus事件为文本框获得焦点时触发一次，而单击文本框时触发一次Click事件，Change事件是每次文本框中的文本发生改变时触发的事件，而LostFocus事件是文本框失去焦点时触发的事件。
6.窗体上有一个名称为Timerl的计时器控件，一个名称为Shape1的形状控件，其Shape属性值为3(Circle)。编写程序如下：
Private Sub Form_Load()
Shape1．Top=0
Timer1．Interval=100
End Sub
Private Sub Timerl_Timer()
Static x As Integer
Shape1．Top=Shape1．Top+100
X=x+1
If x Mod 10=0 Then
Shape1．Top=0
End If
End Sub
以下关于上述程序的叙述中，错误的是( )。(C)
A. 每执行一次Timerl_Tilller事件过程，x的值都在原有基础上增加1
B. Shape1每移动10次回到起点，重新开始
C. 窗体上的Shape1由下而上移动
D. Shape1每次移动100
解析：题目中变量x定义为Static，即每次进入Timer事件过程时，x都会保留上次的值，从而实现每执行一次Timer1_Timer事件过程x的值都在原有基础上增加1。程序中判断调用Timer事件过程10次后，重置Shape1的top值为0，即回到起点。控件Shape1的Top属性是距离窗体顶的位置，数值越大距离越远，因此Shape1会由上向下移动。
7.有下列程序代码：
Private Sub Command1-Click()
Randomize
Dim x(30)As Integer，s As Integer
For k％=1 To 30
x(k)=Int(Rnd*100)
Next k
For k=1 To 30
If x(k)Mod 2=1 Then
s=s+x(k)
End If
Next k
Print s
End Sub
程序运行后的输出是( )。(D)
A. 30个随机整数中所有个位数为1的数之和
B. 30个随机整数中所有偶数的和
C. 30个随机整数的和
D. 30个随机整数中所有奇数的和
解析：第一个For循环利用表达式Int(Rnd*100)随机产生一个[0，99]之间的整数，并依次赋值给数组中每个元素。第二个For循环语句的功能是：循环遍历数组中的所有元素，使用If语句判断每个元素是否为奇数，若是奇数则将该元素累加到变量s中。综上所述，本程序的功能是随机产生30个整数，并将所有奇数进行累加输出。故D选项正确。
8.窗体上有名称为Command1的命令按钮和名称为Text1的文本框
Private Sub Command1_Click()
Text1．Text=\\(B)
A. 文本框中显示的是“程序设计”，且焦点在文本框中
B. 文本框中显示的是“等级考试”，且焦点在文本框中
C. 文本框中显示的是“程序设计”，且焦点在命令按钮上
D. 文本框中显示的是“等级考试”，且焦点在命令按钮上
解析：运行程序，单击命令按钮后，执行Command1_Click事件过程代码，文本框Text1中显示“程序设计”，并且文本框Text1获得焦点，此时焦点在Text1中；当Text1获得焦点就会触发它的Got_Focus事件，执行Got_Focus事件过程，结果文本框Text1中显示“等级考试”。故B选项正确。
9.在窗体上
本文档预览：3600字符，共19053字符，源文件无水印，下载后包含无答案版和有答案版，查看完整word版点下载
