vb模拟题库中的选择题3
vb试题及答案

VB试卷一、单项选择题(每题2分,共40分)1. 窗体的标题栏显示内容由窗体对象的属性决定。
A) BackColor B)BackStyle C)Text D)Caption2. 窗体的示意图标可用属性来设置。
A) Picture B) Image C) Icon D) MouseIcon3. 窗体的控制菜单的有无由窗体对象的属性决定。
A) ControlBox B) MinButton C) MaxButton D) BorderStyle4. 若要取消窗体的最大化功能,则可设置属性为False来实现。
A) ControlBox B) MinButton C) MaxButton D) Enabled5. 以下4个选项,不属于VB的工作模式。
A) 编译 B) 设计 C) 运行 D) 中断6. 窗体的边框样式由窗体对象的属性来设置。
A) BackStyle B) BorderStyle C) WindowState D) FillStyle7. 若要以程序代码方式设置在窗体中显示文本的字体大小,则可用窗体对象的属性来实现。
A) FontName B) Font C) FontSize D) FontBold8. 命令按钮的标题文字由属性来设置。
A) Text B) Caption C) Name D) (名称)9. VB是面向对象的程序设计,以下4个选项,不属于面向对象的三要素。
A) 变量 B) 属性 C) 事件 D) 方法10. 若要将某命令按钮设置为默认命令按钮,可设置属性为True来实现。
A) Value B) Cancel C) Default D) Enabled11. 若要使命令按钮不可见,可设置属性为False来实现。
A) Value B) Enabled C) Visible D) Cancel12. 运行程序时,系统自动执行窗体的事件。
A) load B) click C) unload D) GotFocus13. 若要设置文本框最大可接收的字符数,可通过属性来实现。
许vb新题库 (3)

