春季计算机等级考试visual_basic语言笔试试题a卷.doc

二级Visual Basic 语言笔试试题A卷 一、单项选择题 （每题 1 分，共20分） 1．语句 X = Rnd * 1000 执行之后，变量X可能的取值范围是（ ） （A）0≤X＜1 （B）0≤X≤1 （C）0≤X＜1000 （D）0≤X≤1000 2．VB中表示回车换行的符号常量是（ ） （A）VBRed （B）vbCrLf （C）VBrgb （D）VBcolor VB表达式64 \ 4 * 2 Mod 5的值是（ ） （A）（B）（C）（D）函数String(3，)的返回值是（ ） （A） （B）tu （C） （D） 5．（ ） ”” （B）Label1.BorderStyle = 0 (None) （C）Label1.AutoSize = True （D）Label1.Width = Max 6．下列关于数组定义的语句中，概念正确的语句是（ ） （A）（B）（C）（D）b(3,5) As Single定义的数组b拥有24个元素 7． 函数表达式Val(最大值256)的返回值为（ ） （A）（B）（C）（D）类型不匹配是( ) （A）（B）（C）（D）（ ） Me.Picture = d:\background.jpg （B）Me.Picture = LoadPicture(d:\background.jpg) （C）Me.BackColor = d:\background.jpg （D）Me.FillColor = LoadPicture(d:\background.jpg) 10．下列窗体事件过程最先被执行的是（ ） （A）（B）（C） （D）11．下列程序运行后，单击命令按钮Command1，则在窗体上显示的内容是（ ） Option Base 0 Private Sub Command1_Click() Dim city As Variant city = Array(北京, 上海, 天津, 重庆) Print city(1) End Sub （A）空白 （B）错误提示 （C）北京 （D）上海 12．下面程序段的执行结果是（ ） a = 75 （A） （B） （C） （D） 13．运行程序时，要在图片框中显示“Good Morning”字符串，应使用语句（ ） （A）Picture1.Picture=LoadPicture(Good Morning) （B）Picture1.Picture=LoadPicture(Good Morning) （C）Picture1.Print Good Morning （D）Print Good Morning 14. 能产生下面形式消息框的语句是（） （A）MsgBox(输入的数据是否正确, vbOKCancel + vbQuestion, 请确认)（B）MsgBox(输入的数据正确吗, vbYesNoCancel + vbInformation, 请确认) （C）MsgBox(输入的数据是否正确,vbOKCancel + vbInformation, 请确认) （D）MsgBox(输入的数据是否正确, vbYesNoCancel + vbQuestion, 请确认) 15．下程序段执行后为（ ） Private Sub Form_Click() Dim a As Integer, b As Integer, c As Integer a = 5: b = 7: c = a + b End Sub （A） （B） （C） （D）16．已知程序中有如下事件过程，则运行时（ ）Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) If Button = 2 Then CurrentX = X： CurrentY = Y： Print * End If End Sub （A）（B） （C） （D） 17．能产生下图所示对话框的正确语句为（A）InputBox(请输入一个整数, 键盘输入数据, 0)（B）InputBox(计算, 键盘输入整数, 10) （C）n=InputBox(请输入一个整数, 键盘输入数据,0) （D）n=InputBox(计算, 输入整数, 10) 1启动VBasic应用程序时自动触发的事件是（ ） （A）Form_Click （B）Form_DblClick （C）Form_Load