当前位置：文档之家 › VB期末考试真题试卷及答案四

VB期末考试真题试卷及答案四

  • 格式：doc
  • 大小：375.00 KB
  • 文档页数：9

练习四一、单选题1．下列软件中______是操作系统。

(A) Windows (B) Internet Explorer (C) WPS (D) Visual Basic2．鼠标属于计算机中的______。

(A) 中央处理器 (B) 存储器 (C) 输入设备 (D) 输出设备3．下列表示存储容量的数据中，________是最大的。

（A）20480 KB （B） 1.44 MB （C） 2.5 GB （D）4865723 Byte4．十进制数13转换为二进制是______。

(A) 1101 (B) 1011 (C) 1100 (D) 10105．WINDOWS中扩展名为______的文件不是图形文件。

(A) JPG (B) EXE (C) BMP (D) ICO6．在一个多窗体的工程中，如果有一个自定义函数需要被多个窗体调用，则此函数的定义可保存在一个______类型的文件中。

(A) VBP (B) BAS (C) FRM (D) OCX7．下列______可作为VB的变量名。

(A) A&A (B) print_2(C) 12AB (D) Const8．下列对象中_______不能作为放置其他控件的容器。

(A) 窗体(B) 文本框 (C) 图片框 (D) 框架9．以下语句中______能在窗体的标题栏中显示“Visual Basic窗体”。

(A) Form1.Title = "Visual Basic窗体" (B) = "Visual Basic窗体"(C) Form1.Caption = "Visual Basic窗体" (D) Form1.Text = "Visual Basic窗体" 10．设窗体中有一个列表框Listt1和一个标签Label1。

列表框中显示若干城市名称，单击某个城市名时，标签中显示选中的城市名称。

以下______事件过程能实现该功能。

(A) Private Sub List1_Click()Label1.Caption = List1.ListIndex End Sub (B) Private Sub List1_Click()Label1.Text = List1.ListIndex End Sub(C) Private Sub List1_Click() Label1.Text = List1.Text End Sub (D) Private Sub List1_Click()Label1.Caption = List1.Text End Sub11．窗体中有一个命令按钮Command1。

运行下列程序时单击命令按钮，则窗体中显示______。

Private Sub Command1_Click()Dim city As Stringcity = Array("北京", "上海", "南京", "广州")Print city(1)End Sub(A) 空白 (B) 北京 (C) 上海(D) 出现错误提示12．窗体中有一个命令按钮Command1。

运行下列程序，单击命令按钮，窗体中显示______。

Dim X As Integer, Y As Integer ' (通用)(声明)Private Sub Proc(ByVal a As Integer, ByVal b As Integer)X = a * aY = b + bEnd SubPrivate Sub Command1_Click()X = 5: Y = 3Call Proc(X, Y)Print X, YEnd Sub(A) 5 3 (B) 25 3 (C) 25 6 (D) 5 613．在以下过程中，Public表示__________。

Public Sub F(x As Integer)……End Sub(A) 此过程可以被任何其它过程调用 (B) 此过程只可以被本窗体模块中的其它过程调用(C) 此过程不可以被任何其它过程调用(D) 此过程只可以被本工程中的其它过程调用14．执行下面这段代码时，窗体中将会显示________。

n = 3For i = 1 To nx = 0For j = 1 To ix = x + 1Next jNext iPrint x(A) 3 (B) 4 (C) 5 (D) 615．需要将字符串S颠倒过来逆序排列形成字符串T，如将“ABCD”变成“DCBA”，下面的程序段中____不能实现该功能。

(A) s = "ABCD": t = ""For i = 1 To Len(s)t = t + Mid(s, Len(s) - i + 1, 1) Next i (B) s = "ABCD": t = ""For i = 1 To Len(s)t = Mid(s, i, 1) + t Next i(C) S = "ABCD": T = ""For i = Len(S) To 1 Step -1 T = T + Mid(S, i, 1)Next i (D) S = "ABCD": T = ""For i = Len(S) To 1 Step -1 T = Mid(S, i, 1) + TNext i16．下列函数中________的值与其它三个不一样。

(A) Val("1") (B) Abs(-1) (C) Int(1.3) (D) Sin(1) 17．设有如下程序，运行时单击命令按钮，则文本框中显示______。

Sub F(a(), ByVal x As Integer) For i = 1 To 5x = x + a(i)Next iEnd Sub Private Sub Command1_Click() Dim arr(5), n As Integer For i = 1 To 5arr(i) = iNext in = 10Call F(arr(), n)Text1.Text = nEnd Sub(A) 10 (B) 15 (C) 25 (D) 24 18．以下程序段中______能正确地计算并显示5的阶乘。

(A) n = 5: x = 1Dox = x * ii = i + 1Loop While i < n Print x (B) n = 5: x = 1: i = 1 Dox = x * ii = i + 1Loop While i < nPrint x(C) n = 5: x = 1: i = 1 Dox = x * ii = i + 1Loop While i <= n Print x (D) n = 5: x = 1 For i = n To 1 x = x * i Next iPrint x19．执行如下程序，单击命令按钮3次，则标签Label1,Label2,Label3中分别显示______。