本卷共有3道大题:
一、单项选择题(50道小题,共50分)
1、VB是一种面向对象的程序设计语言,构成对象的三要素是( )。(1分)
A、属性、事件、方法 B、控件、属性、事件
C、不能在“通用声明”段中为变量赋值D、不能在窗体的某个子程序中定义窗体级变量
24、在窗体上画一个名称为Commandl的命令按钮,然后编写如下程序: Private Sub
Command1_Click():Static X As Integer:Static Y As
Sub, 下列关于S1和S2的说法,正确的是( )。(1分)
A、调用过程S1可以实现交换两个变量值,而S2不能B、调用过程S2可以实现交换两个变量值,而S1不能
C、调用过程S1和S2都可以实现交换两个变量值D、调用过程S1和S2都不能实现交换两个变量值
C、注释语句可以放在代码中的任何位置D、代码中加入注释语句的目的是提高程序的可读性
5、有程序代码如下:Label1.Caption
="Label1.Caption",则Label1、Caption、"Label1.Caption"分别代表(
C、窗口中包含有菜单栏和工具栏D、事件驱动下的编程机制
4、下列叙述中,不正确的叙述是( )。(1分)
A、注释语句是非执行语句,仅对程序的有关内容起注释作用,客观存在不被解释和编译B、注释语句能放在整个代码程序的最后
C、15 15 D、5 6
25、可以在窗体模块的声明段中进行( )的声明。(1分)
C、Private Sub sale(A() As Integer) As IntegerD、Private
vb模拟题库中的选择题3

vb模拟题库中的选择题31.vb 中的坐标圆点位于().A:容器右上角 B:容器左上角 C:容器正中央 D:容器右下角2.INT(100*RND(1))产生的随机整数的闭区间是().A:[0,99] B:[1,100] C:[0,100] D:[1,99]3.vb 应用程序是分层管理的,其最高的层次为().A:工程 B:模块 C:窗体 D:过程4.窗体的Caption属性的作用是().A:确定窗体的名称 B:确定窗体的标题 C:确定窗体的边界类型 D:确定窗体的字体5.窗体的Enable属性的属性值是()类型的数据.A:整型 B:字符型 C:逻辑型 D:实型6. ()对象具有Clear方法.A:图片框 B:窗体 C:复选框 D:列表框7.VisualBasic集成环境的大部分窗口都可以从主菜单项()的下拉菜单中找到相应的打开命令.A:编辑 B:视图 C:格式 D:调试8.RGB 函数通过红.绿.蓝三基色混合产生某种颜色,某语法为RGB(红.绿.蓝),括号中红、绿、蓝三基色的成分使用0~255之间的整数.若使用三个滚动条分别输入三种基色,为保证输入数值有效,则应设置()属性. A:Max和Min B:Smallchange和LargeChange C:Scroll和Change D:Value9.vb 中的坐标系最小刻度为().A:缇 B:象素 C:厘米 D:一个标准字符宽度10. ()对象不能作为控件的容器.A:Form B:PictureBox C:Shape D:Frame11.Rnd函数不可能产生的()值.A:0 B:1 C:0.1234 D:.0000512.表达式Mid("SHANGHAI",6,3)的值是().A:SHANGH B:SHA C:ANGH D:HAI13.求以10 为底X 的常用对数的表达式为().A:LOG(X)/LOG(10) B:LN(X) C:LOG(X)/LOG(E) D:LOG(X)14.标准工具箱中的控件().A:数目是固定不变的 B:数目可以增加或减少C:包含了VisualBasic所有控件 D:在窗体建立对象时不一定被使用15.语句listl.removeitem 1 将删除list.listindext等于()的项目..A:0 B:2 C:3 D:116.Interger类型的变量可存的的最大整数是().A:250 B:256 C:32768 D:3276717.产生[10,37]之间的随机整数的VisualBasic表达式是().A:In t(Rnd(1)*27)+10 B:Int(Rnd(1)*28)+10 C:Int(Rnd(1)*27)+11D:Int(Rnd(1)*28)+1118.表达式X+1>X是().A:算术表达式 B:非法表达式 C:字符表达式 D:关系表达式19.表达式INT(8*SQR(36)*10^(-2)*10+0.5)/10的值是().A:0.48 B:0.048 C:.5 D:.0520.如果将布尔常量值TRUE赋值给一个整型变量,则整型变量的值为().A:0 B:-1 C:True D:FALSE21.语句PRINT"SGN(-26)=";SGN(-26)的输出结果为().A:SGN(-26)=26 B:SGN(-26)=-26 C:SGN(-26)=+1 D:SGN(-26)=-122.表达式(7\3+1)*(18\5-1)的值是().A:8.76 B:7.8 C:6 D:6.6723.表达式2+3*4^5-SIN(X+1)/2中最先进行的运算是().A:4^5 B:3*4 C:x+1 D:SIN24.函数InStr("VB程序设计教程","程序")的值为().A:1 B:2 C:3 D:425.表达式(-1)*Sgn(-100+Int(Rnd*100))的值是().A:0 B:1 C:-1 D:随机数26.\、/、Mod、*等4个算术运算符中,优先级最低的是().A:\ B:/ C:Mod D:*27.设a=6,则执行x=IIf(a>5,-1,0)后,x的值为().A:5 B:6 C:0 D:-128.设置列表框选中的文本用()属性.A:selected B:caption C:text D:list29.在文件列表框中设定"文件列表"中显示文件类型应修改该控件的()属性.A:Pattern B:Path C:Filename D:Name30.计时器的interval属性为0时,表示().A:计时器失效 B:相隔0秒 C:相隔0 毫秒 D:计时器的enable属性为false 31.可视化编程的最大优点是().A:具有标准工具箱 B:一个工程文件由若干个窗体文件组成C:不需要编写大量代码来描述图形对象 D:所见即所得32.执行下面的程序段后,x的值为().x=5For i=1 To 20 Step 2x=x+i\5Next iA:21 B:22 C:23 D:2433.定时器的Interval属性以()为单位指定Timer事件之间的时间间隔.A:分 B:秒 C:毫秒 D:微秒34.声明符号常量应该用关键字().A:Static B:Const C:Private D:V26/ariant35.下列可缩放图片的属性是().A:autosize B:picture C:stretch D:OleDrawMode36.下列关于设置控件属性的叙述正确的是().A:用户必须设置属性值 B:所有的属性值都可以由用户随意设定C:属性值不必一一重新设置 D:不同控件的属性项都完全一样37.下列表达式中,其值为0的是().A:7/9 B:7 mod 15 C:7\9 D:15 mod 938.下面哪些控件不会影响到界面设计效果().A:定时器 B:文本框 C:标签 D:Line控件39.改变控件在窗体中的左右位置应修改该控件的()属性.A:Top B:Left C:Width D:Right40.要使标签中显示的文本靠右显示,则应将其Alignment属性设置为().A:0 B:1 C:2 D:341.要使得窗体在出现之前就完成相关的程序设置可在()事件中进行编程.A:linkopen B:KeyPress C:load D:click42.设计动画通常使用时钟控件()来控制动画速度.A:Enabled B:Interval C:Timer D:Move43.下列哪一种文件打开方式是以顺序文件方式打开文件并作写操作().A:Open "c:\file1.dat"For Output as #1 B:Open "c:\file1.dat" For Input as #1 C:Open "c:\file1.dat" For =Append as #1 D:Open "c:\file1.dat" For Write as #1 44.下列数据类型中,占用内存最小的是().A:Boolean B:Byte C:Integer D:Single45.运行下面的程序: CLSLINE (100,100)-(200,50)LINE - (150,150)LINE -(100,100)屏幕上显示的是().A:三条放射形直线 B:四条放射形直线 C:矩形 D:三角形46.图像框(Image)的何项属性设置为true时,可使图形自动调整大小,填满整个图像框().A:Width B:Picture C:Name D:Stretch47.退出VisualBasic的快捷键是().A:Ctrl+Q B:Shift+Q C:Alt+Q D:Ctrl+Alt+Q48.若要使标签控件显示时,不覆盖其背景内容,应设置标签控件的()属性.A:BACKCOLOR B:BORDERSTYLE C:FORECOLOR D:BACKSTYLE49.如果设计时在属性窗口将命令按钮的()属性设置为False,则运行时按钮从窗体上消失.A:Visible B:Enabled C:DisabledPicture D:Default50.下列关于控件画法的叙述错误的是().A:单击一次工具箱中的控件图标,只能在窗体上画出一个相应的控件B:按住CTRL键后单击一次工具箱中的控件图标,可以在窗体上画出多个相同类型的控件C:双击工具箱中的控件图标,所画控件的大小和位置是固定的D:不用工具箱中的控件工具,不可以在窗体上画出图形对象,但可以写入文字字符51.以下不具有Picture属性对象是().A:窗体 B:图片框 C:图像框 D:文本框52.控件内的对齐方式()属性决定.A:Alignment B:WordWrap C:AtuoSize D:Style53.为使计时器控件每隔5秒钟产生一个计时器事件(Timer事件),则应将其Interval属性值设置为(). A:5 B:500 C:300 D:500054.英文缩写OLE的含义是().A:面向对象程序设计 B:对象链接 C:对象嵌入 D:对象链接与嵌入55.已知A?B?C中C最小,则判断A?B?C可否构成三角形三条边长的逻辑表达式是().A:A>=B And B>=C And C>0 B:A+C>B And B+C>A And C>0 C:(A+C)>=C And A-C <=C) And C>0 D:A+B>C And A-B>CAnd C>056.如果在图片框上使用绘图方法绘制一个实心圆,则图片框的()属性决定了该圆的颜色.A:BackColor B:ForeColor C:FillColor D:DrawStyle57.当用户改变滚动条的value 属性时将激发滚动条的()事件.A:change B:scroll C:change 和scroll D:gotfocus58.定义货币类型数据应该用关键字().A:SINGLE B:DOUBLE C:CURRENCY D:BOOLEAN59.一个对象可以执行的动作和可被对象识别的动作分别称为().A:事件、方法 B:方法、事件 C:属性、方法 D:过程、事件60.Visual Basic 6.0中任何控件都有的属性是().A:BackColor B:Caption C:Name D:BorderStyle61.设执行以下程序段时依次输入11、33、55,执行结果为Dim a(4) As Integer, b(4) As IntegerFor K = 0 To 2a(K + 1) = Val(InputBox("请输入数据"))b(3 - K) = a(K + 1)Next KPrint b(K)A:11 B:33 C:55 D:062.若有数组说明语句为:Dim a(-3 to 8),则数组a包含元素的个数是().A:5 B:8 C:11 D:1263.VB应用程序保存在磁盘上,至少会有以()为扩展名两个文件.A:.DOC和.TXT B:.COM和.EXE C:.VBW和.BAS D:.VBP和.FRM64.下列有关控件数组与一般控件的区别的叙述中,最合理的是A:控件数组一定由多个同类型的控件组成,一般控件只有一个控件;B:控件数组的Index为0,而一般控件的Index为空;C:控件数组的Index为1,而一般控件的Index为0;D:控件数组的建立通过Dim语句声明,而一般控件不必声明.65.若要清除列表框的所有内容,可用什么方法实现A:RemoveItem B:Cls C:Clear D:以上均不可以66.选择和循环结构的作用是().A:控制程序的流程 B:提高程序的运行速度 C:便于程序的阅读 D:方便程序的调试67.可以删除字符串尾部空白的函数是().A:Ltrim B:Rtrim C:Trim D:Mid68.在窗体上画一个名称为Command1的按钮,并有下面程序,当按下Command1按钮后,程序输出的结果是Private Sub Command1_Click()Dim a%, b%a = 50:b = 100Print "调用前", "A="; a, "B="; bSwap a, bPrint "调用后", "A="; a, "B="; bEnd SubPrivate Sub Swap(ByVal x%, y%)Dim t%t = x: x = y: y = tEnd SubA:调用前A=50 B=100 调用后A=50 B=100B:调用前A=50 B=100 调用后A=100 B=50C:调用前A=50 B=100 调用后A=50 B=50D:调用前A=50 B=100 调用后A=100 B=10069.以下几项中,属于日期型常量的是().A:"10/10/02" B:10/10/02 C:#10/10/02# D:{10/10/02}70.当输入4时,以下程序的输出结果是______.Private Sub Command1_Click()x=InputBox(x)If x^2<15 Then y=1/xIf x^2>15 Then y=x^2+1Print yEnd SubA:4 B:17 C:18 D:2571.Sub过程与Function过程最根本的区别是A:Sub过程可以有参数,Function过程不可以B:Function过程可以有参数,Sub过程不可以C:两种过程参数的传递方式不同D:Sub过程的过程名不能返回值,而Function过程能通过过程名返回值72.执行下面程序段后,变量a的值为______.For I=1 To 3For j=1 To IFor k=j To 3a=a+1Next kNext jNext IA:3 B:9 C:14 D:2173.Integer类型的数据由_ _____字节组成.A:1 B:2 C:3 D:474.在Visual Basic中,最简单的数据类型包括______.A:整型、实型、布尔型、字符型 B:整型、实型、字符型C:整型、实型、逻辑型 D:实型、逻辑型、字符型75.以下操作不能运行程序的是().A:单击工具栏上的"启动"按钮 B:直接按键盘的键C:单击"运行"菜单的"启动"命令 D:AlT+ F5键76.执行下面的程序段后,x 的值为()x=5For i=1 To 20 Step 2x=x+i\5Next iA:21 B:22 C:23 D:2477.表达式Len("123程序设计ABC")的值是A:10 B:14 C:20 D:1778.下面关于对象的描述中,错误的是().A:对象就是自定义结构变量B:对象代表正在创建的系统中的一个实体C:对象是一个状态和操作(或方法)的封装体D:对象之间的信息传递是通过消息进行的79.数学表达式x>y>z的正确VB逻辑表达式是______.A:x>y And y>z C:x>y And >z D:x>y And y>z80.文本框所没有的属性是().A:Enabled B:Visible C:BackColor D:Caption81.下列选项中,属于Visual Basic 6.0程序设计方法的是().A:面向对象、顺序驱动 B:面向对象、事件驱动C:面向过程、事件驱动 D:面向过程、顺序驱动82.下面是()合法的字符常数.A:ABC$ B:"ABC" C:'ABC' D:ABC83.如下程序:Public Sub Proc(a%())Static I%Doa(I) = a(I) + a(I + 1)I = I + 1Loop While I < 2End SubPrivate Sub Command1_Click()Dim m%, I%, x%(10)For I = 0 To 4: x(I) = I + 1: Next IFor I = 0 To 2: Call Proc(x): Next IFor I = 0 To 4: Print x(I);: Next IEnd SubA:3 4 7 5 6 B:3 5 7 9 5 C:2 3 4 4 5 D:4 5 6 7 884.inputBox函数返回值的类型为().A:数值B:字符串C:变体D:数值或字符串(视输入的数据而定) 85.VB的过程有三种,它们是().A:事件过程、子过程和函数过程B:Sub过程、Function过程和Property过程C:事件过程、函数过程和属性过程D:Sub过程、函数过程和通用过程86.如果一个整型变量定义后未赋值,则该变量的缺省值为().A:8 B:"" C:1 D:087.在窗体上画一个名称为Label1、标题为"VisualBasic考试"的标签,两个名称分别为Command1和Command2、标题分别为"开始"和"停止"的命令按钮,然后画一个名称为Timer1的计时器控件,并把其Interval属性设置为500. 编写如下程序:Private Sub Form_Load()Timer1.Enabled = FalseEnd SubPrivate Sub Command1_Click()Timer1.Enabled = TrueEnd SubPrivate Sub Command2_Click()Timer1.Enabled = FalseEnd SubPrivate Sub Timer1_Timer()If Label1.Left < Width ThenLabel1.Left = Label1.Left + 120ElseLabel1.Left = 0End IfEnd Sub程序运行后,单击"开始"按钮,标签在窗体中移动. 对于这个程序,以下叙述中错误的是A:标签的移动方向为自左向右B:单击"停止"按钮后再单击"开始"按钮,标签从停止的位置继续移动C:当标签全部移出窗体后,将从窗体的另一端出现并重新移动 D:标签每隔1秒移动一次88.运行下面程序后,在窗体中显示的是______.Private Sub Form_Click()a$="*": b$="$"For k=1 To 3x$=String$(Len(a$)+k,b$)Print x$;Next kPrintEnd SubA:*** ** **** B:*$*$*$ C:1*$2*$3*$ D:$$$$$$$$$89.表达式4+5 \ 6 * 7 / 8 Mod 9 的值是().A:4 B:5 C:6 D:790.以下程序的输出结果是______.Private Sub Command1_Click()a=100Dos=s+aa=a+1Loop Until a>100print aEnd SubA:100 B:120 C:201 D:10191.若要使命令按钮不可操作,要对()属性进行设置.A:Enabled B:Visible C:BackColor D:Caption92.下面4项中合法的单精度型变量是A:num! B:sum% C:xinte$ D:mm#93.要使某控件在运行时不可显示,应对()属性进行设置.A:Enabled B:Visible C:BackColor D:Caption94.如下数组声明语句:Dim a(3,-2 To 2,5),则数组a包含的元素的个数为A:120 B:75 C:60 D:1395.执行语句For i=1 To 3:i=i+1:Next i后,变量i的值是().A:3 B:4 C:5 D:696.写出如下程序运行结果.Function f(m As Integer) As Integerb = 1Static c As Integerb = b + 1c = c + 1f = m * b * cEnd FunctionPrivate Sub Command1_Click()Dim a As Integera = 2sum=0For I = 1 To 3sum=sum+ f(a)Next Iprint sumEnd SubA:12 B:16 C:20 D:2497.在Visual Basic中最基本的对象是(),它是应用程序的基石,是其他控件的容器.A:文本框 B:命令按钮 C:窗体 D:标签98.当运行程序时,系统自动启动窗体的事件过程是().A:Load B:Click C:UnLoad D:GotFocus99.要获得用户在组合框输入的内容,应利用的组合框的属性是A:List B:Selected C:ListIndex D:Text100.要想从子过程调用后返回两个结果,下面子过程语句说明合法的是A:Sub f2(ByVal n%,ByVal m%) B:Sub f1(n%,ByVal m%)C:Sub f1(n%,m%) D:Sub f1(ByVal n%,m%)101.在顺序文件中______.A:文件中按每条记录的记录号从小到大排序B:文件中按每条记录的长度从小到大排序C:文件中按记录的某关键数据项的从小到大的顺序D:记录是按写入的先后顺序存放的,读出也是按写入的先后顺序读出102.在窗体上添加一个命令按钮,编写如下代码:Private Sub Command1_ClickDim Arr1(10) as Integer ,Arr2(10) As IntegerN=3For i=1 to 5Arr1(i)=iArr2(n)=2*n+iNext iPrint Arr2(n), Arr1(n)End Sub程序运行后,单击命令按钮,输出结果是A:11 3 B:3 11 C:13 3 D:3 13103.设菜单中有一个菜单项为"Open".若要为该菜单命令设置访问键,即按下ALT及字母O 时,能够执行Open命令,则在菜单编辑器中设置"Open"命令的方式是:A:把Caption属性设置为&Open B:把Caption属性设置为O&penC:把Name属性设置为&Open D:把Name属性设置为O&pen 104.为了使一个窗体从屏幕上消失但仍在内存中,所使用的方法或语句为().A:Show B:Hide C:Load D:UnLoad105.指令"Circle(1000,1000),500,8,-6,-3"将绘制A:画圆 B:椭圆 C:圆弧 D:扇形106.以下叙述错误的是:A:下拉式菜单和弹出式菜单都用菜单编辑器建立B:如果把一个菜单项的Enabled属性设置为False,则菜单项不可见C:除分隔线外,所有菜单项都能接收Click事件D:内缩符号由4个点组成,它表明菜单项所在的层次107.下面程序运行时,内层循环的循环总次数是 .For m = 1 To 3For n = 0 To m - 1Next nNext mA:4 B:5 C:6 D:7108.Cls方法可清除窗体或图片框中的信息是 .A:Picture属性设置的背景图案 B:在设计时放置的控件C:程序设计时产生的图形和文字 D:以上方法都对109.在下面选项中,不能完成对顺序文件的读操作的是______.A:LineInput#语句 B:Input#语句 C:Input()函数 D:Get#语句110.设有如下变量声明Dim TestDate As Date为变量T estDate正确赋值的表达方式是A:TestDate=#1/1/2008# B:TestDate=#"1/1/2008"#C:TestDate=date("1/1/2008")D:TestDate=Format("m/d/yy","1/1/2008") 111.下面子过程语句说明合法的是().A:Sub f1(ByVal n%( )) B:Sub f1(n%) As IntegerC:Function f1%(f1%) D:Function f1%( ByVal n%)112.在窗体中添加两个文本框Text1和Text2,一个命令按钮Command1,编写如下事件过程: Private Sub Command1_Click() x = 0Do While x < 10x = (x - 2) * (x + 3)n = n + 1LoopText1.Text = Str(n) : Text2.Text = Str(x)End Sub程序运行后,单击命令按钮,在两个文本框中显示的值分别为()A:1 和 0 B:3 和 50 C:2 和 24 D:4 和 68113.在下列说法中,正确的是A:通过适当的设置,可以在程序运行期间,让时钟控件显示在窗体上B:在列表框中不能进行多项选择C:在列表框中能够将项目按字母顺序从大到小排列D:框架也有Click和DblClick事件114.下来程序段执行结果为x = 5y = -6if not x > 0 then x = y - 3Else y = x + 3print x - y;y - xA:-3 3 B:5 -9 C:3 -3 D:-6 5115.下面程序段输出的结果是Private Sub Command1_Click()x = 8For i = 0 To 20 Step 5x = x + iNextPrint "X="; xEnd SubA:X=210 B:X=218 C:X=50 D:X=58116.标签的()属性设置为True时,标签控件的大小随标题文字自动调整.A:AutoSize B:Caption C:Alignment D:BackStyle117.设x=4,y=6,则以下不能在窗体上显示出"A=10"的语句是A:Print A=x+y B:Print"A=";x+y C:Print "A="+Str(x+y)D:Print"A="&x+y118.下面程序段:Dim mm=Int((Rn((D)+1)+5Select Case mCase 6Print"优秀"Case 5Print"良好"Case 4Print"通过"Case ElsePrint"不通过"End Select显示的结果是A:优秀 B:良好 C:通过 D:不通过答案:A119.在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后编写如下程序: Private Sub Command1_Click() Dim x, y, z As Integery = 7z = 0Text1.Text = ""Call P1(x, y, z)Text1.Text = Str(x) & Str(z)End SubSub P1(ByVal a As Integer, ByVal b As Integer, c As Integer) a=a+1b=b+1c = a + bEnd Sub程序运行后,如果单击命令按钮,则在文本框中显示的内容是A:5 14 B:6 14 C:5 0 D:6 0120.表达式 15 Mod 4 + 13 \ 5 * 2 的值是A:0 B:2 C:4 D:7121.确定一个窗体或控件大小的属性是().A:Width 和Height B:Width 和T op C:T op 和right D:Top 和 Left 122.执行下面程序段后,变量x的值为______.x=5For I=1 To 20 step 2x=x+I\5Next IA:21 B:22 C:23 D:24123.设a=3,b=5,则以下表达式值为真的是().A:a>=b And b>10 B:(a>b)Or(b>0) C:(a<0)Eqv(b>0) D:(-3+5>a)And(b>0) 124.假定时钟控件的Interval属性为1000,Enabled 属性为True,并且有下面的事件过程,计算机将发出Beep声的次数是Sub Timer1_Timer()For i=1 To 10Next iEnd SubA:1000次 B:10000次 C:10次 D:以上都不对125.赋值语句:b=12+MID("1234",3,2)执行后,b变量中的值是A:"12334" B:123 C:34 D:46126.要判断"命令按钮"是否被鼠标单击,应在"命令按钮"的事件中判断.A:Chang B:KeyDown C:Click D:KeyPress127.下列循环能正常结束循环的是A:i=5Doi=i+1Loop Until i<0B:i=1Doi=i+2Loop Until i=10C:i=10Doi=i+1Loop Until I>0D:i=6Doi=i-2Loop Until I=1128.以下程序输出的结果是:Private Sub Form_Activate()Dim aa=Array(1,2,3,4,5)For i=Lbound(((A) To Ubound(((A)A(i)=i*a(i)Next iPrint i, Lbound(((A) , Ubound(((A) , a(i)End SubA:4 0 4 20 B:5 0 4 20 C:不确定 D:程序出错129.复选框的Value属性为1时,表示___.A:复选框未被选中 B:复选框被选中 C:复选框内有灰色的勾 D:复选框操作方式"错误" 130.在下列表达式中,非法的是______.A:a=b+c B:a>b+c C:a≠b>c D:a<b+c< p="">131.可以惟一标识控件数组中的每一个控件属性的是A:Name B:Caption C:Index D:Enabled132.有以下程序:Option Base 1Dim arr() As IntegerPrivate Sub Form_Click()Dim i As Integer,j As IntegerReDim arr(3,2)For i=1 To 3For j=1 To 2arr(i,j)=i*10+jNext jNext iReDimPreserve arr(3,4)For j=3 To 4arr(3,j)=10*j+5Next jPrint arr(3,2);arr(3,4)End Sub程序运行后,单击窗体,输出结果为A:0 22 B:31 35 C:32 45 D:0 0 133.以下程序Option Base 1Private Sub Command1 _Click() Dim a%(3,3)For j=1 To 3If j>1 And i>1 Thena(i,j)=a(a(i-1,j-1),a(i,j-1))+1 Elsea(i,j)=i*jEnd IfPrint a(I,j);"";Next jPrintNext iEnd Sub输出结果是A:1 2 32 3 13 2 3B:1 2 31 2 31 2 3C:1 2 32 4 63 6 9D:1 1 12 2 23 3 3134.在窗体上添加一个命令按钮,编写如下代码:Option Base 1 Private Sub Command1_ClickDim a(10) As Integer,p(3) As Integer k=5For i=1 To 10a(i)=iNext iFor i=1 To 3p(i)=a(i*i)Next ik=k+p(i)*2Next iPrint kEnd Sub程序运行后,单击命令按钮,输出结果是A:35 B:28 C:33 D:37135.已知A$="12345678",则表达式Val(Left$(A $,4)+Mid$(a $,4,2))的值为A:123456 B:123445 C:8 D:6136.为了给x,y,z这3个变量赋初值3,下面正确的赋值语句是A:x=3:y=3:z=3 B:x=3,y=3,z=3 C:x=y=z=3 D:xyz=3137.表达式Abs(-5)*5\5/5的值是A:-25 B:25 C:5 D:1138.假设在图片框Pictrue1中装入一个图形,为了清除该图形(不删除图片框),应采用的正确方法是: A:选择图片框,然后按Delete键. B:执行语句Pictrue1. Pictrue=LoadPictrue("")C:执行语句Pictrue1. Pictrue="" D:选择图片框,在属性窗口选择Pictrue1属性,然后安回车键139.下面4项中不属于面向对象系统三要素的是().A:变量 B:事件 C:属性 D:方法140.如下程序:Private Sub Command1_Click()Print p1(3,7)End SubPublic function p1!(x!,n%)If n=0 ThenP1=1ElseIf n Mod 2=1 ThenP1=x*p1(x,n\2)ElsePl=pl(x,n\2)\xEnd IfEnd IfEnd Function运行的结果是A:18 B:7 C:14 D:27141.表达式16/4-2^5*8/4MOD5\2的值为A:14 B:4 C:20 D:2142.引用列表框(List1)最后一个数据项应使用的语句是()。
国家二级VB机试(选择题)模拟试卷423(题后含答案及解析)

国家二级VB机试(选择题)模拟试卷423(题后含答案及解析) 题型有:1. 选择题选择题1.在线性表的顺序存储结构中,其存储空间连续,各个元素所占的字节数( )。
A.不同,但元素的存储顺序与逻辑顺序一致B.不同,且其元素的存储顺序可以与逻辑顺序不一致C.相同,元素的存储顺序与逻辑顺序一致D.相同,但其元素的存储顺序可以与逻辑顺序不一致正确答案:C解析:在线性表的顺序存储结构中,其存储空间连续,各个元素所占的字节数相同,在存储空间中是按逻辑顺序依次存放的。
知识模块:公共基础知识2.下列叙述中正确的是( )。
A.结点中具有两个指针域的链表一定是二叉链表B.结点中具有两个指针域的链表可以是线性结构,也可以是非线性结构C.循环链表是循环队列的链式存储结构D.循环链表是非线性结构正确答案:B解析:结点中具有两个指针域的链表既可以是双向链表也可以是二叉链表,双向链表是线性结构,二叉链表属于非线性结构。
循环链表是线性链表的一种形式,属于线性结构,采用链式存储结构,而循环队列是队列的一种顺序存储结构。
知识模块:公共基础知识3.在具有2n个结点的完全二叉树中,叶子结点个数为( )。
A.nB.n+1C.n-1D.n/2正确答案:A解析:由二叉树的定义可知,树中必定存在度为0的结点和度为2的结点,设度为0结点有a个,根据度为0的结点(即叶子结点)总比度为2的结点多一个,得度为2的结点有a-1个。
再根据完全二叉树的定义,度为1的结点有0个或1个,假设度1结点为0个,a+0+a-1=2n,得2a=2n-1,由于结点个数必须为整数,假设不成立;当度为1的结点为1个时,a+1+a-1=2n,得a=n,即叶子结点个数为n。
知识模块:公共基础知识4.下列算法中均以比较作为基本运算,则平均情况与最坏情况下的时间复杂度相同的是( )。
A.在顺序存储的线性表中寻找最大项B.在顺序存储的线性表中进行顺序查找C.在顺序存储的有序表中进行对分查找D.在链式存储的有序表中进行查找正确答案:A解析:寻找最大项,无论如何都要查看所有的数据,与数据原始排列顺序没有多大关系,无所谓最坏情况和最好情况,或者说平均情况与最坏情况下的时间复杂度是相同的。
VB笔试模拟试卷123(题后含答案及解析)

VB笔试模拟试卷123(题后含答案及解析) 题型有:1. 选择题 2. 填空题选择题(每小题2分,共70分)下列各题A、B、C、D四个选项中,只有一个选项是正确的,请将正确选项涂写在答题卡相应位置上。
1.下列说法中错误的是( )。
A.在同一模块不同过程中的变量可以同名B.不同模块中定义的全局变量可以同名C.引用另一模块中的全局变量时,必须在变量名前加模块名D.同一模块中不同级的变量可以同名正确答案:D解析:变量可以分为3类:局部变量、模块变量、全局变量。
在同一模块不同过程中的变量叫做局部变量,其作用域是它所在的过程,所以不同过程中的局部变量可以同名;模块变量的作用范围是整个窗体或模块,引用其他模块中的模块变量时,必须加上模块名;当同一个模块内的不同过程使用相同的变量时,必须声明窗体层的变量,当然不能有重名。
2.下列数据结构中,属于非线性的是( )。
A.线性表B.队列C.树D.栈正确答案:C解析:线性结构,是指数据元素只有一个直接前件元素和直接后件元素。
线性表是线性结构。
栈和队列是指对插入和删除操作有特殊要求的线性表,树是非线性结构。
3.下列叙述中错误的是( )。
A.线性表是由n个元素组成的一个有限序列B.线性表是一种线性结构C.线性表的所有结点有且仅有一个前件和后件D.线性表可以是空表正确答案:C解析:线性表是一种线性结构,由n(n≥0)个元素组成,所以线性表可以是空表。
但是在线性表中,第一个结点没有前件,最后一个结点没有后件,其他结点有且只有一个前件和后件,所以C是错误的。
4.按照“先进先出”组织数据的数据结构是( )。
A.队列B.栈C.双向链表D.二叉树正确答案:A解析:队列是一种特殊的线性表,只允许在表的一端插入元素,在表的另一端删除元素,插入元素的一端叫“队尾”,删除元素的一端叫“队头”,先插入的元素先被删除,是按“先进先出”的原则组织数据的。
5.下列关于线性链表的描述中正确的是( )。
VB试题库及答案

VB试题库及答案最新VB题库及答案⼀、选择题第1部分1、在窗体(名称为Form1)上画⼀个名称为Text1的⽂本框和⼀个名称为Command1的命令按钮,然后编写⼀个事件过程。
程序运⾏后,如果在⽂本框中输⼊⼀个字符,则把命令按钮的标题设置为“计算机等级考试”。
以下能实现上述操作的事件过程是A、Private Sub Text1_Change()Command1.Caption = "计算机等级考试"End SubB、Private Sub Command1_Click()Caption = "计算机等级考试"End SubC、Private Sub Form_Click()Text1.Caption = "计算机等级考试"End SubD、Private Sub Command1_Click()Text1.Text = "计算机等级考试"End Sub2、在⼀⾏内写多条语句时,每个语句之间⽤()符号分隔。
A、 ,B、:C、.D、;3、下⾯()是合法的变量名。
A、X_YZB、123ABCC、INTEGERD、X-Y4、下⾯()是合法的字符常量。
A、 ABC$B、“ABC”C、‘ABC’D、 ABC5、表达式16/4 - 2^5*8 MOD 5\2的值为()。
A、14B、 4C、20D、26、设a=”MicrosoftVisualBasic”,则以下使变量的b值为”VisualBasic”的语句是A、b=Left(a,10)B、b=Mid(a,10)C、b=Right(a,10)D、b=Mid(a,11,10)7、设a="a",b="b",c="c",d="d",执⾏语句x = IIf((a < b) Or (c > d), "A", "B")后,x的值为A、"a"B、"b"C、"B"D、"A"8、在窗体上画⼀个⽂本框,然后编写如下事件过程:Private Sub Form_Click()x = InputBox("请输⼊⼀个整数")Print x + Text1.TextEnd Sub程序运⾏时,在⽂本框中输⼊456,然后单击窗体,在输⼊对话框中输⼊123,单击“确定”按钮后,在窗体上显⽰的内容为A、123B、456C、579D、1234569、在BASIC中,三个逻辑运算符NOT,AND,OR在运算过程中,优先级从⾼到低的顺序是()。
计算机二级VB第3-4章选择题及答案

1、以下()语句可表示[50,100] 之间的随机整数。
A、Int(Rnd*51)+49B、Int(Rnd*51+50) C、DInt(Rnd*50)+50Int(Rnd*50+50)2、设a=” 39级台阶”,使b=”台阶”的语句是()。
A、Right ( a,4)C、Left(a,5,4)B、Instr ( a,5,4)D、Mid(a,4,2)3、下列语句合法的是() 。
A、x+y = 2 C、x=y>2B、x>y=2 D、x=y++4、定义变量时如不指定类型,该变量为()类型。
A、Integer C、VariantB、String D、Single5、设a= 6, b = 5, c = —2;执行语句Print a>b>c 后,窗体上显示的是()A、1 C、FalseB、True D、出错信息6、下列语句组:a$="Today And Tomorrow" b$=Right(a$,8):c$=Left(a$,5) msgbox a$,,b$,c$,5 执行后消息框的标题是() 。
A、Today C、Today And TomorrowB、Tomorrow D、17、如果x 小于y 的平方,则在窗体上输出”OK。
完成该要求的条件语句是()。
A、If x< y A 2 The n "OK" C、If x< y A 2 Then Print "OK"B、If x< y A 2 The n Show "OK" D、If x< y A 2 Then Put "OK" 8表达式Len (”幸运52”)的值是()A、B、04C、D、689、错误使用Print 方法的是()。
A、C、B、D、10、执行x = MsgBox(" 数据类型不匹配", vbOKCancel, " 出错提示!") ,然后单击消息框的“取消“按钮, x 的值是()。
vb基础期末考试题库及答案

vb基础期末考试题库及答案一、选择题(每题2分,共20分)1. 在Visual Basic中,以下哪个是正确的数据类型?A. IntegerB. intC. StringD. str答案:A、C2. 下列哪个选项不是VB的控件?A. TextBoxB. ButtonC. LabelD. ComboBox答案:B3. VB中,用于声明一个变量的关键字是:A. DimB. DeclareC. FunctionD. Sub答案:A4. 在VB中,以下哪个是正确的函数用于将字符串转换为整数?A. StrToIntB. CIntC. ValD. Convert.ToInt32答案:B5. Visual Basic中,哪个属性用于设置文本框的文本?A. TextB. CaptionC. ValueD. Label答案:A6. 下列哪个是VB中用于循环的语句?A. IfB. ForC. WhileD. Select答案:B、C7. VB中,下列哪个关键字用于定义一个过程?A. FunctionB. SubC. ClassD. Module答案:B8. 在VB中,以下哪个是正确的事件处理程序?A. OnClickB. OnClickC. ClickD. OnClick答案:A、C9. VB中,下列哪个选项用于声明一个常量?A. ConstB. DimC. StaticD. Public答案:A10. 在VB中,以下哪个关键字用于定义一个类?A. ClassB. ModuleC. StructureD. Interface答案:A二、填空题(每题2分,共20分)1. 在VB中,使用________关键字来结束一个程序。
答案:End2. VB中,________关键字用于声明一个数组。
答案:Dim3. 使用________函数可以将一个数字转换为字符串。
答案:Str4. 在VB中,________关键字用于定义一个全局变量。
- 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。
1.vb 中的坐标圆点位于().A:容器右上角 B:容器左上角 C:容器正中央 D:容器右下角2.INT(100*RND(1))产生的随机整数的闭区间是().A:[0,99] B:[1,100] C:[0,100] D:[1,99]3.vb 应用程序是分层管理的,其最高的层次为().A:工程 B:模块 C:窗体 D:过程4.窗体的Caption属性的作用是().A:确定窗体的名称 B:确定窗体的标题 C:确定窗体的边界类型 D:确定窗体的字体5.窗体的Enable属性的属性值是()类型的数据.A:整型 B:字符型 C:逻辑型 D:实型6. ()对象具有Clear方法.A:图片框 B:窗体 C:复选框 D:列表框7.VisualBasic集成环境的大部分窗口都可以从主菜单项()的下拉菜单中找到相应的打开命令.A:编辑 B:视图 C:格式 D:调试8.RGB 函数通过红.绿.蓝三基色混合产生某种颜色,某语法为RGB(红.绿.蓝),括号中红、绿、蓝三基色的成分使用0~255之间的整数.若使用三个滚动条分别输入三种基色,为保证输入数值有效,则应设置()属性. A:Max和Min B:Smallchange和 LargeChange C:Scroll和Change D:Value9.vb 中的坐标系最小刻度为().A:缇 B:象素 C:厘米 D:一个标准字符宽度10. ()对象不能作为控件的容器.A:Form B:PictureBox C:Shape D:Frame11.Rnd函数不可能产生的()值.A:0 B:1 C:0.1234 D:.0000512.表达式Mid("SHANGHAI",6,3)的值是().A:SHANGH B:SHA C:ANGH D:HAI13.求以10 为底X 的常用对数的表达式为().A:LOG(X)/LOG(10) B:LN(X) C:LOG(X)/LOG(E) D:LOG(X)14.标准工具箱中的控件().A:数目是固定不变的 B:数目可以增加或减少C:包含了VisualBasic所有控件 D:在窗体建立对象时不一定被使用15.语句listl.removeitem 1 将删除list.listindext等于()的项目..A:0 B:2 C:3 D:116.Interger类型的变量可存的的最大整数是().A:250 B:256 C:32768 D:3276717.产生[10,37]之间的随机整数的VisualBasic表达式是().A:In t(Rnd(1)*27)+10 B:Int(Rnd(1)*28)+10 C:Int(Rnd(1)*27)+11D:Int(Rnd(1)*28)+1118.表达式X+1>X是().A:算术表达式 B:非法表达式 C:字符表达式 D:关系表达式19.表达式INT(8*SQR(36)*10^(-2)*10+0.5)/10的值是().A:0.48 B:0.048 C:.5 D:.0520.如果将布尔常量值TRUE赋值给一个整型变量,则整型变量的值为().A:0 B:-1 C:True D:FALSE21.语句PRINT"SGN(-26)=";SGN(-26)的输出结果为().A:SGN(-26)=26 B:SGN(-26)=-26 C:SGN(-26)=+1 D:SGN(-26)=-122.表达式(7\3+1)*(18\5-1)的值是().A:8.76 B:7.8 C:6 D:6.6723.表达式2+3*4^5-SIN(X+1)/2中最先进行的运算是().A:4^5 B:3*4 C:x+1 D:SIN24.函数InStr("VB程序设计教程","程序")的值为().A:1 B:2 C:3 D:425.表达式(-1)*Sgn(-100+Int(Rnd*100))的值是().A:0 B:1 C:-1 D:随机数26.\、/、Mod、*等4个算术运算符中,优先级最低的是().A:\ B:/ C:Mod D:*27.设a=6,则执行x=IIf(a>5,-1,0)后,x的值为().A:5 B:6 C:0 D:-128.设置列表框选中的文本用()属性.A:selected B:caption C:text D:list29.在文件列表框中设定"文件列表"中显示文件类型应修改该控件的()属性.A:Pattern B:Path C:Filename D:Name30.计时器的interval属性为0时,表示().A:计时器失效 B:相隔0秒 C:相隔0 毫秒 D:计时器的enable属性为false 31.可视化编程的最大优点是().A:具有标准工具箱 B:一个工程文件由若干个窗体文件组成C:不需要编写大量代码来描述图形对象 D:所见即所得32.执行下面的程序段后,x的值为().x=5For i=1 To 20 Step 2x=x+i\5Next iA:21 B:22 C:23 D:2433.定时器的Interval属性以()为单位指定Timer事件之间的时间间隔.A:分 B:秒 C:毫秒 D:微秒34.声明符号常量应该用关键字().A:Static B:Const C:Private D:V26/ariant35.下列可缩放图片的属性是().A:autosize B:picture C:stretch D:OleDrawMode36.下列关于设置控件属性的叙述正确的是().A:用户必须设置属性值 B:所有的属性值都可以由用户随意设定C:属性值不必一一重新设置 D:不同控件的属性项都完全一样37.下列表达式中,其值为0的是().A:7/9 B:7 mod 15 C:7\9 D:15 mod 938.下面哪些控件不会影响到界面设计效果().A:定时器 B:文本框 C:标签 D:Line控件39.改变控件在窗体中的左右位置应修改该控件的()属性.A:Top B:Left C:Width D:Right40.要使标签中显示的文本靠右显示,则应将其Alignment属性设置为().A:0 B:1 C:2 D:341.要使得窗体在出现之前就完成相关的程序设置可在()事件中进行编程.A:linkopen B:KeyPress C:load D:click42.设计动画通常使用时钟控件()来控制动画速度.A:Enabled B:Interval C:Timer D:Move43.下列哪一种文件打开方式是以顺序文件方式打开文件并作写操作().A:Open "c:\file1.dat"For Output as #1 B:Open "c:\file1.dat" For Input as #1 C:Open "c:\file1.dat" For =Append as #1 D:Open "c:\file1.dat" For Write as #1 44.下列数据类型中,占用内存最小的是().A:Boolean B:Byte C:Integer D:Single45.运行下面的程序: CLSLINE (100,100)-(200,50)LINE - (150,150)LINE -(100,100)屏幕上显示的是().A:三条放射形直线 B:四条放射形直线 C:矩形 D:三角形46.图像框(Image)的何项属性设置为true时,可使图形自动调整大小,填满整个图像框().A:Width B:Picture C:Name D:Stretch47.退出VisualBasic的快捷键是().A:Ctrl+Q B:Shift+Q C:Alt+Q D:Ctrl+Alt+Q48.若要使标签控件显示时,不覆盖其背景内容,应设置标签控件的()属性.A:BACKCOLOR B:BORDERSTYLE C:FORECOLOR D:BACKSTYLE49.如果设计时在属性窗口将命令按钮的()属性设置为False,则运行时按钮从窗体上消失.A:Visible B:Enabled C:DisabledPicture D:Default50.下列关于控件画法的叙述错误的是().A:单击一次工具箱中的控件图标,只能在窗体上画出一个相应的控件B:按住CTRL键后单击一次工具箱中的控件图标,可以在窗体上画出多个相同类型的控件C:双击工具箱中的控件图标,所画控件的大小和位置是固定的D:不用工具箱中的控件工具,不可以在窗体上画出图形对象,但可以写入文字字符51.以下不具有Picture属性对象是().A:窗体 B:图片框 C:图像框 D:文本框52.控件内的对齐方式()属性决定.A:Alignment B:WordWrap C:AtuoSize D:Style53.为使计时器控件每隔5秒钟产生一个计时器事件(Timer事件),则应将其Interval属性值设置为(). A:5 B:500 C:300 D:500054.英文缩写OLE的含义是().A:面向对象程序设计 B:对象链接 C:对象嵌入 D:对象链接与嵌入55.已知A?B?C中C最小,则判断A?B?C可否构成三角形三条边长的逻辑表达式是().A:A>=B And B>=C And C>0 B:A+C>B And B+C>A And C>0C:(A+C)>=C And A-C <=C) And C>0 D:A+B>C And A-B>C And C>056.如果在图片框上使用绘图方法绘制一个实心圆,则图片框的()属性决定了该圆的颜色.A:BackColor B:ForeColor C:FillColor D:DrawStyle57.当用户改变滚动条的value 属性时将激发滚动条的()事件.A:change B:scroll C:change 和scroll D:gotfocus58.定义货币类型数据应该用关键字().A:SINGLE B:DOUBLE C:CURRENCY D:BOOLEAN59.一个对象可以执行的动作和可被对象识别的动作分别称为().A:事件、方法 B:方法、事件 C:属性、方法 D:过程、事件60.Visual Basic 6.0中任何控件都有的属性是().A:BackColor B:Caption C:Name D:BorderStyle61.设执行以下程序段时依次输入11、33、55,执行结果为Dim a(4) As Integer, b(4) As IntegerFor K = 0 To 2a(K + 1) = Val(InputBox("请输入数据"))b(3 - K) = a(K + 1)Next KPrint b(K)A:11 B:33 C:55 D:062.若有数组说明语句为:Dim a(-3 to 8),则数组a包含元素的个数是().A:5 B:8 C:11 D:1263.VB应用程序保存在磁盘上,至少会有以()为扩展名两个文件.A:.DOC和.TXT B:.COM和.EXE C:.VBW和.BAS D:.VBP和.FRM64.下列有关控件数组与一般控件的区别的叙述中,最合理的是A:控件数组一定由多个同类型的控件组成,一般控件只有一个控件;B:控件数组的Index为0,而一般控件的Index为空;C:控件数组的Index为1,而一般控件的Index为0;D:控件数组的建立通过Dim语句声明,而一般控件不必声明.65.若要清除列表框的所有内容,可用什么方法实现A:RemoveItem B:Cls C:Clear D:以上均不可以66.选择和循环结构的作用是().A:控制程序的流程 B:提高程序的运行速度 C:便于程序的阅读 D:方便程序的调试67.可以删除字符串尾部空白的函数是().A:Ltrim B:Rtrim C:Trim D:Mid68.在窗体上画一个名称为Command1的按钮,并有下面程序,当按下Command1按钮后,程序输出的结果是Private Sub Command1_Click()Dim a%, b%a = 50:b = 100Print "调用前", "A="; a, "B="; bSwap a, bPrint "调用后", "A="; a, "B="; bEnd SubPrivate Sub Swap(ByVal x%, y%)Dim t%t = x: x = y: y = tEnd SubA:调用前A=50 B=100 调用后A=50 B=100B:调用前A=50 B=100 调用后A=100 B=50C:调用前A=50 B=100 调用后A=50 B=50D:调用前A=50 B=100 调用后A=100 B=10069.以下几项中,属于日期型常量的是().A:"10/10/02" B:10/10/02 C:#10/10/02# D:{10/10/02}70.当输入4时,以下程序的输出结果是______.Private Sub Command1_Click()x=InputBox(x)If x^2<15 Then y=1/xIf x^2>15 Then y=x^2+1Print yEnd SubA:4 B:17 C:18 D:2571.Sub过程与Function过程最根本的区别是A:Sub过程可以有参数,Function过程不可以 B:Function过程可以有参数,Sub过程不可以C:两种过程参数的传递方式不同 D:Sub过程的过程名不能返回值,而Function过程能通过过程名返回值72.执行下面程序段后,变量a的值为______.For I=1 To 3For j=1 To IFor k=j To 3a=a+1Next kNext jNext IA:3 B:9 C:14 D:2173.Integer类型的数据由_ _____字节组成.A:1 B:2 C:3 D:474.在Visual Basic中,最简单的数据类型包括______.A:整型、实型、布尔型、字符型 B:整型、实型、字符型C:整型、实型、逻辑型 D:实型、逻辑型、字符型75.以下操作不能运行程序的是().A:单击工具栏上的"启动"按钮 B:直接按键盘的<F5>键C:单击"运行"菜单的"启动"命令 D:AlT+ F5键76.执行下面的程序段后,x 的值为()x=5For i=1 To 20 Step 2x=x+i\5Next iA:21 B:22 C:23 D:2477.表达式Len("123程序设计ABC")的值是A:10 B:14 C:20 D:1778.下面关于对象的描述中,错误的是().A:对象就是自定义结构变量 B:对象代表正在创建的系统中的一个实体C:对象是一个状态和操作(或方法)的封装体 D:对象之间的信息传递是通过消息进行的79.数学表达式x>y>z的正确VB逻辑表达式是______.A:x>y And <z B:x>y>z C:x>y And >z D:x>y And y>z80.文本框所没有的属性是().A:Enabled B:Visible C:BackColor D:Caption81.下列选项中,属于Visual Basic 6.0程序设计方法的是().A:面向对象、顺序驱动 B:面向对象、事件驱动C:面向过程、事件驱动 D:面向过程、顺序驱动82.下面是()合法的字符常数.A:ABC$ B:"ABC" C:'ABC' D:ABC83.如下程序:Public Sub Proc(a%())Static I%Doa(I) = a(I) + a(I + 1)I = I + 1Loop While I < 2End SubPrivate Sub Command1_Click()Dim m%, I%, x%(10)For I = 0 To 4: x(I) = I + 1: Next IFor I = 0 To 2: Call Proc(x): Next IFor I = 0 To 4: Print x(I);: Next IEnd SubA:3 4 7 5 6 B:3 5 7 9 5 C:2 3 4 4 5 D:4 5 6 7 884.inputBox函数返回值的类型为().A:数值 B:字符串 C:变体 D:数值或字符串(视输入的数据而定) 85.VB的过程有三种,它们是().A:事件过程、子过程和函数过程 B:Sub过程、Function过程和Property过程C:事件过程、函数过程和属性过程 D:Sub过程、函数过程和通用过程86.如果一个整型变量定义后未赋值,则该变量的缺省值为().A:8 B:"" C:1 D:087.在窗体上画一个名称为Label1、标题为"VisualBasic考试"的标签,两个名称分别为Command1和Command2、标题分别为"开始"和"停止"的命令按钮,然后画一个名称为Timer1的计时器控件,并把其Interval属性设置为500. 编写如下程序:Private Sub Form_Load()Timer1.Enabled = FalseEnd SubPrivate Sub Command1_Click()Timer1.Enabled = TrueEnd SubPrivate Sub Command2_Click()Timer1.Enabled = FalseEnd SubPrivate Sub Timer1_Timer()If Label1.Left < Width ThenLabel1.Left = Label1.Left + 120ElseLabel1.Left = 0End IfEnd Sub程序运行后,单击"开始"按钮,标签在窗体中移动. 对于这个程序,以下叙述中错误的是A:标签的移动方向为自左向右 B:单击"停止"按钮后再单击"开始"按钮,标签从停止的位置继续移动C:当标签全部移出窗体后,将从窗体的另一端出现并重新移动 D:标签每隔1秒移动一次88.运行下面程序后,在窗体中显示的是______.Private Sub Form_Click()a$="*": b$="$"For k=1 To 3x$=String$(Len(a$)+k,b$)Print x$;Next kPrintEnd SubA:*** ** **** B:*$*$*$ C:1*$2*$3*$ D:$$$$$$$$$89.表达式4+5 \ 6 * 7 / 8 Mod 9 的值是().A:4 B:5 C:6 D:790.以下程序的输出结果是______.Private Sub Command1_Click()a=100Dos=s+aa=a+1Loop Until a>100print aEnd SubA:100 B:120 C:201 D:10191.若要使命令按钮不可操作,要对()属性进行设置.A:Enabled B:Visible C:BackColor D:Caption92.下面4项中合法的单精度型变量是A:num! B:sum% C:xinte$ D:mm#93.要使某控件在运行时不可显示,应对()属性进行设置.A:Enabled B:Visible C:BackColor D:Caption94.如下数组声明语句:Dim a(3,-2 To 2,5),则数组a包含的元素的个数为A:120 B:75 C:60 D:1395.执行语句For i=1 To 3:i=i+1:Next i后,变量i的值是().A:3 B:4 C:5 D:696.写出如下程序运行结果.Function f(m As Integer) As Integerb = 1Static c As Integerb = b + 1c = c + 1f = m * b * cEnd FunctionPrivate Sub Command1_Click()Dim a As Integera = 2sum=0For I = 1 To 3sum=sum+ f(a)Next Iprint sumEnd SubA:12 B:16 C:20 D:2497.在Visual Basic中最基本的对象是(),它是应用程序的基石,是其他控件的容器.A:文本框 B:命令按钮 C:窗体 D:标签98.当运行程序时,系统自动启动窗体的事件过程是().A:Load B:Click C:UnLoad D:GotFocus99.要获得用户在组合框输入的内容,应利用的组合框的属性是A:List B:Selected C:ListIndex D:Text100.要想从子过程调用后返回两个结果,下面子过程语句说明合法的是A:Sub f2(ByVal n%,ByVal m%) B:Sub f1(n%,ByVal m%)C:Sub f1(n%,m%) D:Sub f1(ByVal n%,m%)101.在顺序文件中______.A:文件中按每条记录的记录号从小到大排序B:文件中按每条记录的长度从小到大排序C:文件中按记录的某关键数据项的从小到大的顺序D:记录是按写入的先后顺序存放的,读出也是按写入的先后顺序读出102.在窗体上添加一个命令按钮,编写如下代码:Private Sub Command1_ClickDim Arr1(10) as Integer ,Arr2(10) As IntegerN=3For i=1 to 5Arr1(i)=iArr2(n)=2*n+iNext iPrint Arr2(n), Arr1(n)End Sub程序运行后,单击命令按钮,输出结果是A:11 3 B:3 11 C:13 3 D:3 13103.设菜单中有一个菜单项为"Open".若要为该菜单命令设置访问键,即按下ALT及字母O 时,能够执行Open命令,则在菜单编辑器中设置"Open"命令的方式是:A:把Caption属性设置为&Open B:把Caption属性设置为O&penC:把Name属性设置为&Open D:把Name属性设置为O&pen104.为了使一个窗体从屏幕上消失但仍在内存中,所使用的方法或语句为().A:Show B:Hide C:Load D:UnLoad105.指令"Circle(1000,1000),500,8,-6,-3"将绘制A:画圆 B:椭圆 C:圆弧 D:扇形106.以下叙述错误的是:A:下拉式菜单和弹出式菜单都用菜单编辑器建立B:如果把一个菜单项的Enabled属性设置为False,则菜单项不可见C:除分隔线外,所有菜单项都能接收Click事件D:内缩符号由4个点组成,它表明菜单项所在的层次107.下面程序运行时,内层循环的循环总次数是 .For m = 1 To 3For n = 0 To m - 1Next nNext mA:4 B:5 C:6 D:7108.Cls方法可清除窗体或图片框中的信息是 .A:Picture属性设置的背景图案 B:在设计时放置的控件C:程序设计时产生的图形和文字 D:以上方法都对109.在下面选项中,不能完成对顺序文件的读操作的是______.A:LineInput#语句 B:Input#语句 C:Input()函数 D:Get#语句110.设有如下变量声明Dim TestDate As Date为变量TestDate正确赋值的表达方式是A:TestDate=#1/1/2008# B:TestDate=#"1/1/2008"#C:TestDate=date("1/1/2008") D:TestDate=Format("m/d/yy","1/1/2008") 111.下面子过程语句说明合法的是().A:Sub f1(ByVal n%( )) B:Sub f1(n%) As IntegerC:Function f1%(f1%) D:Function f1%( ByVal n%)112.在窗体中添加两个文本框Text1和Text2,一个命令按钮Command1,编写如下事件过程: Private Sub Command1_Click()x = 0Do While x < 10x = (x - 2) * (x + 3)n = n + 1LoopText1.Text = Str(n) : Text2.Text = Str(x)End Sub程序运行后,单击命令按钮,在两个文本框中显示的值分别为()A:1 和 0 B:3 和 50 C:2 和 24 D:4 和 68113.在下列说法中,正确的是A:通过适当的设置,可以在程序运行期间,让时钟控件显示在窗体上B:在列表框中不能进行多项选择C:在列表框中能够将项目按字母顺序从大到小排列D:框架也有Click和DblClick事件114.下来程序段执行结果为x = 5y = -6if not x > 0 then x = y - 3Else y = x + 3print x - y;y - xA:-3 3 B:5 -9 C:3 -3 D:-6 5115.下面程序段输出的结果是Private Sub Command1_Click()x = 8For i = 0 To 20 Step 5x = x + iNextPrint "X="; xEnd SubA:X=210 B:X=218 C:X=50 D:X=58116.标签的()属性设置为True时,标签控件的大小随标题文字自动调整.A:AutoSize B:Caption C:Alignment D:BackStyle117.设x=4,y=6,则以下不能在窗体上显示出"A=10"的语句是A:Print A=x+y B:Print"A=";x+y C:Print "A="+Str(x+y)D:Print"A="&x+y118.下面程序段:Dim mm=Int((Rn((D)+1)+5Select Case mCase 6Print"优秀"Case 5Print"良好"Case 4Print"通过"Case ElsePrint"不通过"End Select显示的结果是A:优秀 B:良好 C:通过 D:不通过答案:A119.在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后编写如下程序: Private Sub Command1_Click()Dim x, y, z As Integerx = 5y = 7z = 0Text1.Text = ""Call P1(x, y, z)Text1.Text = Str(x) & Str(z)End SubSub P1(ByVal a As Integer, ByVal b As Integer, c As Integer)a=a+1b=b+1c = a + bEnd Sub程序运行后,如果单击命令按钮,则在文本框中显示的内容是A:5 14 B:6 14 C:5 0 D:6 0120.表达式 15 Mod 4 + 13 \ 5 * 2 的值是A:0 B:2 C:4 D:7121.确定一个窗体或控件大小的属性是().A:Width 和Height B:Width 和Top C:Top 和right D:Top 和 Left 122.执行下面程序段后,变量x的值为______.x=5For I=1 To 20 step 2x=x+I\5Next IA:21 B:22 C:23 D:24123.设a=3,b=5,则以下表达式值为真的是().A:a>=b And b>10 B:(a>b)Or(b>0) C:(a<0)Eqv(b>0) D:(-3+5>a)And(b>0) 124.假定时钟控件的Interval属性为1000,Enabled属性为True,并且有下面的事件过程,计算机将发出Beep声的次数是Sub Timer1_Timer()For i=1 To 10BeepNext iEnd SubA:1000次 B:10000次 C:10次 D:以上都不对125.赋值语句:b=12+MID("1234",3,2)执行后,b变量中的值是A:"12334" B:123 C:34 D:46126.要判断"命令按钮"是否被鼠标单击,应在"命令按钮"的事件中判断.A:Chang B:KeyDown C:Click D:KeyPress127.下列循环能正常结束循环的是A:i=5Doi=i+1Loop Until i<0B:i=1Doi=i+2Loop Until i=10C:i=10Doi=i+1Loop Until I>0D:i=6Doi=i-2Loop Until I=1128.以下程序输出的结果是:Private Sub Form_Activate()Dim aa=Array(1,2,3,4,5)For i=Lbound(((A) To Ubound(((A)A(i)=i*a(i)Next iPrint i, Lbound(((A) , Ubound(((A) , a(i)End SubA:4 0 4 20 B:5 0 4 20 C:不确定 D:程序出错129.复选框的Value属性为1时,表示___.A:复选框未被选中 B:复选框被选中 C:复选框内有灰色的勾 D:复选框操作方式"错误" 130.在下列表达式中,非法的是______.A:a=b+c B:a>b+c C:a≠b>c D:a<b+c131.可以惟一标识控件数组中的每一个控件属性的是A:Name B:Caption C:Index D:Enabled132.有以下程序:Option Base 1Dim arr() As IntegerPrivate Sub Form_Click()Dim i As Integer,j As IntegerReDim arr(3,2)For i=1 To 3For j=1 To 2arr(i,j)=i*10+jNext jNext iReDimPreserve arr(3,4)For j=3 To 4arr(3,j)=10*j+5Next jPrint arr(3,2);arr(3,4)End Sub程序运行后,单击窗体,输出结果为A:0 22 B:31 35 C:32 45 D:0 0133.以下程序Option Base 1Private Sub Command1 _Click()Dim a%(3,3)For j=1 To 3If j>1 And i>1 Thena(i,j)=a(a(i-1,j-1),a(i,j-1))+1Elsea(i,j)=i*jEnd IfPrint a(I,j);"";Next jPrintNext iEnd Sub输出结果是A:1 2 32 3 13 2 3B:1 2 31 2 31 2 3C:1 2 32 4 63 6 9D:1 1 12 2 23 3 3134.在窗体上添加一个命令按钮,编写如下代码:Option Base 1Private Sub Command1_ClickDim a(10) As Integer,p(3) As Integer k=5For i=1 To 10a(i)=iNext iFor i=1 To 3p(i)=a(i*i)Next ik=k+p(i)*2Next iPrint kEnd Sub程序运行后,单击命令按钮,输出结果是A:35 B:28 C:33 D:37135.已知A$="12345678",则表达式Val(Left$(A $,4)+Mid$(a $,4,2))的值为A:123456 B:123445 C:8 D:6136.为了给x,y,z这3个变量赋初值3,下面正确的赋值语句是A:x=3:y=3:z=3 B:x=3,y=3,z=3 C:x=y=z=3 D:xyz=3137.表达式Abs(-5)*5\5/5的值是A:-25 B:25 C:5 D:1138.假设在图片框Pictrue1中装入一个图形,为了清除该图形(不删除图片框),应采用的正确方法是: A:选择图片框,然后按Delete键. B:执行语句Pictrue1. Pictrue=LoadPictrue("")C:执行语句Pictrue1. Pictrue="" D:选择图片框,在属性窗口选择Pictrue1属性,然后安回车键139.下面4项中不属于面向对象系统三要素的是().A:变量 B:事件 C:属性 D:方法140.如下程序:Private Sub Command1_Click()Print p1(3,7)End SubPublic function p1!(x!,n%)If n=0 ThenP1=1ElseIf n Mod 2=1 ThenP1=x*p1(x,n\2)ElsePl=pl(x,n\2)\xEnd IfEnd IfEnd Function运行的结果是A:18 B:7 C:14 D:27141.表达式16/4-2^5*8/4MOD5\2的值为A:14 B:4 C:20 D:2142.引用列表框(List1)最后一个数据项应使用的语句是()。