VB综合测试试题.pptx

《VB综合测试试题.pptx》由会员分享，可在线阅读，更多相关《VB综合测试试题.pptx（51页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、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、在框架控件内的几个单选按钮中，可有一个或多个单选按钮的Value属性为Tr

2、ue。1、2、3、4、5、6、7、8、9、10、第1页/共51页11Print Format（123，”#”）执行之后的结果为A）123 B）123 C）123 D）【答案】B第2页/共51页12下面可以表示注释语句开头的为A）Re B）R C）Rem D）dim【答案】C第3页/共51页13下列选项中窗体载入事件为A）Load事件 B）Click事件 C）DblClick事件 D）Unload事件【答案】A第4页/共51页14Timer控件可以使用下列哪种事件A）Click事件 B）Timer事件 C）Dblclick事件 D）Change事件【答案】B第5页/共51页15在InputBox

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

4、ElseIf-Then语句(C)如果没有Else语句，运行时将出现错误(D)给定的条件只能是关系表达式或逻辑表达式【答案】B第9页/共51页19以下Case语句中错误的是(A)Case 10 To 1 (B)Case Is10 (C)Case Is10,Is10【答案】A第10页/共51页20对Do UntilLoop循环，正确的是()。A如果循环条件为常数0，则一次循环也不执行B如果循环条件为常数0，则至少执行一次循环C如果循环条件是不为0的常数，则至少执行一次循环D无论循环条件是否为True，则至少执行一次循环【答案】B第11页/共51页21以下语句的输出结果是（注：表示一个空格）a=12

5、3b=456Print a;bA）123456 B）123456C）123456 D）123456【答案】D第12页/共51页22下列程序执行的结果为 x=-6 2Print Sgn(x)+Abs(x)+Int(x)A）36 B）1C）1D）72【答案】C第13页/共51页23在窗体上画一个名称为Command1的命令按钮，一个名称为Label1的标签，然后编写如下的事件过程：Private Sub Command1_Click()s=0 For i=0 To 15 X=2*i-1 If X Mod 3=0 Then s=s+1 Next i Label1.Caption=sEnd Sub程序

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

7、后，则三个标签中显示的内容分别是A）10 10 10 B）30 30 30 C）30 30 10 D）10 30【答案】C第15页/共51页25在窗体上画一个名称为Command1的命令按钮，一个名称为Label1、Label2的标签，然后编写如下的事件过程：Private x As IntegerPrivate Sub Command1_Click()x=5:y=3 Call Proc(x,y)Label1.Caption=x Label2.Caption=yEnd SubPrivate Sub Proc(ByVal a As Integer,ByVal b As Integer)x=a*a

8、 y=b+bEnd Sub运行程序后，则两个标签中显示的内容分别是A）5和3 B）25和3 C）25和6 D）5和6【答案】B第16页/共51页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第17页/共51页27如果x的值大于或等于y的立方，则打印“OK”，表示这个条件的单行格式的If语句是A）If x=y3 Print“OK”B）If x=y*y*y Then “OK”C）If x=y

9、3 Then Print “OK”D）If x=y*y*y Then Print “OK”End If【答案】C第18页/共51页28下列程序段执行结果为 x=5y=-6If Not x 0 Then x=y-3 Else y=x+3Print y-x;x-y A)3 3 B)9 5 C)3 3 D)5 6 【答案】A第19页/共51页29已知x的值，计算分段函数f(x)，下面选项不正确的是当 x=1，f(x)=；当x1，f(x)=x2+3 (A)Select Case x Case Is=1 f=sqr(x+1)Case x=1 f=sqr(x+1)Case Is=1 then f=sqr(

10、x+1)else f=x2+3【答案】B第20页/共51页30执行完下面的程序段后，循环执行了()次。a=a+1 Print aNext IA3 B4 C5 D6【答案】C第21页/共51页31、VB不要求程序员在使用变量前特别声明。如果没有声明变量，VB使用称为_的缺省数据类型。32、VB变量有六种数据类型，分别为_、_、布尔型、日期型、_和_。33、在VB中，数组分为动态数组和静态数组。程序未运行时，_不占用内存空间，编译系统为_预留空间。31、变体类型 32、数值型 字符型 对象型 通用（变体）型 33、在声明时 动态数组 第22页/共51页34、调用Sub 过程的两种方法是_调用和_调