Private Sub Command1_Click()Static y As IntegerDim z As Integern = 10z = n + z : y = y + z : x = x + zLabel1.Caption = xLabel2.Caption = yLabel3.Caption = zEnd Sub(A) 10 10 10 (B) 10 30 10 (C) 30 30 30 (D) 10 30 3020．设已执行b=Array(5,3,9,1,6)，现要将数组b的各个元素逆序排列，程序段____可实现该功能。

(A) For i = 0 To 5 - 1 \ 2 tmp = b(i)b(i) = b(5 - i - 1)b(5 - i - 1) = tmpNext i (B) For i = 0 To 5 \ 2 tmp = b(i)b(i) = b(5 - i - 1) b(5 - i - 1) = tmp Next i(C) For i = 0 To 5tmp = b(i)b(i) = b(5 - i - 1) b(5 - i - 1) = tmp Next i (D) For i = 1 To 5 \ 2 tmp = b(i)b(i) = b(5 - i - 1) b(5 - i - 1) = tmp Next i21．设组合框Combo1中有3个项目，则______可删除其中最后一项。

(A) Combo1.RemoveItem Combo1.Text (B) Combo1.RemoveItem Combo1.Index(C) Combo1.RemoveItem Combo1.ListIndex (D) Combo1.RemoveItem Combo1.ListCount - 1 22．执行下列程序段，文本框Text1中显示______。

n = Int(Rnd) + 3Select Case nCase 1 To 10x = 10Case 2, 4, 6x = 20Case Is <= 10x = 30Case 10x = 40End SelectText1.Text = x(A) 10 (B) 20 (C) 30 (D) 4023．以下关系表达式中______的值为False。

(A) "ABC" > "Abc" (B) "the" <> "they" (C) "VISUAL" = UCase("Visual") (D) "Integer" > "Int" 24．窗体中有命令按钮Command1，并已编写下列代码。

运行程序时，单击命令按钮，窗体显示______。

Function F(m As Integer) If m Mod 2 = 0 ThenF = mElseF = 1End IfEnd Function Private Sub Command1_Click() Dim i As IntegerS = 0For i = 1 To 5S = S + F(i)NextPrint SEnd Sub(A) 11 (B) 10 (C) 9 (D) 8 25．设有如下代码，关于它的叙述______是正确的。

合集下载

vb期末考试和答案

vb期末考试和答案

vb期末考试和答案一、选择题（每题2分，共20分）1. 在VB中，以下哪个是正确的变量声明方式？A. Dim a$B. Dim a IntegerC. Dim a As StringD. Dim a 123答案：C2. VB中，以下哪个是正确的条件语句？A. If x > 0 Then Print "Positive"B. If x > 0 ThenPrint "Positive"End IfC. If x > 0 ThenPrint "Positive"End IfD. If x > 0 ThenPrint "Positive"ElsePrint "Negative"End If答案：D3. 在VB中，以下哪个是正确的循环结构？A. For i = 1 To 10Print iNext iB. For i = 1 To 10Print iEnd ForC. For i = 1 To 10Print iLoopD. For i = 1 To 10Print iEnd Loop答案：A4. VB中，以下哪个是正确的数组声明方式？A. Dim arr(10)B. Dim arr(10) As IntegerC. Dim arr As Integer(10)D. Dim arr(10) Integer答案：B5. 在VB中，以下哪个是正确的函数声明方式？A. Function Add(x As Integer, y As Integer) As IntegerB. Function Add(x, y) As IntegerC. Function Add(x As Integer, y As Integer)D. Function Add(x, y)答案：A6. VB中，以下哪个是正确的事件处理程序？A. Private Sub Form_Click()B. Private Sub Form_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Me.ClickC. Private Sub Form_Click(ByVal sender As Object, ByVal e As MouseEventArgs) Handles Me.ClickD. Private Sub Form_Click(ByVal sender As Object, ByVal e As MouseEventArgs)答案：B7. 在VB中，以下哪个是正确的窗体属性？A. Me.Width = 800B. Me.Height = 600C. Me.Caption = "My Form"D. All of the above答案：D8. VB中，以下哪个是正确的控件属性？A. Label1.Text = "Hello"B. Label1.Caption = "Hello"C. Label1.Value = "Hello"D. = "Hello"答案：A9. 在VB中，以下哪个是正确的文件操作语句？A. Open "C:\test.txt" For Input As #1B. Open "C:\test.txt" For Output As #1C. Open "C:\test.txt" For Append As #1D. All of the above答案：D10. VB中，以下哪个是正确的错误处理语句？A. On Error Resume NextB. On Error GoTo 0C. On Error GoTo -1D. All of the above答案：A二、填空题（每题2分，共20分）1. 在VB中，声明一个整型变量的关键字是______。

vb期末试题及答案

vb期末试题及答案

