2009年12月26日省二级VB试卷及答案)
2009年12月26日省二级VB试卷
5630001：
一选择题20题（50分）
1．以下叙述中错误的是（）A
A运行一个工程时，首先显示FORM1窗体
B窗体的Enabled属性用于设置窗体及窗体上的控件是否响应事件
C打开一个工程同时也打开其所含的多个窗体和标准块文件
D窗体LOAD事件中的Print方法是否有效要取决于窗体AutoRedraw属性的设置
2．在“通用声明“段中用以下语句定义数组A的元素个数是（）D
Option base 1
Dim A%(4,-1 to 3,3)
A 80
B 36
C 120
D 60
3．VB中能表示X不属于[0,10]的表达式（）B
A x<0:x>10
B not (x>=0 and x<=10)
C x<0 and x>10
D 10 4．设a=”李大纲”,以下（）语句输出的结果为“李”。C A mid(a,1,2) B left(a,2) c mid(a,1,1) D mid(a,0,2) 5.函数format(2345.678,”##,##0.00”)输出的结果是（）A A字符型2,345.68 B 数字型2,345.68 C数字型2345.68 D 字符型2345.67 6．窗体上有一命令按钮command1，编写如下事件过程： Private sub command1_click() X=val(inputbox(“x=”)) Y=val(inputbox(“y=”)) Print x+y End sub 运行后，单击命令按钮，先后在两个输入对话框中输入123和321，窗体显示的内容是（）D A123+321 B 123321 C 出错信息D 444 7．窗体的（）属性设置在程序运行时才起作用。B A caption B top C BorderStyle D Backcolor 8．下列叙述错误的是（）A A键盘Keypress事件可接收键盘所有键的信息 B键盘KeyDown事件不区分大小写字母 C键盘KeyPress事件区分大小写字母 D键盘KeyDown事件可接收键盘所有键的信息 9．下列（）方法可改变窗体坐标轴的方向、坐标原点的位置和坐标的度量单位。A Ascale B Point C Past Dline 10．下列复选框Check1被选中但无效的语句的（）C A check1.value=1 Bcheck1.Value=False C check1.value=2 D check1.Enabled=False 11．通过对命令按钮的（）属性设计以决定按下Esc键是否有效。D A visible B style C Default D Cancel 12．使用（）语句可将组合框combo1的文本框中的内容添加在第1项前。B A combo1.additem combo1.listindex,0 B combo1.additem combo1.text,0 C combo1.additem combo1.listindex,1 D combo1.additem combo1.text,1 13．使用滚动条控件的时候，下面说法不正确的是（）B A当滚动条的Value 值发生一次变化就触发一次change事件 B当拖动滚动块时只触发scroll事件 C滚动条的value值属于[min,max]范围 D拖动滚动块时可同时触发scroll和change事件。 14．下列叙述中，正确的是（）A A在keyup事件中，主键盘上“1”和小键盘上“1”键被视为不同的键 B所有对象均能接受键盘事件 C在keyDown事件中，可以识别A和a键的输入 Dkeypress事件中可以识别键盘上任意键码 15．如下程序段的功能是：从键盘上输入一字符串后，在窗体上反向显示其内容，如输入“abcd”，显示“dcba”。 Private sub command1_click() Dim i%,n%,s$,c$ C=”” S=inputbox(“请输入字符串:”) [1] For i=1 to n C=[2] Next i Print c End sub 程序的空缺处[1]和[2]应分别填写（）。A A n=len(s) 和mid(s,I,1)+c B n=len(s)和c+mid(s,I,1) C n=len(s)和c+mid(s,n,i) D n=left(s)和mid(s,I,1)+c 16.执行下列程序的第K次外循环结束后（即对i=k时，for j=1 to k step 2……next j循环结束后），j的值是（）。A Dim i%,j%,s! S=1 For i=1 to 50 For j=1 to I step 2 S=s+j Next j,i Print s A 2*(k\2)+1 B k+1 C k+2 D 2*((k+1)\2)+1 17.能使整型数组a(6)元素个数加1，但保留数组中原有元素的语句是（）C A redim preserve a(7) as string B static a(7) C redim preserve a(7) D redim a(7) 18.阅读如下程序： Private sub command1_click() Dim x,y%,z as integer X=6 Y=9 Z=0 Text1.text=”” Call p1(x,y,z) Text1.text=z End sub Sub p1(byval a$,byval b$,c%) C=a+b End sub 运行上面的程序，单击命令按钮command1，则在文本框中显示的内容是（）。D A 程序出错 B 15 C 0 D 69 19．下列叙述中，正确的是（）C A调用通用对话框控件的showopen方法，可以直接打开在该通用对话框中指定的文件B运行时，通用对话框控件是可见的 C在同一个程序中，用不同的方法打开的通用对话框具有不同的作用 D不能用通用对话框控件的方法打开“打印机”对话框 20．改变驱动器列表框的（）属性可激活change事件。 A drive B list C chdrive D index 5630501 1 下列属于容器的控件是（）。B A ListBox B PictureBox C Image D TextBox 2 以下（）的变量可以被该窗体其它过程引用。C A 在窗体某过程中用Static语句定义 B在窗体Load事件中用Dim语句定义 C在窗体“通用声明”段中用Dim语句定义 D在窗体某过程中用Public语句定义 3 VB中能表示x不属于[0，10]的表达式是（）。C A x < 0 : x >10 B x < 0 And x > 10 C not (x >= 0 and x < =10) D 10 < x < 0 4 以下（）函数输出的结果为数值型。C A inputBox B format C ASC D String 5 下列叙述中，错误的是（）。C A 在同一行上书写多条语句应在两两语句中加上:号 B VB程序代码不区分字母的大小写 C 一条语句可以分为多行书写,但要在上行末加上VBCrLf D 可以用Rem或'注释单行语句 6 下列关于MsgBox函数的叙述，不正确的是（）。C A 可以省略任何参数 B 可以指定消息框的默认按钮 C 函数调用后返回值为数值型 D可以设定消息框的指定图标 7 程序运行时，不是由系统触发的事件是（）。C A Activate B Initialize C MouseMove D Load 8 下列叙述错误的是（）。A A 文本框ScrollBars属性值为2时，才能使文本框显示多行内容 B 设置文本框的MaxLength属性，可限制其输入文本的最大长度 C 当文本框的内容发生变化时，必将触发Change事件 D 当光标从文本框中移走时，发生LostFocus事件 9（）语句不能清除图片框Picture1中用Print显示的文本和用Circle 绘制的图形。A A Picture1.Clear B Picture1.Cls C Picture1.Picture = LoadPicture() D Picture1.Refresh 10 下列对框架控件的叙述，错误的是（）。A A 在某控件上画框架，就可将控件置于该框架内 B 通过拖动框架以判断一个控件是否置于该框架内 C 在框架内画控件，才能使控件置于该框架内 D 将一组单选按钮置于一个框架内使其只能选中其中之一 11 通过对命令按钮的（）属性设置以决定按下Esc键是否有效。A A Cancel B Default C Style D Visible 12 使用下列（）语句可删除组合框Combo1中选定的项。A A Combo1.RemoveItem Combo1.ListIndex B Combo1.RemoveItem Combo1.List(ListIndex) C Combo1.RemoveItem Combo1.Text D Combo1.RemoveItem Combo1.List(Index) 13 使用滚动条控件的时候，下面说法不正确的是（）。D A 当滚动条的Value值发生一次变化就触发一次Change事件 B 滚动条的Value值属于[Min，Max]范围 C 拖动滚动块时可同时触发Scroll和Change事件 D 当拖动滚动块时只触发Scroll事件 14 在文本框上输入"abcd"字符串，变量st的内容是（）。C Dim st As String Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer) st = Chr(KeyCode) + st End Sub A ABCD B D C DCBA D abcd 15 :1~100自然数在窗体上显示，且每行显示5个自然数。D Dim i%, n% For i = 1 To 100 【1】 n = n + 1 If 【2】Then Print Next i 程序的空缺处【1】和【2】应分别填写（）。 A Print i和n \ 6 = n / 6 B Print i,和n \ 5 = n / 5 C Print i,和n mod 4 = 0 D Print i和n mod 5 = 0 16 1!、2!、……10!的值。 Dim i as Integer 【1】 s = 1 For i = 1 To 10 s = s * i 【2】 Next i 程序的空缺处【1】和【2】应分别填写（）。D A Dim s As Long 和Print s B Dim s As Integer 和Print s; C Dim s As Integer 和Print s, D Dim s As Long 和Print s; 17 声明语句应为（）。C 1.5 2.1 4.8 7.3 2.8 3.5 2.4 6.8 5.2 7.2 8.1 7.3 A Dim a(1 To 3,1 To 4) As Integer B Dim a(3,4) As Single C Dim a(2,3) As Single D Dim a(12) As Single 18 Command1，编写如下事件过程：A Sub p1(b() As Integer) Dim n% For i = UBound(b) To LBound(b) Step -1 Print b(i); n = n + 1 If n \ 3 = n / 3 Then Print Next i End Sub Private Sub Command1_Click() Dim a%(5) For i = 0 To 5 a(i) = (i + 1) ^ 2 End Sub A 1 4 9 16 25 36 B 36 25 16 9 4 1 C 1 4 9 16 25 36 D 36 25 16 9 4 1 19 下列关于菜单叙述，错误的是（）。A A 要把非顶级某菜单项设为分隔线,只要将该菜单项的标题设为"-",名称可省略 B 菜单项是一个控件,它具有外观和行为的属性 C 将下拉式菜单的顶级菜单项的Visible属性设为False,才可以作为弹出式菜单 D 菜单项的事件只有一个Click事件 20 改变驱动器列表框的（）属性可以激活Change事件。A A ChDrive B Index C List D Drive 563401： 1 以下叙述中错误的是（）。C A 窗体Load事件中的Print方法是否有效要取决于窗体AutoRedraw属性的设置 B 打开一个工程同时也打开其所含的多个窗体和标准模块文件 C 运行一个工程时，首先显示Form1窗体 D 窗体的Enabled属性用于设置窗体及窗体上的控件是否响应事件 2 下列各数据类型的取值范围按从小到大排列的是（）B。 A 长整型，货币型，单精度，双精度 B 整型，长整型，单精度，双精度 C 整型，长整型，双精度，单精度 D 整型，变体型，单精度，双精度 3 下列运算中，优先级最低的是（）。A A 逻辑运算 B 字符运算 C 算术运算 D 关系运算 4 设x="ABC",Y="AB"，函数IIf(x < Y, 1, IIf(x > Y, -1, 0))的返回值是（）。A A 0 B 1 C 出错 D -1 5 函数Format(2345.678, "##,##0.00")输出的结果是（）。B A 字符型2345.67 B 数字型2,345.68 C 字符型2,345.68 D 数字型2345.68 6下列关于MsgBox函数的叙述，不正确的是（）。A A 函数调用后返回值为数值型 B 可以设定消息框的指定图标 C 可以指定消息框的默认按钮 D 可以省略任何参数 7 以下叙述中错误的是（）。C A 任何时刻活动窗体最多只有一个 B Hide方法只是隐藏一个窗体，而不是从内存中清除该窗体 C 所有属性既可以在属性窗口中设置，也可以在程序代码中设置 D 时钟只有系统事件，没有用户事件 8下列（）是所有控件的公共属性。D A Name和Visible B Name和Width C Name和Tag D Name和Enable 9，窗体当前坐标（CurrentX，CurrentY）值为（）。D Line (1000, 1500)-Step(2000, 2500) A (3000, 2500) B (3000, 4000) C (1000, 2500) D (2000, 2500) 10 下列能使单选按钮Option1被选中、复选框Check1未被选中的语句是（）。C A Option1.Value =0和Check1.Value=True B Option1.Value =1和Check1.Value=False C Option1.Value =True和Check1.Value=0 D Option1.Value =False和Check1.Value=1 11 执行语句Command1.Move 500,1000的结果是（）。C A 命令按钮向上移动500、向左移动1000 B 命令按钮向左移动500、向上移动1000 C 命令按钮移动到距屏幕左边界500、上边界1000的位置 D 命令按钮移动到距窗体左边界500、上边界1000的位置 12 设置列表框的MultiSelect为（），通过单击就能选择列表框中多个项。C A 0 B True C 1 D 2 13 Timer1的Interval属性为500，Enabled属性为True，运行以下程序2秒，窗体显示（）。A Dim i% Private Sub Timer1_Timer() i = i + 1 Print String(i, "*"); End Sub A ********** B * C * ** *** **** **** D **************************** 14 设置控件的（）属性，按Tab键可以改变该控件获得焦点的顺序。A A TabIndex B SetFocus C Index D TabStop 15 :从键盘上输入若干学生的考试分数，当输入负数时结束输入，然后输出其中最高分、最低分和平均分。 Private Sub Form_Click() Dim x!, mmax!, mmin!,s!,n% x = val(InputBox("请输入学生的考试分数")) mmax = x: mmin = x:s=x:n=1 Do while x>=0 If 【1】Then mmax = x End If If x < mmin Then mmin = x End If x = val(InputBox("请输入学生的考试分数")) s=s+x n=【2】 Loop Print "Max="; mmax, "Min="; mmin, "s=";s/n End Sub 程序的空缺处【1】和【2】应分别填写（）。A A x > mmax 和n+1 B mmax >x 和n+1 C x > mmin 和n+i D x > mmax 和n+i 16 1!、2!、……10!的值。 Dim i as Integer 【1】 s = 1 For i = 1 To 10 s = s * i 【2】 Next i 程序的空缺处【1】和【2】应分别填写（）。C A Dim s As Long 和Print s B Dim s As Integer 和Print s; C Dim s As Long 和Print s; D Dim s As Integer 和Print s, 17 ，数组声明语句应为（）。B 1.5 2.1 4.8 7.3 2.8 3.5 2.4 6.8 5.2 7.2 8.1 7.3 A Dim a(3,4) As Single B Dim a(2,3) As Single C Dim a(12) As Single D Dim a(1 To 3,1 To 4) As Integer 18 ： Private Sub Command1_Click() Dim x, y%, z As Integer x = 6 y = 9 z = 0 Text1.Text = "" Call p1(x, y, z) Text1.Text = z End Sub Sub p1(ByVal a$, ByVal b$, c%) c = a + b End Sub 运行上面的程序，单击命令按钮Command1，则在文本框中显示的内容是（）。C A 0 B 程序出错 C 69 D 15 19 YU,名称为Edt的弹出式菜单,要使在窗体的空白处右击弹出Edt菜单,使用的程序是（）。B _MouseDown(Button As Integer, Shift As A Integer, X As Single, Y As Single) If Button=1 Then PopupMenu YU End Sub B _MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) If Button=2 Then PopupMenu Edt End Sub C _MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) If Button=1 Then PopupMenu Edt End Sub D _MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) If Button=2 Then PopupMenu YU End Sub 20 盘根目录有一个名为StuD.dat的顺序文件，如要把数据追加到Stud.dat末尾，应先使用（）语句打开它。A A Open "D:\StuD.dat" For Append As #1 B Open "D:\StuD.dat" For Append As #513 C Open "D:\StuD.dat" For Output As #1 D Open D:\StuD.dat For Append As #1 5630402: 1 以下叙述中错误的是（）。D A 用Hide方法隐藏的窗体还在内存中 B 可用Print方法在窗体或图片框上显示表达式内容 C 用Show方法可显示工程中的各窗体 D 可用Cls方法清除窗体或文本框中的文本 2 以下（）的变量可以被该窗体其它过程引用。B A 在窗体Load事件中用Dim语句定义 B 在窗体“通用声明”段中用Dim语句定义 C 在窗体某过程中用Public语句定义 D 在窗体某过程中用Static语句定义 3下列运算中，优先级最低的是（）。A A 字符运算 B 算术运算 C 逻辑运算 D 关系运算 4 以下（）函数输出的结果为数值型。B A format B AS C C inputBox D String 5 用Dim X,Y% 语句定义X和Y,则（）变量。D A X和Y均为整型 B X为可变类型,Y为整型,且X和Y的初值均为0 C X和Y均为可变类型 D X为初值为空的可变类型,Y为初值为0的整型 6 X=MsgBox("Error", vbOKCancel),弹出对话框后按Esc键,变量X的内容为（）。D A 字符型1 B 数值型1 C 数值型2 D 字符型2 7 在文本框中输入文字会发生许多事件，这些事件发生的顺序是（）。A A KeyDown,Keypress,Change B Keypress,KeyUp,Change C KeyUp,Keypress,Change D KeyDown,Change,Keypress 8 下列叙述错误的是（）。D A 键盘KeyDown事件可接收键盘所有键的信息 B 键盘KeyDown事件不区分大小写字母 C 键盘Keypress事件区分大小写字母 D 键盘Keypress事件可接收键盘所有键的信息 9 下列（）语句可绘制扇形。A A Circle (1500, 1500), 500, , -1, -2 B Circle (1500, 1500), 500, 1, ,,2 C Circle (1500, 1500), 500, , 1, 2 D Circle (1500, 1500), 500,-1, -2 10 如果要在单选按钮上显示某个图标，应先将（）。D A Alignment属性设置为1 B Style属性设置为0 C Alignment属性设置为0 D Style属性设置为1 11 通过对命令按钮的（）属性设置以决定按下Esc键是否有效。B A Visible B Cancel C Default D Style 12 要在组合框的文本框中禁止输入内容，Style属性应设置为（）。D A 1 B 0 C True D 2 13 Timer1的Interval属性为500，Enabled属性为True，运行以下程序2秒，窗体显示（）。A Dim i% Private Sub Timer1_Timer() i = i + 1 Print String(i, "*"); End Sub A ********** B * C **** D * ** *** **** 14 下列叙述中，错误的是（）。A A KeyPress能接收所有键盘信息 B KeyPress接收到的是用户通过键盘输入的ASCII码字符 C KeyUp和KeyDown可以接收所有键盘信息 D 当用户按下并释放一个键后,触发事件的顺序是KeyDown、KeyPress、KeyUp 15 :从键盘上输入一字符串后，在窗体上反向显示其内容，如输入"abcd"，显示"dcba"。Private Sub Command1_Click() Dim i%, n%, S$, C$ C = "" S = InputBox("请输入字符串：") 【1】 For i = 1 To n C = 【2】 Next i Print C End Sub 程序的空缺处【1】和【2】应分别填写（）。B A n = Len(S) 和C + Mid(S, i, 1) B n = Left(S) 和Mid(S, i, 1) + C C n = Len(S) 和C + Mid(S, n, i) D n = Len(S) 和Mid(S, i, 1) + C 16 1!、2!、……10!的值。 Dim i as Integer 【1】 s = 1 For i = 1 To 10 s = s * i 【2】 Next i 程序的空缺处【1】和【2】应分别填写（）。C A Dim s As Integer 和Print s; B Dim s As Long 和Print s C Dim s As Long 和Print s; D Dim s As Integer 和Print s, 17 VB的“声明”段有语句Option Base 1,那么用如下语句声明的数组a包含的元素个数为（）。B Dim a(-1 To 2, 3, 4) A 60 B 48 C 80 D 36 18 ： Private Sub Form_Click() Static m%,n% For i = 1 To 2 n = n + i m = m + n ^ 2 Next End Sub 运行时，两次单击窗体，那么第二次单击窗体时m, n的值分别为（）。A A 62,6 B 10,3 C 62,3 D 52,6 19 下列关于菜单叙述，错误的是（）。C A 菜单项的事件只有一个Click事件 B 菜单项是一个控件,它具有外观和行为的属性 C 要把非顶级某菜单项设为分隔线,只要将该菜单项的标题设为"-",名称可省略 D 将下拉式菜单的顶级菜单项的Visible属性设为False,才可以作为弹出式菜单 20 文件列表框中用于设置所选文件路径的属性是（）。B A File B FilePath C Path D FileName 5630408: 1 下列（）语言不属于面向对象的程序设计语言。B A Delphi B C C C++ D VB 2 以下能正确定义数据类型ieBook的是（）。B A TYPE IEbOOK Name As String*8 ie As Integer Type End B TYPE IEbOOK Name As String*8 ie As Integer End Type C Name As String*8 ie As Integer End Type ieBook D Name String*8 ie As Integer End ieBook 3 下列不能判断整型变量x是5的倍数的表达式是（）。B A x/5=x \5 B 5 Mod x = 0 C int(x/5)=x/5 D X Mod 5 = 0 4 以下（）语句能使窗体Form1的背景为黄色。C A Form1.BackColor=vbGreen B Form1.BackColor=RGB(255,0,255) C Form1.BackColor=vbBlue D Form1.BackColor=RGB(255,255,0) 5 下列叙述中，错误的是（）。B A 在同一行上书写多条语句应在两两语句中加上:号 B 一条语句可以分为多行书写,但要在上行末加上VBCrLf C VB程序代码不区分字母的大小写 D 可以用Rem或'注释单行语句 6 X=MsgBox("Error", vbOKCancel),弹出对话框后按Esc键,变量X的内容为（）。A A 字符型2 B 字符型1 C 数值型1 D 数值型2 7 以下叙述中错误的是（）。C A Hide方法只是隐藏一个窗体，而不是从内存中清除该窗体 B 任何时刻活动窗体最多只有一个 C 所有属性既可以在属性窗口中设置，也可以在程序代码中设置 D 时钟只有系统事件，没有用户事件 8 下列（）是文本框所具有的属性。B A Caption B Enabled C AutoSize D Style 9 （）方法可改变窗体坐标轴的方向、坐标原点的位置和坐标的度量单位。A A Scale B Line C Point D Pset 10 如果要在单选按钮上显示某个图标，应先将（）。B A Style属性设置为0 B Style属性设置为1 C Alignment属性设置为1 D Alignment属性设置为0 11 通过对命令按钮的（）属性设置以决定按下Esc键是否有效。B A Style B Cancel C Default D Visible 12 使用下列（）语句可删除组合框Combo1中选定的项。D A Combo1.RemoveItem Combo1.Text B Combo1.RemoveItem Combo1.List(ListIndex) C Combo1.RemoveItem Combo1.List(Index) D Combo1.RemoveItem Combo1.ListIndex 13 使用滚动条控件的时候，下面说法不正确的是（）。A A 当拖动滚动块时只触发Scroll事件 B 当滚动条的Value值发生一次变化就触发一次Change事件 C 滚动条的Value值属于[Min，Max]范围 D 拖动滚动块时可同时触发Scroll和Change事件 14 下列叙述中，错误的是（）。D A 当用户按下并释放一个键后,触发事件的顺序是KeyDown、KeyPress、KeyUp B KeyPress接收到的是用户通过键盘输入的ASCII码字符 C KeyUp和KeyDown可以接收所有键盘信息 D KeyPress能接收所有键盘信息 15 n是否为素数。A Dim i%, n%, t% n = V al(InputBox("n=")) For i = 2 To n \ 2 If n / i = n \ i Then t = 1 【1】 End If Next i If 【2】Then Print "不是素数" Else Print "是素数" 程序的空缺处【1】和【2】应分别填写（）。 A Exit For和t = 1 B Exit For和t = 0 C i = i + 1 和t = 1 D i = i + 1 和t = 0 16 1!、2!、……10!的值。D Dim i as Integer 【1】 s = 1 For i = 1 To 10 s = s * i 【2】 Next i 程序的空缺处【1】和【2】应分别填写（）。 A Dim s As Long 和Print s B Dim s As Integer 和Print s, C Dim s As Integer 和Print s; D Dim s As Long 和Print s; 17 能使整型数组a(6)元素个数加1，但保留数组中原有元素的语句是（）。D A Static a(7) B ReDim Preserve a(7) as String C ReDim a(7) D ReDim Preserve a(7) 18 ： Private Sub Form_Click() Static m%,n% For i = 1 To 2 n = n + i m = m + n ^ 2 Next End Sub 运行时，两次单击窗体，那么第二次单击窗体时m, n的值分别为（）。D A 62,3 B 10,3 C 52,6 D 62,6 19下列关于多文档界面（MDI）的叙述错误的是（）。A A MDI应用程序允许同时显示多个文档，每个文档显示在它自己的窗口中 B MDI窗体中最多只能有一个是活动窗口 C MDI应用程序中只有两种类型的窗体，即父窗体和子窗体 D MDI子窗口被包含在一个大小可调的MDI父窗口内 20 改变驱动器列表框的（）属性可以激活Change事件。C A Index B List C ChDrive D Drive 一、概念填空题 1．在Visaul Basic中,属性窗口分为四个部分，这四个部分分别是（ 1 ）属性显示方式、属性列表和对当前属性的简单解释。 2．组合框有三种不同的风格，它们分别是：( 2 )、( 3 )和( 4 )。3．VB中，当KeyPress事件发生时会返回一个按键的（ 5 ）值。 4. 时钟控件是有规律地以一定的( 6 )激发计时器事件，而执行相应的代码程序。 5．A = 8，B = 3，C = 5，则表达式A MOD 3 + B^3 / C \ 5的值为（ 7 ）。6．声明一个双精度变量Num5，的声明语句是 ( 8 ) 。 7．有一文本框Text1，为了使该文本框在运行时获取焦点，应执行的语句是（ 9 ）。8．在使用动态数组时，如要改变数组的大小而又不丢失数组中的数据，应使用（ 10 ）关键字。 9．Visual Basic逻辑数据类型只有 True 与 False 两个值。当逻辑数据转换成整型数据时，True 转换为（ 11 ），False转换为（ 12 ）。 10．在Visaul Basic 中依据变量的作用范围将VB变量的作用范围分为三类，它们是：（ 13 ）变量、（ 14 ）变量和（ 15 ）变量。 11．在Visual Basic工程中，拥有多个窗体的程序可用（ 16 ）语句将窗体装入内存，用（ 17 ）语句将指定窗体从内存中删除。 12．在Visual Basic中，当坐标系确定后，如果坐标值前加上关键字Step，则坐标值（X，Y）是（ 18 ）坐标。 13．字符串常量是由任何ASCII字符组成，在程序代码中，它必须由（ 19 ）括起来。 14．如果有三个单选按钮直接画在窗体上，另有四个单选按钮画在框架中，则运行时，可以同时选中（ 20 ）个单选按钮。 二、概念选择题 1．不能触发滚动条Change事件的操作是（）。 A) 拖动滚动条的滑块 B) 单击两端箭头 C) 单击滚动条的滑块 D) 单击滚动条的空白处 2．已知变量x 、y为整数型，且x=4 , y=12 ,s为字符型，且s=“a”，Leble1为标签控件，Leble1的Caption属性值为Label1，下列合法的赋值语句是（）。 A) X= Leble1.Caption B) Leble1.Caption=Str(X) C) X*3=Y D) Y=X*S 3．下列可以将变量A、B的值互换的语句是( )。 A) A=B : B=A B) C=B : B=A ：A=C C) A=C : C=B : B=A D) A=(A+B)/2 ：B=(A-B)/2 4．下列叙述中错误的是（）。 A)VB是采用了事件驱动编程机制。 2009年9月全国计算机等级考试二级VB笔试试题及答案 一、选择题（每小题2分，共70分） 一、选择题 1．下列数据结构中，属于非线性结构的是（）。 A. 循环队列 B.带链队列 C.二叉树 D.带链栈 答案C Array解析树均是非线性结构 2. 下列数据结构中,能够按照”先进后出”原则存取数据的是（）。 A. 循环队列 B.栈 C.队列 D.二叉树 答案B 解析:栈是先进后出或后进先出的线性表 3. 对于循环队列,下列叙述中正确的是（）。 A.队头指针是固定不变的 B.队头指针一定大于队尾指针 C.队头指针一定小于队尾指针 D.队头指针可以大于队尾指针，也可以小于队尾指针 答案D 解析:如果队头指针大于队尾指针说明队列已经循环存放数据了,如果队头指针小于队尾指针说明没有进行循环存放 4. 算法的空间复杂度是指（）。 A.算法在执行过程中所需要的计算机存储空间 B.算法所处理的数据量 C.算法程序中的语句或指令条数 D.算法在执行过程中所需要的临时工作单元数 答案A 解析:算法的空间复杂度是指执行算法所需要的内存空间,包括算法程序所占空间,输入的初始数据所占空间和执行过程中所需要的额外空间. 5. 软件设计中划分模块的一个准则是（）。 A. 低内聚低耦合 B. 高内聚低耦合 C. 低内聚高耦合 D. 高内聚高耦合 答案B 解析:模块内部各元素之间的联系要紧密,高内聚,模块间的连接的紧密程度要低,低耦合,这样可以提高模块的独立性. 6.下列选项中不属于结构化程序设计原则的是（）。 A.可封装 B.自顶向下 C.模块化 D.逐步求精 答案A 7.软件详细设计产生的图如下 该图是( ). A.N-S图 B. PAD图 C. 程序流程图 D.E-R图 答案C 8.数据库管理系统是（）。 2007年秋季vb考试真题 1．下面关于比特的叙述中，错误的是( 1 ) A．比特是组成数字信息的最小单位 B．比特只有“0”和“1”两个符号 C．比特既可以表示数值和文字，也可以表示图像和声音 D. 比特”1”总是大于比特“0” 2．在下列有关集成电路的叙述中，错误的是( 2 ) A．现代集成电路使用的半导体材料主要是硅 B．大觑模集成电路一般以功能部件、子系统为集成对象 C．我国第2代居民身份证中包含有IC芯片 D? 目前超大规模集成电路中晶体管的基本线条已小到l纳米左右 3．在下列有关通信技术的叙述中，错误的是( 3 ) A.通信的基本任务是传递信息，因而至少需由信源、信宿和信道组成 B.通信可分为模拟通信和数字通信，计算机网络属于模拟通信 C.在通信系统中，采用多路复用技术的目的主要是提高传输线路的利用率 D?学校的计算机机房一般采用5类无屏蔽双绞线作为局域网的传输介质 4.下面是关于PC机主存储器的一些叙述，其中正确的是( 4 ) A.主存储器是一种动态随机存取存储器(RAM) B.主存储器的基本编址单位是字(即32个二进位) C.目前市场上销售的PC机，其内存容量可达数十GB D.所有PC机的内存条都是通用的：可以互换 5．现行PC机中，IDE(或SATA)接口标准主要用于( 5 ) A．打印机与主机的连接C．声卡与主机的连接 B．显示器与主机的连接D．硬盘与主机的连接 6. 下列有关PC机的CPU、内存和主板的叙述中，正确的是( 6 ) 。 A．大多数Pc机只存一块CPu芯片，即使是“双核”CPU也是一块芯片 B．所有Pentium系列微机的内存条相同，仅有速度和容量大小之分 C．主板上芯片组的作用是提供存储器控制功能，I/O控制与芯片组无关 D．主板上CMOS芯片用于存储CMOS设置程序和一些软硬件设置信息 7.下列有关目前Pc机辅助存储器的叙述中，错误的是( 7 ) A．硬盘的容量越来越大，这是因为硬盘中磁盘碟片的数目越来越多 B．硬盘的内部传输速率一般小于外部传输速率 c．优盘采用Flash存储器技术，属于半导体存储器 D．目前常见COMBO光驱是一种将CD-RW和DVD-ROM组合在一起的光驱 8.下面有关Windows操作系统，(95以后版本)的叙述中，错误的是( 8 ) 。A．Windows操作系统支持系统中多个任务的并发执行 B．利用Whldows附件“系统工具”中的“系统信息”可以查看内存的工作情况 C．系统规定文件名最多由128个字符组成 D．Vista是Microsoft公司推出的Windows XP操作系统的后继版本 9.算法设计是编写程序的基础。下列关于算法的叙述中，正确的是( 9 ) 。 A．算法必须产生正确的结果C．算法可以没有输出 B．算法必须具有确定性D．算法的表示必须使计算机能理解 10．因特网使用TCP／IP协议实现全球范围的计算机网络互连，连接在因特网上的每一台主机 【HNCE网上考试系统 v9.6】本套软件使用权属于：郑州大学 考试课程: 考试时间:100分钟考场:第一考场考试日期:2013.05.24 考号：姓名：剩余时间：99:42 保存交卷退出帮助 A B C D A B C D A B C D A B C D A B C D A B C D A B C D A 命令 B 命令 C 命令 D 命令 A B C D A B C D A B C D A B C D A B C D A B C D A B C D A 模块文件 B 件的属性 C 源文件 D 包含多个工程文件及属于该工程的其他文件 A 该窗体文件并没有被删除 B 窗体文件被删除 C 程仍然包含这个窗体 D A B C D A B C D A B C D A B C D A可以实现交换两个变量值，而S2不能 B 个变量值，而S1不能 C 现交换两个变量值 D 现交换两个变量值 A B C D A B C D A 过程调用后均不保存值 B 有变量都是Static型的变量 C 所有变量都是Private型的变量 D 所有变量都是非全局Public A 用Dim语句或Static语句声明的变量 B 明它的过程 C Static语句声明的 D 程执行完毕后就被释放了 A B C D A B C D A B C D A B C D 声明段 A B C D A B C D A B C D A B C D A B C D A B C D A 同 B Sub过程不可以 C 值，而Function过程能通过过程名返回值 D 或直接使用过程名调用，而 A工程中可以有多个窗体，但最多只能有一个窗体作为启动窗体 B 声明Public类型的变量来传递数据 C 大化、最小化或正常（保持设计时大小）等三种状态 D A 菜单 B 过程代码都放在窗体文件中 C 名必须相同 D 是设计阶段时显示的位置 1.设计一个如图所示的成绩录入程序。要求利用文本框的lost focus事件检查录入的成 绩是否有效。如果录入的成绩介于0~100之间则可以继续输入，否则清除原数据，并且要求重新输入。底部的5个复选框用来设置参加合计的课程成绩。 2.设计一个用户界面如图所示，用于将学生学习的课程在列表框中显示出来，要求程序 有以下功能： a)单击“添加”按钮，若文本框“Text1.text”中不是空格串，并且在列表中也没 有，则将课程添加到列表框中去。 b)单击“删除”按钮，删除列表框中被选中的并显示在文本框中的课程名称。 c)单击“统计”按钮，统计课程列表框中的课程数量，并显示在文本框“Text2.text” 中。 d)单击“结束”按钮，结束程序运行。 3.设计一个偶数迁移程序，运行界面如图所示。要求如下： a.单击“产生”按钮，随机产生10个两位正整数，并添加到左边的列表框(list1)中。 b.单击“→”按钮，或双击list1,将list1中的所有偶数迁移到list2中。 c.单击“清除”按钮，清除list1和list2中所有的项目。 4. 设计如图所示窗体form1,在窗体上画一个名称为lst的列表框，通过属性窗口向列表框添加“中国”、“日本”、“新加坡”、“澳大利亚”、“美国”五个项目；在列表框右侧上方画一个名称为text1的文本框，并使其内容空白；在文本框下方画两个名称分别为c1和c2、标题分别为“修改”和“添加”的命令按扭。程序运行时要求：单击“修改”按钮时文本框text1中显示列表框中选中项目内容，同时列表框移除该项；单击“添加”按钮时，将文本框修改后的内容添加在列表框中列表的末尾。保存窗体文件xg.frm,工程文件为xg.vbp. 5. 设计如图所示窗体form1,在窗体左边画两个名称为t1、t2的文本框，文本框内显示空白；在窗体右下方画一个名称为c1的命令按扭，按扭的标题为“复制”。编写适当的事件过程，使得在运行时，选定t1中任意文本后，单击命令按扭c1,文本框t2中显示t1中所选定的文本。 站长提醒广大考生：下面的138道题目，在二级考试中命中率极高。 一、选择题 (1) 下面叙述正确的是(C) A. 算法的执行效率与数据的存储结构无关 B. 算法的空间复杂度是指算法程序中指令（或语句）的条数 C. 算法的有穷性是指算法必须能在执行有限个步骤之后终止 D. 以上三种描述都不对 (2) 以下数据结构中不属于线性数据结构的是(C) A. 队列 B. 线性表 C. 二叉树 D. 栈 (3) 在一棵二叉树上第5层的结点数最多是(B) 注：由公式2k-1得 A. 8 B. 16 C. 32 D. 15 (4) 下面描述中，符合结构化程序设计风格的是(A) A. 使用顺序、选择和重复（循环）三种基本控制结构表示程序的控制逻辑 B. 模块只有一个入口，可以有多个出口 C. 注重提高程序的执行效率 D. 不使用goto语句 (5) 下面概念中，不属于面向对象方法的是(D) 注：P55-58 A. 对象 B. 继承 C. 类 D. 过程调用 (6) 在结构化方法中，用数据流程图（DFD）作为描述工具的软件开发阶段是(B) A. 可行性分析 B. 需求分析 C. 详细设计 D. 程序编码 (7) 在软件开发中，下面任务不属于设计阶段的是(D) A. 数据结构设计 B. 给出系统模块结构 C. 定义模块算法 D. 定义需求并建立系统模型 (8) 数据库系统的核心是(B) A. 数据模型 B. 数据库管理系统 C. 软件工具 D. 数据库 (9) 下列叙述中正确的是(C) A.数据库是一个独立的系统，不需要操作系统的支持 B.数据库设计是指设计数据库管理系统 C.数据库技术的根本目标是要解决数据共享的问题 D.数据库系统中，数据的物理结构必须与逻辑结构一致 (10) 下列模式中，能够给出数据库物理存储结构与物理存取方法的是(A) 注：P108 计算机等级考试（二级VB）模拟试题二 第一部分计算机基础知识 1．是我国安全部开发的一种检测和消除计算机病毒的杀毒软件。 A．Kill B．Scan C．Vsafe D．WPS 2．用n位二进制来表示一个整数的补码，用最高位作为符号位，其整数的表示范围是. A．-2n-1～+2n-1-1 B．-2n-1+1～+2n-1 B．-2n-1～+2n-1D．-2n～+2n-1 3．下列四个数中最大的数是。 A．十进制数1789 B．十六进制数IFF C．二进制数10100001 D．八进制数227 4．存储器体系由不同类型的存储器组成多层结构，按存取速度从快到慢的是。 A．快存、辅助、主存、海量存储器B．光盘、主存、辅助、海量存储器 C．快存、主存、辅助、海量存储器D．DVD、主存、辅助、海量存储器 5．高级语言采用解释方式时的执行速度与采用编译方式时的执行速度相比，下列是正确的。 A．相等B．前者快C．前者慢D．不能确定 6．设汉字字库包括全角符号和一、二级汉字共8000个，进入汉字操作系统调用16x15点阵汉字库，且全部常驻内存中，则内存开销约为。 A．640KB B．1.47KB C．240KB D．70KB 7．下列软件中，不属于应用软件的是。 A．字表处理软件B．财务管理软件 C．股市分析软件D．高级语言编译程序 8．传送速率单位“bps”代表的意义是。 A．Bytes Per Second B. Bits Per Second C．Band Per Second D. Billion Per Second 9．软件需求分析一般应确定的是用户对软件的。 A. 功能需求 B. 非功能需求 C. 性能需求 D. 功能需求和非功能需求 10．计算机网络中的拓扑结构是一种。 A．实现异地通信方案B．理论概念 C．设备在物理上的连接形式D．传输信道的分配 11．E-mail地址中@后面的内容是指。 A．收信服务器名称B．寄信服务器名称 C．帐号D．密码 12．如果用户正在用到3个文件夹，每个文件夹至少含有4个文件，若想不移动文件，工作却更方便，应当。 A．在桌面上右击鼠标，为这些文件夹建立快捷键 B．把这些文件夹增加到快捷文件夹中去 全国高等学校（安徽考区） 计算机水平考试试卷B （二级 Visual Basic 语言） 一、单项选择题（每题1分，共40分） 1．计算机硬件系统中最核心的部件是 C 。 A）内存储器B）输入/输出设备C）CPU D）硬盘 2．计算机最早的应用领域是 A 。 A）科学计算B）图形处理C）过程控制D）人工智能3．下列属于文字处理软件的是 B 。 A）Windows B）Word C）PowerPoint D）Excel 4．在计算机系统内部，所有数据都是采用 D 表示。 A）十六进制B）十进制C）八进制D）二进制5．在Windows系统中，下面文件命名合法的是 B 。 A）A*.DOC B）AB.DOC C）A?.DOC D）A>.DOC 6．计算机可以播放DVD等音像制品, 主要运用的是 A 技术。 A）多媒体B）人工智能C）数据库D）数据挖掘7．将文件从FTP服务器传输到本地计算机的过程称为 D 。 A）上传B）浏览C）查找D）下载 8．下列IP地址中，错误的是 C 。 A）219.231.10.155 B）192.168.5.1 C）219.260.20.12 D）192.10.6.7 9．下列关于计算机病毒的叙述中，正确的是 C 。 A）加密文件不会感染计算机病毒 B）系统软件不会感染计算机病毒 C）有防火墙的计算机系统也会感染病毒 D）压缩的文件不会感染计算机病毒 10．计算机能直接运行的是 B 。 A）目标程序 B）机器语言程序C）汇编语言程序 D）高级语言程序 11．下列选项中是Visual Basic的合法变量名的是 C。 A）1_abc B）abc-1 C）abc_1 D）abc.1 12．对正整数X、Y，有下列表达式，不能判断X能被Y整除的是 C 。 A）X/Y=Int(X/Y) B）X Mod Y =0 C）X\Y=Fix(X/Y) D）X\Y=X/Y 13．下面可以正确定义2个整形变量和一个字符型变量的语句是 B 。 A）Dim x, y As Integer, n As String B) Dim x%, y As Integer, n As String C) Dim x%, y$, n As String D) Dim x As Integer, y, n As String 14．下面表达式中， A 的运算结果与其他三个不同。 A）Exp(-3.5) B）Int(-3.5)+0.5 C）-Abs(-3.5) D）Sgn(-3.5)-2.5 15．将任意一个正的两位整数N的个位数与十位数对换的表达式为 A 。 A）（N-Int(N/10)*10）*10+Int(N/10) B）N-Int(N)/10*10+Int(N)/10 C）Int(N/10)+(N-Int(N/10)) D）(N-Int(N/10))*10+Int(N/10) 16．执行语句s = Mid("VisualBasic",1,6)后，s的值是 A 。 A) Visual B) Basic C) 6 D) 11 17．表达式5 Mod 3+3\5*2的值是 B 。 《VB程序设计》模拟试题 ●填空题 1.窗体模块的文件扩展名为 ___FRM_________ 、标准模块的文件扩展名为____BAS______ 、 类模块文件的扩展名为______CLS_______ 。 2.Visual Basic中数据类型可分为 _____标准数据类型________和用户自定义数据类型两大类，前者根据其取值的不同，可分为_____整型_________、 ______长整型_____、布尔型和 ____字符型_________。 3. Abs(-6.5)= _____6.5______；Int(-9.1)= ____-10_______。 4. "程序"& "设计"运算结果为 ___程序设计____ 。 5. Dim a, b as Boolean语句显式声明变量a是___变体___变量，b是___布尔__变量。 6. MsgBox函数的返回值中， VBRetry表示单击了____重试_____按钮，VBYes表示单击了___是_____按钮，VBNo表示单击了_____否____按钮。 7. 要加载窗体，可以在代码中使用___________语句，要显示窗体，可以在代码中使用___________方法，要隐藏窗体，可以在代码中使用Hide方法，要卸载窗体，可以在代码中使用___________方法。 8.对话框分为_________对话框和________对话框两种类型，其中_____________ 对话框最 常用。 9. 对象是Visual Basic应用程序的基本单元，它是由 ___类___创建的。在Visual Basic中可以用属性、 __方法___、___事件___ 来说明和衡量一个对象的特性。 10. 条件判断语句可以使用___If…then____________语句、 ____If…Then…Else______语句和 ______If…Then…ElseIf______语句。Select case 语句 11. 声明一个值为3.14的常量Pi的语句为___Const pi = 3.14______。 12. Do…Loop Until 循环结构中，当条件为____真____时结束循环。 13. 要显示弹出菜单，可以在代码中使用_____________事件。 14. 参数传递有__________方式、__________方式和命名传递方式，常量默认采用__________方式；变量默认采用__________方式；表达式默认采用__________方式。 15. 名称属性必须以一个__字母标点_开始并且最长可达40个字符,不能包括__符号___ 和 ___空格___。 16.Visual Basic的程序模块有3种：____窗体模块____ 、标准模块和 ____类模块____。 17.Visual Basic程序，按其语句代码执行的先后顺序，可以分为___顺序__结构、选择__结构和___循环____ 结构。 18.数组元素下标的下界默认为是_____________，如果要改变其默认值，应使用_____________。 ●判断题 （）1. Visual Basic运行程序的方法只有编译模式。 （）2. 语句Command1.visible=false 与Command1.enabled=false 是等价的。 （）3. InputBox函数和MsgBox函数一样，返回的是字符串。 （）4. 通过类模块，我们不可以根据需要建立自己的控件。 （×）5. 2.1E+5是合法的Visual Basic数据。 （）6. 根据占用内存方式的不同，可将数组分为常规数组和动态数组两种类型。 （√）7. x2是合法的变量名。 （）8. 按照文件的存取方式及其组成结构可以分为两种类型：文本文件和随机文件。 第六部分 VB程序设计部分（共50分） 一、单项选择题：（共10题，每小题2分，共20分） 1、能被对象所识别的动作与对象可执行的活动分别称为对象的_______。 A．方法、事件B．事件、方法 C．事件、属性D．过程、方法 2、以下有关对象属性的说法中正确的是________。 A．对象所有的属性都罗列在属性窗口列表中 B．不同对象不可能有同名属性 C．不同对象的同名属性取值一定相同 D．对象的某些属性既可在属性窗口也可通过程序代码设置或改变 3、如果m=3,n=4，则语句Print m=m-n，n=m+n的输出的结果是_________。 A．-1 7 B．出现错误信息 C．-1 3 D．False False 4、在使用菜单编辑器创建菜单时，可在菜单名称中某字母前插入_______符号，那么在运行程序时按【Alt】键和该字母键就可打开该命令菜单。 A．下划线B．& C．$ D．@ 5、不能作为容器使用的对象是__________。 A．图像框B．框架C．图片框D．窗体 6、日期类型(Date)在程序中运用时，日期类型必须用_______符号括起来。 A．# B．@ C．$ D．％ 7、有如下程序： Private Sub Command1_Click() S=Fix(-23.1) E=Int(23.1) Print Sin(E+S) End Sub 运行时输出的结果是_________。 A．-1 B．0 C．1 D．23 8、无法响应Click事件的控件是________。 A．Label B．Command C．TextBox D．Timer 9、在VB中，过程通常有三种，它们是________。 A．事件过程、子过程和函数过程 B．事件过程、函数过程和属性过程 C．Sub过程、Function过程和Property过程 D．Sub过程、函数过程和通用过程 2011年9月全国计算机等级考试二级笔试试卷VB语言程序设计 一、选择题 1、下列叙述中正确的是 A、算法就是程序 B、设计算法时只需要考虑数据结构的设计 C、设计算法时只需要考虑结果的可靠性 D、以上三种说法都不对 2、下列关于线性链表的叙述中，正确的是 A、各数据结点存储空间可以不连续，但它们的存储顺序与逻辑顺序必须一致 B、各数据结点的存储顺序可以不一致，但它们的存储空间必须连续 C、进行插入与删除时，不需要移动表中的元素 D、以上三种说法都不对 3、下列关于二叉树的叙述中，正确的是 A、叶子结点总是比度为2的结点少一个 B、叶子结点总是比度为2的结点多一个 C、叶子结点数是度为2的结点数的两倍 D、度为2的结点数是度为1的结点数的两倍 4、软件按功能可以分为应用软件、系统软件和支撑软件(或工具软件)。下面属于应用软件的是( )。 A、学生成绩管理系统 B、C语言编译程序 C、UNIX操作系统D 5 该系统总体结构图的深度是 A、7 B、6 C、3 D、2 6、程序调试的任务是 A、设计测试用例 B、验证程序的正确性 C、发现程序中的错误 D、诊断和改正程序的错误 7、下列关于数据库设计的叙述中，正确的是 A、在需求分析阶段建立数据字典 B、在概念设计阶段建立数据字典 C、在逻辑设计阶段建立数据字典 D、在物理设计阶段建立数据字典 8、数据库系统的三级模式不包括 A、概念模式 B、内模式 C、外模式 D、数据模式 9、有三个关系R、S和T如下： R S 则由关系R和S得到关系T的操作是 A、自然连接 B、差 C、交 D、并 10、下列选项中属于面向对象设计方法主要特征的是 A、继承 B、自顶向下 C、模块化 D、逐步求精 11、以下描述中错误的是 A、窗体的标题通过其Caption属性设置 程序设计 ================================================== 题号：7137 在考生文件夹中有一个工程文件sjt43.vbp，其功能是：找出矩阵元素的最大值，并求出矩阵对角线元素之和，窗体外观如图所示。程序运行时，矩阵数据被放入二维数组a中。当单击"找矩阵元素最大值"命令按钮时，找出矩阵中最大的数，并在标签Labe13中显示。当单击"对角线元素之和"命令按钮时，计算矩阵主对角线元素之和，并在标签Label4中显示。文件中已给出部分程序，请编写"找矩阵元素最大值"及"对角线元素之和"两个命令按钮的事件过程中的部分程序代码。 注意：不得修改程序的其他部分和控件属性。最后将修改后的文件按原文件名存盘。程序调试通过后，两个命令按钮的事件过程必须依次各执行一次。 原题代码： Option Base 1 Dim a(4, 4) As Integer Private Sub Command1_Click() '**********Begin********** '**********End*********** '不得修改以下部分 save Label3 End Sub Private Sub Command2_Click() '**********Begin********** '**********End********** '不得修改以下部分 save Label4 End Sub Private Sub Form_Load() Open App.Path & "\in5.txt" For Input As #1 For i = 1 To 4 For j = 1 To 4 Input #1, a(i, j) Next j Next i Close #1 End Sub 标准模块： Public Sub save(l As Control) Open App.Path & "\out5.txt" For Append As #1 Print #1, l.Caption Close #1 End Sub 程序填空 ================================================== 题号：7178 在考生文件夹下有一个工程文件sjt7.vbp，在程序运行时，单击"输入整数"按钮，输入一个整数，并在窗体上显示此整数的所有不同因子和因子个数。 图1是输入53后的结果，图2输入100的结果。已经给出了全部控件和程序，但程序不完整。 要求：请把程序中的_____改为正确的内容。不能修改程序中的其他部分，也不能修改控件的属性。最后用原来的文件名保存工程文件和窗体文件。 原题代码： Private Sub Command1_Click() Dim n As Integer Cls '**********FILL********** ________ = InputBox("请输入一个整数") Print "因子数="; fun(n) End Sub Function fun(m As Integer) Dim s As Integer 北京语言大学网络教育学院 《VB》模拟试卷三 注意： 1.试卷保密，考生不得将试卷带出考场或撕页，否则成绩作废。请监考老师负责监督。 2.请各位考生注意考试纪律，考试作弊全部成绩以零分计算。 3.本试卷满分100分，答题时间为90分钟。 4.本试卷分为试题卷和答题卷，所有答案必须答在答题卷上，答在试题卷上不给分。 一、【单项选择题】(本大题共20小题，每小题2分，共40分)在每小题列出的四个选项中只有一个选项是符合题目要求的，请将正确选项前的字母填在答题卷相应题号处。 1、下面（ B ）不是VB控件的一类。 [A] 标准控件 [B] 外部控件 [C] ActiveX控件 [D] 可插入对象（OLE） 2、VB是微软推出的可视化、（ A ）、采用事件驱动的结构化设计语言。 [A]面向对象 [B] 面向图形 [C] 面向过程 [D] 面向控件 3、复制当前控件到窗体左上角，应该使用的快捷键是（ A ）。 [A] 先Ctrl+C然后Ctrl+V [B] 先Ctrl+V然后Ctrl+C [C] Ctrl+C [D] Ctrl+V 4、通常创建的窗体都是矩形窗体，可以通过（ A ）函数创建非矩形窗体如椭圆、圆 形等。 [A] SetWindowRgn() [B] splash() [C] CreatPolygonRgn [D] Fullpic 5、下面哪一个不是键盘的事件（ B ）。 [A]KeyPress [B] KeyClick [C] KeyUp [D] KeyDown 6、关于Data控件说法不正确的是（ D ）。 [A] ADO Data控件与内部Data控件以及Remote Data控件类似。 [B] ADO Data控件使用户能使用ADO快速创建一个到数据库的链接 [C] DataGrid控件与Grid控件类似。 [D] DataGrid控件实际上是一个固定的行集合，每一行的列数不固定 7、关于常用标准控件描述错误的是（ A ）。 [A] 计时器一般用于指定一个时间 [B] 文本框提供一个编辑、显示、输入文本的区域 [C] 单选按钮在运行程序以后，一次只能选择一个单选框 -+ 懒惰是很奇怪的东西，它使你以为那是安逸，是休息，是福气；但实际上它所给你的是无聊，是倦怠，是消沉;它剥夺你对前途的希望，割断你和别人之间的友情，使你心胸日渐狭窄，对人生也越来越怀疑。 —罗兰 全国高等学校（安徽考区） 计算机水平考试试卷B （二级Visual Basic 语言） 一、单项选择题（每题1分，共40分） 1．计算机硬件系统中最核心的部件是 C 。 A）内存储器B）输入/输出设备C）CPU D）硬盘 2．计算机最早的应用领域是 A 。 A）科学计算B）图形处理C）过程控制D）人工智能3．下列属于文字处理软件的是 B 。 A）Windows B）Word C）PowerPoint D）Excel 4．在计算机系统内部，所有数据都是采用 D 表示。 A）十六进制B）十进制C）八进制D）二进制 5．在Windows系统中，下面文件命名合法的是 B 。 A）A*.DOC B）AB.DOC C）A?.DOC D）A>.DOC 6．计算机可以播放DVD等音像制品, 主要运用的是 A 技术。 A）多媒体B）人工智能C）数据库D）数据挖掘7．将文件从FTP服务器传输到本地计算机的过程称为 D 。 A）上传B）浏览C）查找D）下载 8．下列IP地址中，错误的是 C 。 A）219.231.10.155 B）192.168.5.1 C）219.260.20.12 D）192.10.6.7 9．下列关于计算机病毒的叙述中，正确的是 C 。 A）加密文件不会感染计算机病毒 B）系统软件不会感染计算机病毒 C）有防火墙的计算机系统也会感染病毒 D）压缩的文件不会感染计算机病毒 本卷共有4道大题: 一、单项选择题（25道小题，共25分） 1、VB中工程软件的扩展名为()（1分） A、ds B、frm C、vbp D、bas 2、把字符串"abcdef"右边的空格去掉应使用()函数（1分） A、trim B、rtrim C、right D、mid 3、文本框text1的text属性的数据类型是()（1分） A、整数型 B、字符串 C、单精度 D、双精度 4、下列()属性决定窗体标题栏显示内容（1分） A、Name B、Caption C、Text D、BackStyle 5、命令按钮command1不具有下列哪个事件()（1分） A、Click B、KeyPress C、GotFocus D、DblClick 6、为了使文本框同时具有水平和垂直滚动条，应先将MultiLine属性设置为True,然后再把ScrollBars属性设置为()（1分） A、0 B、1 C、2 D、3 7、Dim D(3,1To10,1To15)语句中，数组的元素个数为()（1分） A、3*10*16 B、3*11*16 C、4*10*15 D、4*11*15 8、如果整型变量c、d、x的值分别为8、6、0，则下列语句For I=c to d:x=x+i:Next I执行结束时，I的值为()（1分） A、8 B、7 C、6 D、5 9、假定有以下循环结构Do Until条件循环体Loop 则正确的描述是()（1分） A、如果"条件"是一个为0的常数，则一次循环体也不执行 B、如果"条件"是一个为0的常数，则至少执行一次循环体 C、如果"条件"是一个不为0的常数，则至少执行一次循环体 D、不论"条件"是否为"真"，至少要执行一次循环体 10、"x是小于100的非负数"，用VB表达式表示正确的是()（1分） A、0<=x0r x<100 B、0<=x<100 C、0<=x And x<100 D、0<=x,x<100 11、下列语句错误的是()（1分） A、exit for B、exit do C、end sub D、exit select 2005年9月 全国计算机等级考试二级笔试试卷 公共基础知识和Visual Basic 语言程序设计 (考试时间90 分钟，满分100 分) 一、选择题 (每小题 2 分,共 70 分 ) 下列各题A) 、 B) 、C)、 D) 四个选项中，只有一个选项是正确的。请将正确选项填涂在答题卡相应位置上，答在试卷上不得分。 （1）下列叙述中正确的是 A ．程序设计就是编制程序 C．程序经调试改错后还应进行再测试C。 B．程序的测试必须由程序员自己去完成 D．程序经调试改错后不必进行再测试 （2）下列数据结构中，能用二分法进行查找的是A ．顺序存储的有序线性表 B ．线性链表 A C．二叉链表 。 D．有序线性链表 （3）下列关于栈的描述正确的是C。 A．在栈中只能插入元素而不能删除元素 B．在栈中只能删除元素而不能插入元素 C．栈是特殊的线性表，只能在一端插入或删除元素 D．栈是特殊的线性表，只能在一端插入元素，而在另一端删除元素 （4）下列叙述中正确的是D。 A．一个逻辑数据结构只能有一种存储结构 B．数据的逻辑结构属于线性结构，存储结构属于非线性结构 C．一个逻辑数据结构可以有多种存储结构，且各种存储结构不影响数据处理的效率 D．一个逻辑数据结构可以有多种存储结构，且各种存储结构影响数据处理的效率 （5）下列描述中正确的是C。 A．软件工程只是解决软件项目的管理问题 B．软件工程主要解决软件产品的生产率问题 C．软件工程的主要思想是强调在软件开发过程中需要应用工程化原则 D．软件工程只是解决软件开发中的技术问题 （6）在软件设计中，不属于过程设计工具的是D。 A ． PDL( 过程设计语言 ) B ．PAD 图C． N-S 图 D． DFD 图 （7）下列叙述中正确的是A。 A ．软件交付使用后还需要进行维护B．软件一旦交付使用就不需要再进行维护C．软件交付使用后其生命周期就结束D．软件维护是指修复程序中被破坏的指令 （8）数据库设计的根本目标是要解决A。 A ．数据共享问题B．数据安全问题C．大量数据存储问题 D ．简化数据维护 计算机二级Visual Basic笔试试卷 共100分 注意事项：1．以下一、二、三题为客观题，请将答案做在机读答题卡上 2．四、五、六题为主观题，请将答案做在答题纸上 一、单项选择题（每题 1 分，共20分） 1. 执行：A = 16 Mod 5后，A的值为： A. 0 B. 1 C. 3 D. 5 2. 表达式16 \ 5的值是： A. 0 B. 1 C. 3 D. 5 3. 下列常数或表达式中数值最小的为： A. 256 B. &HFF+1 C. &H100-1 D. &H7F+127 4. 下列常数或表达式中数值最小的为： A. –20 / 3 B. –20 \ 3 C. Int (-20/3) D. Fix (-20/3) 5. 在VB中，若一个变量在引用前未被声明，则该变量的类型为： A. 长整型Long B. 整型Integer C. 单精度型String D. 通用型Variant 6. 有字符串A$="VISUAL BASIC"，为取出"BASIC" 子字符串，正确使用的函数是： A. Left$(A$,5) B. Right$(A$,5) C. Instr$(A$,"BASIC") D. Mid$(A$,5,5) 7. 有字符串A$ ="VISUAL BASIC"，得到"BASIC" 子字符串在A$ 中的位置的函数是： A. Len(A$) B. Right$ (A$, 6) C. Instr (A$, "Basic") D. Mid$ (A$, 8, 5) ※8. 在MouseDown事件过程中，参数Button的值为1表示按下的鼠标按键是： A. 鼠标左键 B. 鼠标右键 C. 同时按下鼠标左右键 D. 未按鼠标按键 ※9. 在MouseDown事件过程中，参数Shift的值为1表示在按键的同时按下功能键： A. Alt键 B. Ctrl键 C. Shift键 D. Alt+Shift键 10. A为一整数变量，能正确判断A的值是二位数的语句是： A. If A>=10 Or A<100 Then Print “二位数” B. If A>10 And A<100 Then Print “二位数” C. If A>=10 And A<100 Then Print “二位数” D. If A>=10 And A<=100 Then Print “二位数” 11. A为一数值变量，能正确判断A是奇数或是偶数的语句是： A. If A\2 = Int (A/2) Then Print “偶数” B. If A/2 = Int (A/2) Then Print “偶数” C. If A\2 = Int (A\2) Then Print “偶数” D. If Fix (A/2) = Int (A/2) Then Print “偶数” 12. 变量A，B不等值，将A，B中较大的数放入变量Max的语句是： A. If A> B Then Max=A B. Max=0 : If A>B Then Max=A C. Max=A : If A>B Then Max=A D. Max=B : If A>B Then Max=A 13. 变量A，B不等值，将变量A，B中的值进行交换的语句是： A. A=B :B=A B. B=A :A=B 般程序设计习题 '〖第1题〗:(事件)单击窗体。 '(响应)求100以内偶数的和，并将结果输出在窗体上。 '将结果存入变量SUM中 '答案：DimiAsInteger Fori=ITolOO lfiMod2=0Then sum=sum+i EndIf Next Printsum '〖第2题〗:(事件)双击窗体。 '(响应)求s=1+1X 2+1 X 2X 3+…+1X 2 X 3X …X 10, '并将结果存到变量S中 答案：DimijAsInteger DimkAsLong k=1 s=0 Fori=1To10 Forj=1Toi k=k*j Next s=s+k k=1 Next Print(CStr(s)) '〖第3题〗:(事件)单击窗体。 '(响应)求1+2+3+……+100的值，并把结果输出在窗体上。'结果存入变量SUM中o '答案：DimiAsInteger Fori=1To100 sum=sum+i Next Printsum '〖第4题〗：判断一个数是否是素数。 '答案：DimiAsInteger Prime=True Fori=2ToInt(Sqr(m)) lfmModi=0ThenPrime=False:ExitFor Nexti '〖第5题〗:(事件)单击窗体。 '(响应)求1-1/2+1/3-1/4+ ……+1/99-1/100 的值。 '将结果存入变量J中。 DimiAsInteger Fori=1To100 IfiMod2=1Then j=j+1/i ElseIfiMod2=0Then j=j-1/i EndIf Next Printj ”〖第6题〗:(事件)单击窗体。 '(响应)求200~300之间既能被3整除又能被7整除的数 '并求出所有数之和存入变量SUM中 '答案：DimiAsInteger Fori=2 0仃o300 If((iMod3)=0)And((iMod7)=0)Then Print(CStr(i)) sum=sum+iVB模拟试题1
全国计算机等级考试二级VB笔试试题及答案
江苏省计算机二级VB考试真题及参考答案
VB期末考试模拟题1讲解
VB模拟题
计算机二级VB考试试题
计算机等级考试(二级VB)模拟试题二
最新[考试中心]安徽省计算机二级VB笔试权威模拟试题及答案2
《VB程序设计基础》模拟精彩试题
2017VB第2次模拟考试
全国计算机等级考试二级笔试试卷VB语言程序设计
vb模拟考试题
VB模拟试卷三含复习资料
zlegfa考试中心安徽省计算机二级VB笔试权威模拟试题及复习资料
VB考试复习资料(模拟测试系统)
全国计算机等级考试二级VB语言笔试试题与答案
vb模拟考试
计算机二级考试VB一般程序设计习题