下载文档原格式
上海市计算机二级vb试题及答案一、单项选择题（每题2分，共20分）1. VB中用于声明变量的关键字是：A. DimB. SubC. FunctionD. If答案：A2. 下列哪个控件不是VB的标准控件？A. TextBoxB. ComboBoxC. ListBoxD. Button答案：D3. 在VB中，下列哪个选项是正确的字符串比较表达式？A. "Hello" > "World"B. "Hello" = "world"C. "Hello" < "world"D. "Hello" <> "world"答案：D4. VB中，下面哪个函数用于返回当前日期？A. NowB. DateC. TimeD. Day答案：B5. 在VB中，下列哪个选项是正确的数组声明方式？A. Dim arr(5) As IntegerB. Dim arr As Integer(5)C. Dim arr(5) As StringD. Dim arr As String(5)答案：A6. VB中，下列哪个选项是正确的循环结构？A. Do WhileB. While DoC. For ToD. For Each答案：D7. 在VB中，下列哪个选项是正确的文件打开模式？A. Open For InputB. Open For OutputC. Open For AppendD. All of the above答案：D8. VB中，下列哪个选项是正确的事件处理程序的声明方式？A. Private Sub Form_Load()B. Public Sub Form_Load()C. Private Function Form_Load()D. Public Function Form_Load()答案：A9. 在VB中，下列哪个选项是正确的条件语句？A. If...ThenB. If...ElseC. If...Then...ElseD. All of the above答案：D10. VB中，下列哪个选项是正确的错误处理语句？A. On Error GoTo 0B. On Error Resume NextC. On Error GoTo LineD. All of the above答案：D二、填空题（每题2分，共20分）1. 在VB中，使用________关键字可以声明一个全局变量。
VB程序阅读题与程序填空题综合练习1、阅读下面程序，当单击窗体之后，窗体上输出的是。
Private Sub Form_Click( )Dim i As Integer, j As IntegerDim k As Integerk=0For i = 0 To 10 Step 3For j = 1 To 10If j > = 5 Then i = i +4: Exit Forj = j + 1k = k + 1NextIf i > 8 Then Exit ForNextPrint kEnd Sub2、阅读下面的事件过程。
单击窗体后，在文本框Text1和Text2中显示的内容分别是和；若将程序中A语句与B语句的位置互换，再次执行程序，单击窗体后在Text1和Text2中显示的内容分别是和。
Private Sub Form_Click( )Dim x As Integer, y As Integerx = 1 : y = 0Do While x < 3y = y + x 'A语句x = x + 1 'B语句LoopText1.Text = xText2.Text = yEnd Sub3、下面程序段中，k循环共执行次，在窗体上显示的结果是。
Dim b As Integer, k As Integerb = 1For k =1 To 5b = b * kIf b > = 15 ThenExit ForElsek = k + 1End IfNext kPrint k, b4、以下是按钮cmdl的Click事件过程，求1~100之间的所有质数。
质数的个数显示在窗体上，在划线处填上缺少的内容。
Private Sub cmdl_Click( )Dim intNum As Integer, int1 As Integer, int2 As IntegerintNum = 0For int1 =For int2 = 2 To int1 \2If (int1 Mod int2) = 0 ThenintNum=1End IfNextIfsNum = sNum + 1End IfNextPrintEnd Sub5、若命令按钮的名称为CmdExit，程序要求单击以上命令按钮时，程序停止运行。
程序填空〖第1题〗『程序填空』(1分)(题号:59) '-------------------------------------------------------'【程序填空】'-------------------------------------------------------' 功能：输入一个数,若大于0,则显示"+"；若小于0，' 则显示 "-"；若等于"0",则显示"零"。
'-------------------------------------------------------Private Sub Command1_Click( )x = Val(Text1.Text)Select Case x'**********SPACE**********Case is > 0Label1.Caption = "+"Case Is < 0'**********SPACE**********Label1.Caption = "-"'**********SPACE**********Case is =Label1.Caption = "零"End SelectEnd Sub答案：1). Case Is > 02). Label1.Caption = "-"3). Case 0 或 Case Else 或 Case Is = 0〖第2题〗『程序填空』(1分)(题号:60) '-------------------------------------------------------'【程序填空】'-------------------------------------------------------'功能：输入任何一个英文字母x,' 若x的值为"a","c","d-f" ,则显示x的大写字母；' 若x的值为"m","o","p-z",则显示x的小写字母；' 若x的值为其它的值,则显示xa（如输入的X的值是g，则显示ga）。
1.VB语言中，菜单分为下拉式菜单和弹出式菜单。
2.面向对象系统的三个基本特性是封装性、继承性和多态性。
3.设在窗体上有一通用对话框Commondialog1，为建立一个“打开”对话框，应把Action属性设置为1。
4.命令按钮的Enabled属性为True时，表示该控件有效，即能够响应用户的操作。
5.能够释放窗体Form1所占用的内存空间的语句是__unload form1_。
6.若有定义Dim x(-2 to 4) as Integer，则函数UBound(x)的值为4。
7.如果要从顺序文件中读数据，则打开方式应为input。
8.关键字varient用于定义变体类型数据。
9.XOR是逻辑异或运算符。
10.表示变量x既是5的倍数，也是7的倍数的逻辑表达式为X mod 5=0 and x mod 7=0。
11.在VB语言中，窗体文件的扩展名为*.frm。
12.向随机文件或二进制文件中写入数据所用的命令关键字为put#。
13.函数过程（或子程序过程）直接或间接地调用自身称为递归调用。
14.程序运行期间，用鼠标单击滚动条上滑块两侧的空白处时，滑块的移动量是滚动条控件的largechange属性。
15.设置数组下标的默认下界为1的语句是Option_base 1。
16.用关键字sub定义的过程称为子程序过程。
17.鼠标指针置于工具箱窗口中的某一个控件图标上时，就会在工具件是图片框。
18.文本框的默认属性是Text 。
19.与传统的程序设计语言相比,Visual Basic 最突出的特点是事件驱动编程机制。
20.VB 窗体设计器的主要功能是建立用户界面。
21.两个操作数取值相同为“假”，不同为“真”的运算符是__Xor__ 。
22.在程序中，要在图片框或图像框中加载图片，可用函数load picture 。
23.有一名为menuItem 的菜单项，为了在程序运行时使该菜单项失效，应使用的语句为menuItem Enable=False 。
《程序设计语言VB》填空题1. Private Sub Command1_Click()a=3b=1For i=1 To 3f=a + ba=bb=fNext iPrint fEnd Sub以上程序段运行后，f的结果为。
2.设有如下通用过程：Public Sub fun(a() As Integer, x As Integer)For i = 1 To 5x = x + a(i)NextEnd Sub在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Dim arr(5) As Integer, n As IntegerFor i = 1 To 5arr(i) = 2* iNextfun arr, nText1.Text = Str(n)End Sub程序运行后,单击命令按钮,则在文本框中显示的内容是。
3.阅读下列程序段Option ExplicitPrivate Sub Command1_Click()Dim str1 As StringDim str2 As Stringstr1 = "ABCDEFG"MySub str1, str2Print str2End SubPrivate Sub MySub(ByVal a As String, b As String) Dim c As StringDim i As IntegerFor i = Len(a) To 1 Step -1c = c+ Mid(a, i, 1)Nextb= cEnd Sub程序运行后，“print”语句的输出结果是___ _。
4.在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click()x = Int(Rnd) + 6If x ^ 2 > 25 Then y = x ^ 2 + 5x = Int(Rnd) + 4If x ^ 2 < 25 Then y = x ^ 2x = Int(Rnd) + 5If x ^ 2 = 25 Then y = x ^ 2 - 5Print yEnd Sub程序运行后，单击命令按钮，其输出结果为__ _。
一，选择题1、如果VB环境中缺少某个窗口，一般应从主菜单__C____的下拉菜单中找到相应的激活命令。
（1分）A、编辑B、文件C、视图D、调试2、启动Visual Basic后，VB为用户建立的第一个窗体是__B____。
（1分）A、FormB、Form1C、窗体1D、窗体3、不属于一个工程文件（*.vbp）里的文件是____A__。
（1分）A、*.txt文件B、*.bas文件C、*.cls文件D、*.frm文件4、与传统的程序设计语言相比较，Visual Basic最突出的特点是__C____。
（1分）A、结构化的程序设计B、数据处理C、面向对象的可视化编程D、中文支持5、文本框中的ScrollBars属性已设置为3-Both，但却没有水平和垂直滚动条的效果，原因可能是___B___。
（1分）A、文本框中没有内容B、文本框的MultiLine属性为FalseC、文本框的MaxLength属性为0D、文本框的Locked属性是True6、能够盛放其他控件，而且是最基本的对象是___A___。
（1分）A、窗体B、图像C、标签D、文本7、任何控件都具有的属性是____C__。
（1分）A、PictureB、CaptionC、NameD、AutoSize8、窗体上有一个标签Label1和一个命名按钮Command1，当程序运行时每单击一次命令按钮，标签就向右移动一定距离。
在Command1_Click()中能完成这个功能的命令为___D___。
（1分）A、Label1.Left = 100B、Label1.Left = Label1.Left - 100C、Label1.Move 100D、Label1.Move Label1.Left + 1009、要把一个Image控件对象设置成隐藏，应设置的属性是___A___。
（1分）A、VisibleB、EnabledC、DefaultD、Cancel10、以下___B___是正确的For …Next结构。
VB程序设计练习题及参考答案visualbasic程序设计练习题一、填空1．当进入vb集成环境，发现没有显示“工具箱”窗口时，应选择菜单的选项，使“工具箱”窗口显示。
2.在BMP图形文件之后加载命令按钮的图片属性时，所需的图形不会显示在选项按钮上，因为该属性未设置为1（图形）。
3．在文本框中，通过属性能获得当前插入点所在的位置。
4.要编辑文本框中的现有内容，请按键盘上的键，但该键不起作用，因为该属性已设置为true。
6．在vb中，1234、123456＆、1.2346e+5、1.2346d+5四个常数分别表示、、、。
7.整数变量x存储两位数。
要交换两个数字的位置，例如，13变为31，表达式为。
8．表示x是5的倍数或是9的倍数的逻辑表达式为。
9.如果a=3.5、B=5.0、C=2.5和d=true，则表达式a>=0anda+C>B+3ornotd的值为。
10．int(-3.5)、int(3.5)值分别是、。
11．表达式ucase(mid(\的值是。
12.要将以下语句循环20次，循环变量的初始值应为：fork=to-5step-213．下面程序段显示个“*”。
fori=1到5 Forj=1打印\nextjnexti14．复选框属性设置为2－grayed时，变成灰色，禁止用户选择。
15．属性设置为1，单选按钮和复选框的标题显示在左边。
16．属性设置为1，单选按钮和复选框以图形方式显示。
17.程序运行时，如果框架属性设置为false，框架标题为灰色，表示框架内的所有对象均被屏蔽，不允许用户对其进行操作。
18．列表框中项目的序号是从开始的。
19.指示列表框中最后一项的序列号。
20.方法可以清除列表框中的所有内容。
21．组合框是组合了文本框和列表框的特性而形成的一种控件。
风格的组合框不允许用户输入列表框中没有的项。
22.VB程序存储在模块中，模块分为______________三种类型。
123.如果希望每15秒生成一次计时器事件，interval属性应设置为。