vb期末试题及答案一、选择题（每题2分，共20分）1. 在VB中，以下哪个不是基本数据类型？A. IntegerB. StringC. ObjectD. Array答案：D2. 以下哪个选项是正确的VB变量声明方式？A. Dim varNameB. varName As IntegerC. Integer varNameD. Both A and B答案：D3. VB中的For循环结构不包括以下哪个部分？A. 初始化表达式B. 循环条件C. 迭代表达式D. 循环体答案：D4. 在VB中，以下哪个是正确的数组声明方式？A. Dim arr(0 To 10) As IntegerB. Dim arr As Integer(0 To 10)C. Dim arr(10)D. Both A and C答案：A5. VB中，以下哪个是正确的函数定义？A. Function myFunction() As IntegerB. Sub myFunction() As IntegerC. Function myFunction() IntegerD. Both A and C答案：A6. 以下哪个是VB中的事件处理程序的正确声明方式？A. Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.ClickB. Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)C. Private Sub Button1_Click()D. Both A and C答案：A7. 在VB中，以下哪个不是控件的属性？A. TextB. FontC. ClickD. Size答案：C8. VB中，以下哪个是正确的类定义？A. Class MyClassB. Type MyClassC. Structure MyClassD. Both A and B答案：A9. VB中，以下哪个是正确的方法调用？A. myMethod(10)B. myMethod = 10C. myMethod += 10D. Both A and C答案：A10. 在VB中，以下哪个是正确的条件语句？A. If x > 0 ThenB. If x > 0C. If (x > 0)D. All of the above答案：D二、填空题（每空2分，共20分）1. 在VB中，使用 ______ 语句可以定义一个类。

VB期末考试考卷及答案

VB期末考试考卷及答案

VB期末考试考卷及答案一、选择题（每题1分，共5分）1. 在VB中，下列哪个函数用于返回字符串的长度？A. Len()B. Length()C. Size()D. Count()A. DimB. IntegerC. IntD. Var3. 在VB中，下列哪个语句用于退出当前循环？A. Exit ForB. BreakC. Exit DoD. ContinueA. OpenB. LoadC. CreateD. Read5. 在VB中，下列哪个事件在窗体加载时发生？A. LoadB. InitializeC. FormLoadD. FormOpen二、判断题（每题1分，共5分）1. VB中的变量必须先声明后使用。

（）2. 在VB中，Sub过程可以返回值。

（）3. VB中的数组下标从1开始。

（）4. 在VB中，可以使用Select Case语句进行多条件判断。

（）5. VB中的字符串可以用单引号(')表示。

（）三、填空题（每题1分，共5分）1. 在VB中，用于声明常量的关键字是______。

2. VB中的逻辑运算符包括______、______和______。

3. 在VB中，要实现两个变量的值交换，可以使用______变量作为中间变量。

4. 在VB中，______方法用于设置文本框的字体。

5. VB中的______事件在用户单击按钮时发生。

四、简答题（每题2分，共10分）1. 简述VB中事件的执行过程。

2. 请列举三种VB中的数据类型。

3. 简述如何使用Select Case语句进行多条件判断。

4. 请说明如何使用VB中的循环结构实现1到100的累加。

5. 简述如何使用VB中的文件操作函数读取文件内容。

五、应用题（每题2分，共10分）1. 编写一个VB程序，计算并输出1到100之间所有偶数的和。

2. 编写一个VB程序，实现用户输入一个字符串，程序将其逆序输出。

3. 编写一个VB程序，使用循环结构输出九九乘法表。

vb期末试题及答案

vb期末试题及答案

vb期末试题及答案一、选择题（每题2分，共20分）1. VB中，用于声明变量的关键字是：A. DimB. SetC. CallD. Sub答案：A2. 下列哪个选项不是VB中的控件？A. TextBoxB. LabelC. ButtonD. Excel答案：D3. VB中，用于执行循环操作的关键字是：A. ForB. IfC. ElseD. While答案：A4. VB中，用于打开文件的函数是：A. OpenB. CloseC. PrintD. Write答案：A5. VB中，用于定义过程的关键字是：A. FunctionB. SubC. DimD. Const答案：B6. VB中，用于定义函数的关键字是：A. FunctionB. SubC. DimD. Const答案：A7. VB中，用于定义常量的关键字是：A. DimB. ConstC. FunctionD. Sub答案：B8. VB中，用于定义数组的关键字是：A. DimB. FunctionC. ConstD. Sub答案：A9. VB中，用于判断条件的关键字是：A. IfB. ForC. WhileD. Dim答案：A10. VB中，用于退出循环的关键字是：A. ExitB. EndC. StopD. Loop答案：A二、填空题（每题2分，共20分）1. VB中，声明一个整型变量a，可以使用关键字________。

答案：Dim2. VB中，声明一个字符串变量str，可以使用关键字________。

答案：Dim3. VB中，声明一个布尔型变量flag，可以使用关键字________。

答案：Dim4. VB中，声明一个数组变量arr，可以使用关键字________。

答案：Dim5. VB中，声明一个常量PI，可以使用关键字________。

答案：Const6. VB中，声明一个函数sum，可以使用关键字________。

答案：Function7. VB中，声明一个过程printData，可以使用关键字________。