VB综合测试试题ppt课件

1、.,VB综合复习题,第一套,.,1、VB是一种面向对象的程序设计语言。 2、Visual Basic程序的运行，仅能从某一窗体启动，如Form1窗体。 3、单击并拖拽工具箱中所需的控件到窗体上即可完成添加控件任务. 4、Visual_basic是合法的变量名。 5、设A=3,B=4,C=5,D=6，则表达式AB And CC 的值是False。 6、VB规定窗体文件的扩展名是 .vbp。 7、VB若同一个工程有许多窗体，可以指定任一窗体为启动窗体。 8、VB允许设计和使用用户自己设计的控件。 9、VB允许用户使用Type语句在窗体模块的通用声明中自己定义数据类型。 10、在框架控件内的几个单选

2、按钮中，可有一个或多个单选按钮的Value属性为True。,1、 2、 3、 4、 5、 6、 7、 8、 9、 10、,.,11Print Format（123，”#”）执行之后的结果为 A）123 B）123 C）123 D）,【答案】B,.,12下面可以表示注释语句开头的为 A）Re B）R C）Rem D）dim,【答案】C,.,13下列选项中窗体载入事件为 A）Load事件 B）Click事件 C）DblClick事件 D）Unload事件,【答案】A,.,14Timer控件可以使用下列哪种事件 A）Click事件 B）Timer事件 C）Dblclick事件 D）Change事件,

3、【答案】B,.,15在InputBox函数中哪一个参数是必须的 A）Prompt B）Buttons C）Title D）Context,【答案】A,.,16以下叙述中错误的是： A）如果过程被定义为Static类型，则该过程中的局部变量都是Static类型 B）Sub过程中不能嵌套定义Sub过程 C）Sub过程可以嵌套调用Sub过程 D）事件过程可以像通用过程一样由用户定义过程名,【答案】C,.,17要填加一个标准模块，可使用“_”菜单中的“添加模块”命令。 A）文件 B）视图 C）工程 D）工具,【答案】 C,.,18在块结构条件语句If-Then / Endif中 (A) 必须至少有一个

4、Elseif语句 (B ) 可以有任意多个ElseIf-Then语句 (C) 如果没有Else语句，运行时将出现错误 (D ) 给定的条件只能是关系表达式或逻辑表达式,【答案】B,.,19以下Case语句中错误的是 (A) Case 10 To 1 (B) Case Is10 (C)Case Is10 , Is10,【答案】A,.,20对Do UntilLoop循环，正确的是( )。 A如果循环条件为常数0，则一次循环也不执行 B如果循环条件为常数0，则至少执行一次循环 C如果循环条件是不为0的常数，则至少执行一次循环 D无论循环条件是否为True，则至少执行一次循环,【答案】B,.,21以下

5、语句的输出结果是（注：表示一个空格） a = 123 b = 456 Print a; b A）123456 B）123456 C）123456 D）123456,【答案】D,.,22下列程序执行的结果为 x = -6 2 Print Sgn(x) + Abs(x) + Int(x) A）36 B）1 C）1 D）72,【答案】C,.,23在窗体上画一个名称为Command1的命令按钮，一个名称为Label1的标签，然后编写如下的事件过程： Private Sub Command1_Click() s = 0 For i = 0 To 15 X = 2 * i - 1 If X Mod 3 =

6、 0 Then s = s + 1 Next i Label1.Caption = s End Sub 程序运行后，单击命令按钮，则标签中显示的内容为 A）1 B）5 C）27 D）45,【答案】B,.,24在窗体上画一个名称为Command1的命令按钮，一个名称为Label1、Label2、Label3的标签，然后编写如下的事件过程： Private x As Integer Private Sub Command1_Click() Static y As Integer Dim z As Integer n = 10 z = n + z y = y + z x = x + z Label1

7、.Caption = x Label2.Caption = y Label3.Caption = z End Sub 运行程序后，连续三次单击命令按钮后，则三个标签中显示的内容分别是 A）10 10 10 B）30 30 30 C）30 30 10 D）10 30,【答案】C,.,25在窗体上画一个名称为Command1的命令按钮，一个名称为Label1、Label2的标签，然后编写如下的事件过程： Private x As Integer Private Sub Command1_Click() x = 5: y = 3 Call Proc(x, y) Label1.Caption = x

8、Label2.Caption = y End Sub Private Sub Proc(ByVal a As Integer, ByVal b As Integer) x = a * a y = b + b End Sub 运行程序后，则两个标签中显示的内容分别是 A）5和3 B）25和3 C）25和6 D）5和6,【答案】B,.,26.下面程序段求两个数中的大数，不正确的是 （A）If xy Then Max=x Else Max=y （B） Max=IIf(xy,x,y) （C）If y=x Then Max=y Max=x (D)If yx Then Max=y Max=x,【答案】D,

9、.,27如果x的值大于或等于y的立方，则打印“OK”，表示这个条件的单行格式的If语句是 A）If x=y3 Print “OK” B）If x=y*y*y Then “OK” C）If x=y3 Then Print “OK” D）If x=y*y*y Then Print “OK” End If,【答案】C,.,28下列程序段执行结果为 x = 5 y = -6 If Not x 0 Then x = y - 3 Else y = x + 3 Print y - x; x - y A) 3 3 B) 9 5 C) 3 3 D) 5 6,【答案】A,.,29已知x的值，计算分段函数f(x)，