11、用。35、图片框（PictureBox）控件和图像（Image）控件均可以用来显示图像。其中_可以作为其他控件的容器。_可以自动调整控件大小以显示完整图形，_可以延伸图片大小以适应控件大小。36、计算机的数据文件按数据存储方式分为 _文件、_文件和_文件。34、过程名 实参 Call 过程名(实参)35、图片框（PictureBox）控件 图像（Image）控件 图像（Image）控件 36、顺序 随机 二进制第23页/共51页37、框架（Frame控件）可以用来_进行分组，以便于用户识别，主要用于为单选按钮分组。38、计时器控件通过定期激活Timer事件，使得Timer控件_就执行一次Tim

12、er事件中的代码。39、工程文件是与_和对象以及所设置的环境信息的一个简单列表。40、在程序中调用子过程需要指明_，然后列出该子过程所要求的参数。37、对其它控件38、可以每隔一个时间段39、工程相关联的所有文件40、该过程的名称第24页/共51页注意求100以内的素数，素数是指一个数x除了1和它本身，不能被其他任何整数整除。要求每行输出10个素数。在单击窗体的事件过程中添加代码，程序代码如下 Private Sub Form_click()Const N=100 Dim i,j,Line,a(N)As Integer For i=0 To N-l 置初值 a(i)=i Next i For

13、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 Line Mod 10=0 Then Print 每行显示10个数 Next i End Sub 第25页/共51页VB综合复习题综合复习题第二套第26页/共51页1、Visual B

14、asic程序开发的特点是面向对象的事件驱动。（）2、Print_Text是一个不合法的变量名。（）3、VB支持弹出菜单，所谓“弹出菜单”是指单击鼠标后打开的菜单。（）4、设置字体大小应使用Font属性。（）5、Sub过程可以实现嵌套调用。（）6、可以用&，+合并字符串，但是用在数值变量时，+可能会将两个数值加起来。（）7、块结构条件语句以End If结束，而单行结构条件语句没有End IF。（）8、当终值小于初值时，步长为负数。（）9、执行While-Wend循环时，如果一开始条件就不成立，则语句块一次也不会执行。（）10、关于数组的引用,在程序中,凡是简单变量可以出现的地方都可以出现数组元素

15、的引用。()1、2、3、4、5、6、7、8、9、10、第27页/共51页11语句Dim arr(-3 To 5,2 To 6)As Integer定义的数组元素有_个。A)45 B)40 C)11 D)54【答案】A第28页/共51页12下列关于Option Base语句说法错误的是_A)Option Base语句只能出现在窗体层或模块层B)Option Base语句不能出现在过程中C)Option Base语句必须位于数组的定义之前D)Option Base语句只对一维数组有效【答案】D第29页/共51页13、Visual Basic的特点不包括下面的（）A 不需编程 B 面向对象的程序设计

16、C 可视化程序设计 D 时间驱动的程序设计【答案】A第30页/共51页14、从键盘上能够输入两个字符串，分别保存在变量str1、str2中。确定第二个字符串在第一个字符串中起始位置的函数是（）A Left B MidC String D Instr【答案】D第31页/共51页15、如果将布尔常量值True赋值给一个整型变量，则整型变量的值为（B）A 0 B -1C True D false【答案】B第32页/共51页16、下列符号常量的声明中，（）是不合法的。A Const a As Single=1.1 B Const a As Integer=“12”C Const a As Double

17、=Sin(1)D Const a=”OK”C第33页/共51页17、四个字符“E”,“y”,“B”,“8”的ASCII码值最大的是（B）A “E”B “y”C “B”D “8”B第34页/共51页18、将变量k四舍五入保留2位小数的表达式是（C）A Int(k+0.5)*100)/100 B Int(kC Int(k*100+0.5)/100 D Int(k*(100+0.5)/100”第35页/共51页19、30将数学表达式Cos2(a+b)+5e2写成Visual Basic的表达式，其正确的形式是（A）A)Cos(a+b)2+5*exp(2)B)Cos2(a+b)+5*exp(2)C)C

