VB模拟试题7.docVIP

一、单选题（30分，每小题1分） 1．下列软件中______是常用的浏览器软件。 (A) Windows (B) Internet Explorer (C) WPS (D) Visual Basic 2．音箱属于计算机中的______。 (A) 中央处理器 (B) 存储器 (C) 输入设备 (D) 输出设备 3．下列名称中只有________可以在Windows中作为文件名使用。 (A) VB?.EXE (B) Windows/Program.Files.TXT (C) 12:34.COM (D) Word.DOC 4．二进制换为十进制是______。 (A) 171 (B) 213 (C) 426 (D) 427 5．文件名通配符 *·* 表示________。 （A）硬盘上的全部文件 （B）当前盘当前目录中的全部文件 （C）当前盘的全部文件 （D）根目录的全部文件 6．下列文件中______类型不能在VB的工程资源管理器中显示。 (A) VBP (B) BAS (C) FRM (D) OCX 7．下列语句中______没有语法错误。 (A) Dim 3A as String (B) Dim A#B as Integer (C) Dim print_2 As Boolean (D) Dim a(9 To 3) As Double 8．下列对象中_______ 不能作为放置其他控件的容器。 (A) Form (B) Image (C) PictureBox (D) Frame 9．设窗体中有一个文本框Text1，要求该文本框只能显示信息而不能接收输入的信息，以下______语句能实现该功能。 (A) Text1.MultiLine = False (B) Text1.Visible = False (C) Text1.Width = 0 (D) Text1.Enabled = False 10．设窗体中有一个文本框Text1和一个滚动条HScroll1，当拖动滚动条的滑块时，需要文本框中显示滚动条的当前值。以下______事件过程能实现该功能。 (A) Private Sub HScroll1_Scroll() Text1.Text = HScroll1.Value End Sub (B) Private Sub HScroll1_Click() Text1.Text = HScroll1.Value End Sub (C) Private Sub HScroll1_ Scroll() Text1.Text = HScroll1.Caption End Sub (D) Private Sub HScroll1_Click() Text1.Text = HScroll1.Caption End Sub 11．窗体中有一个命令按钮Command1。运行下列程序时单击命令按钮，则窗体中显示______。 Option Base 1 Private Sub Command1_Click() Dim city city = Array(北京, 上海, 南京, 广州) Print city(1) End Sub (A) 空白 (B) 北京 (C) 上海 (D) 出现错误提示 12．窗体中有一个命令按钮Command1。运行下列程序，单击命令按钮，窗体中显示______。 Dim X As Integer (通用)(声明) Private Sub Proc(ByVal a As Integer, ByVal b As Integer) X = a * a Y = b + b End Sub Private Sub Command1_Click() X = 5: Y = 3 Call Proc(X, Y) Print X, Y End Sub (A) 5 3 (B) 25 3 (C) 25 6 (D) 5 6 13．在以下事件过程中，Private表示__________。 Private Sub Text1_Change() …… End Sub (A