10、下面选项不正确的是 当 x=1， f(x)= ； 当x1 ，f(x)= x2+3,【答案】B,.,30执行完下面的程序段后，循环执行了( )次。 For i = 1.7 To 5.9 Step 0.9 a = a + 1 Print a Next I A3 B4 C5 D6,【答案】C,.,31、 VB不要求程序员在使用变量前特别声明。如果没有声明变量，VB使用称为_的缺省数据类型。 32、 VB变量有六种数据类型，分别为_、_、布尔型、日期型、_和_。 33、 在VB中，数组分为动态数组和静态数组。程序未运行时，_不占用内存空间，编译系统为_预留空间。,31、变体类型 32、数值型 字符型

11、对象型 通用（变体）型 33、在声明时 动态数组,.,34、 调用Sub 过程的两种方法是_调用和_调用。 35、 图片框（PictureBox）控件和图像（Image）控件均可以用来显示图像。其中_可以作为其他控件的容器。_可以自动调整控件大小以显示完整图形，_可以延伸图片大小以适应控件大小。 36、 计算机的数据文件按数据存储方式分为 _文件、_文件和_文件。,34、过程名 实参 Call 过程名 (实参) 35、图片框（PictureBox）控件 图像（Image）控件 图像（Image）控件 36、顺序 随机 二进制,.,37、框架（Frame控件）可以用来_进行分组，以便于用户识别，

12、主要用于为单选按钮分组。 38、计时器控件通过定期激活Timer事件，使得Timer控件_就执行一次Timer事件中的代码。 39、工程文件是与_和对象以及所设置的环境信息的一个简单列表。 40、在程序中调用子过程需要指明_ ，然后列出该子过程所要求的参数。,37、对其它控件 38、可以每隔一个时间段 39、工程相关联的所有文件 40、该过程的名称,.,注意,求100以内的素数，素数是指一个数x除了1和它本身，不能被其他任何整数整除。要求每行输出10个素数。在单击窗体的事件过程中添加代码，程序代码如下 Private Sub Form_click() Const N = 100 Dim i,

13、j, Line, a(N) As Integer For i = 0 To N - l 置初值 a(i) = i Next i For i = 2 To Sqr(N) For j = i + 1 To N If a(i) 0 And a(j) 0 Then If a(j) Mod a(i) = 0 Then a(j) = 0 能整除就赋0 End If Next j Next i Print 显示出100以内的素数 For i = 2 To N - 1 If a(i) 0 Then Print a(i); Spc(1); Line = Line + 1 End If If Line 0 And

14、 Line Mod 10 = 0 Then Print 每行显示10个数 Next i End Sub,.,VB综合复习题,第二套,.,1、Visual Basic程序开发的特点是面向对象的事件驱动。（ ） 2、Print_Text是一个不合法的变量名。（ ） 3、VB支持弹出菜单，所谓“弹出菜单”是指单击鼠标后打开的菜单。（ ） 4、设置字体大小应使用Font属性。（ ） 5、Sub过程可以实现嵌套调用。（ ） 6、可以用 j A0 1 B3 7 C3 21 D3 13,【答案】C,.,以下正确的ForNext结构是,【答案】B,.,23下列程序中，第一个Do语句共执行了( )次循环。 Di

15、m i As Integer, j As Integer i = 1 Do j = 1 Do Sum = Sum + j j = j + 2 Print j; Loop Until j 3 i = i + 2 Loop Until i 10 Print Sum A10 B20 C5 D7,【答案】A,.,24下列语句中，a是一个数组，则使用正确的是_ A) Option Base 2 B) Redim a C) Erase a D) a = Array(),【答案】C,.,25.在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程： Private

16、 Sub Command1_Click() Dim array1(10, 10) As Integer Dim i As Integer, j As Integer For i = 1 To 3 for j = 2 To 4 array1(i, j) = i + j next j next i Text1.Text = arrry1(2, 3) + array(3, 4) End Sub 程序运行后，单击命令按钮，在文本框中显示的值是_ A) 12 B) 13 C) 14 D) 15,【答案】A,.,26.在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private

17、Sub Command1_Click() Dim a (10,10) As Integer Dim i As Integer, j As Integer For i = 1 To 3 for j = 1 To 3 a (i, j) = (i 1) * 3 + j Print a(i, j ); next j Print next i End Sub 程序运行后，单击命令按钮，窗体上显示的是_,【答案】D,.,27.设有如下程序： Option Base 0 Private Sub Form_Click() Dim a Dim i As Integer a = Array(1,2,3,4,5,6

18、,7,8,9) For i = 0 To 3 Print a(5 i); Next End Sub 程序运行后，单击窗体，则在窗体上显示的是_ A) 4 3 2 1 B) 5 4 3 2 C) 6 5 4 3 D) 7 6 5 4,【答案】C,.,28执行以下Command1的Click事件过程在窗体上显示_。 Private Sub Command1_Click() Dim a a = Array(“a”,”b”,”c”,”d”,”e”,”f,”,”g”) Print a(1); a(3); a(5) End Sub a b c B) b d f C) a c e D) 出错,【答案】B,.,29、设有语句 Openc:Test.DatFor Output As #1 则以下错误的叙述是（） A）该语句打开C盘根目录下一个已存在的文件Test.Dat B）该语句在C盘根目录下建立一个名为Test.Dat的文件 C）该语句建立的文件的文件号为1 D）执行该语句后，就可以通过Print#语句向文件Test.Dat中写入信息,B,.,30、 以下代码完成对顺序文件test1.txt追加打开的是（ ） A）Open test1.txt For Input As #1 B）Open test1.txt For Output As #1 C）Open test1.txt F