18、os(a+b)2+5*ln(2)D)Cos2(a+b)+5*ln(2)第36页/共51页20、在顺序文件中，当使用Write#语句时，文件打开的方式必须是（）A Output和Input B Output和AppendC Output D AppendB第37页/共51页21下列程序段的执行结果为()。n=0j=1Do Until n 2 n=n+1 j=j+n*(n+1)LoopPrint n;jA0 1 B3 7 C3 21 D3 13【答案】C第38页/共51页以下正确的ForNext结构是（A）For x=1 To 10 for y=1 to 10Next（B）For x=1 To 1

19、0 for y=1 to 10 Next y,x（C）For x=1 To 10 for y=1 to 10Next x Next y（D）For x=1 To 10 for y=1 to 10 Next x,y【答案】B第39页/共51页23下列程序中，第一个Do语句共执行了()次循环。Dim i As Integer,j As Integeri=1Do j=1 Do Sum=Sum+j j=j+2 Print j;Loop Until j 3 i=i+2Loop Until i 10Print SumA10 B20 C5 D7【答案】A第40页/共51页24下列语句中，a是一个数组，则使用

20、正确的是_A)Option Base 2B)Redim aC)Erase aD)a=Array()【答案】C第41页/共51页25.在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：Private 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程序

21、运行后，单击命令按钮，在文本框中显示的值是_A)12 B)13 C)14 D)15【答案】A第42页/共51页26.在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Dim a(10,10)As IntegerDim i As Integer,j As IntegerFor 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程序运行后，单击命令按钮，窗体上显示的是_A)1 2 32 4 63 6 9B)2 3 4

22、3 4 54 5 6C)1 4 72 5 83 6 9D)1 2 34 5 67 8 9【答案】D第43页/共51页27.设有如下程序：Option Base 0Private Sub Form_Click()Dim a Dim i As Integer a=Array(1,2,3,4,5,6,7,8,9)For i=0 To 3 Print a(5 i);NextEnd Sub程序运行后，单击窗体，则在窗体上显示的是_A)4 3 2 1 B)5 4 3 2 C)6 5 4 3 D)7 6 5 4【答案】C第44页/共51页28执行以下Command1的Click事件过程在窗体上显示_。Pri

23、vate Sub Command1_Click()Dim a a=Array(“a”,”b”,”c”,”d”,”e”,”f,”,”g”)Print a(1);a(3);a(5)End Subla b c B)b d f A)C)a c e D)出错【答案】B第45页/共51页29、设有语句Openc:Test.DatFor Output As#1则以下错误的叙述是（）A）该语句打开C盘根目录下一个已存在的文件B）该语句在C盘根目录下建立一个名为的文件C）该语句建立的文件的文件号为1D）执行该语句后，就可以通过Print#语句向文件中写入信息B第46页/共51页30、以下代码完成对顺序文件追加打

24、开的是（）A）Open test1.txt For Input As#1B）Open test1.txt For Output As#1C）Open test1.txt For Append As#1D）Open test1.txt For Redom As#1C第47页/共51页31变量名最长可达 个字符。32常量是指在程序运行过程中，的量。33整数类型数据分别包括整型和 数据。34静态数组是指 是固定不变的数组。35循环是一组重复执行的指令，重复次数由 决定。31、22532、其值不能改变33、长整型34、数组元素的个数35、条件第48页/共51页36列表框（ListBox控件）显示 ，用

25、户可从中选择一个或多个项目。37框架（Frame控件）可以用来 进行分组，以便于用户识别，主要用于为单选按钮分组。38计时器控件通过定期激活Timer事件，使得Timer控件 就执行一次Timer事件中的代码。39工程文件是与 和对象以及所设置的环境信息的一个简单列表。40在程序中调用子过程需要指明 ，然后列出该子过程所要求的参数。36、项目列表37、对其它控件38、可以每隔一个时间段39、工程相关联的所有文件40、该过程的名称第49页/共51页程序设计 用100元买100只鸡,母鸡3元一只,小鸡1元3只,问各应买多少只?Private Sub Form_Click()Dim i AS Integer For i=1 To 40 If i*3+(100-i)/3=100 Then Print 母鸡数量：&i Print 小鸡数量：&(100-i)End If Next i第50页/共51页感谢您的观看！第51页/共51页