(暑期强化001.docVIP

对口高二暑期强化VB试卷 年级：高二高考 科目：VB 命题：仲正华 审核： 适用班级：机150-155 注意事项： 1、本试卷考试时间XX分钟，满分100分。 2、请在密封线内填写清楚 考号、姓名、班级。 3、本试卷分为Ⅰ、Ⅱ两卷，第Ⅰ卷为试题，第Ⅱ卷为答题卡。 第Ⅰ卷 一、单选题（本大题共25小题，每题2分，50共分）。 1、下列说法中正确的是 为了装入一个Visual Basic应用程序应当 A、只装入窗体文件（.frm） B、只装入工程文件（.vbp） C、分别装入工程文件和标准模块文件（.bas） D、分别装入工程文件、窗体文件和标准模块文件（.bas） 2、以下语句的输出结果是 Print Format$(32548.5,000,000.00) A、32548.5 B、32,548.5 C、032,548.50 D、32,548.50 3、下列可以把当前目录下的图形文件pic1.jpg装入图片框Picture1中的语句是 A、Picture=pic.jpg B、Picture.Handle=pic1.jpg C、Picture1.Picture=LoadPicture(pic1.jpg) D、Picture=LoadPicture(pic1.jpg) 4、假定在图片框Picture1中装入了一个图形，为了清除该图形（注意：清除图形，而不是删除图片框），应采用的正确方法是 A、选择图片框，然后按Del剑 B、执行语句Picture1.Picture=LoadPicture() C、执行语句Picture1.Picture= D、选择图片框，在属性窗口中选择Picture属性条，然后按回车键 5、当拖动滚动条中的滚动块时，将触发滚动条的事件是 A、Move B、Change C、Scroll D、SetFocus 6、假定有以下循环结构 Do Until 条件 循环体 Loop 则正确的描述是 A、如果“条件”是一个为0的常数，则一次循环体也不执行。 B、如果“条件”是一个为0的常数，则至少执行一次循环体。 C、如果“条件”是一个不为0的常数，则至少执行一次循环体。 D、不论“条件”是否为“真”，至少要执行一次循环体。 7、在窗体中添加一个命令按钮，名称为Command1，然后编写如下程序 Private Sub Command1_Click() a = 1234 B$ = Str$(a) C = Len(B$) Print C End Sub 程序运行后，单击命令按钮，则在窗体上显示的内容是 A、0 B、5 C、6 D、7 8、下面哪个不是VB的文件类控件 A、DriveListBox控件 B、DirListBox控件 C、FileListBox控件 D、MsgBox 9、在窗体中添加一个命令按钮，然后编写如下代码： Function func(a As Integer, b As Integer) As Integer Static m As Integer, i As Integer m = 0 i = 2 i = i + m + 1 m = i + a + b func = m End Function Private Sub Command1_Click() Dim k As Integer, m As Integer Dim p As Integer k = 4 m = 1 p = func(k, m) Print p; p = func(k, m) Print p End Sub 程序运行后，单击命令按钮，输出结果为 A、8 17 B、8 16 C、8 20 D、8 8 10、在过程定义中，Private表示 A、此过程可以被其他过程调用 B、此过程不可以被任何其他过程调用 C、此过程只可以被本工程中的其他过程调用 D、此过程只可以被本窗体模块中的其他过程调用 11、设有如下程序: Private Sub Form_Click() score = Int(Rnd * 10) + 30 Select Case score Case Is 10 a$ = F Case 10 To 19 a$ = D Case 20 To 29 a$ = C Case 30 To 39 a$ = B Case Else