计算机二级VB考试题及答案
计算机二级VB考试题及答案计算机二级VB考试题及答案「篇一」1.以下程序段运行的结果为(B)(单)Private Sub Form_ClickMyDate = #7/21/1997#Print Format(MyDate, "m/d/yy")Print Format(MyDate,"yyyy年m月dd日")End SubA.7/21/97 1997年7月21日B.7-21-97 1997年7月21日C.97/7/21 1997年7月21日D.7/21/97 97年7月21日2.以下程序段运行的结果为(B)(单)Private Sub Form_ClickMyTime = #9:21:30 PM#MyDate = #7/21/1997#Print Tab(2); Format(MyDate, "mmmm-yy")Print Tab(2); Format(MyTime, "hh:mm:ss A/P")End SubA.July-97 9:21:30 PB.July-97 09:21:30 PC.07-97 9:21:30 PD.July-97 9:21:303.以下程序段运行的结果为(C)(单)Private Sub Form_ClickMyDate = #7/21/1997#Print Format(MyDate, "dddd,mmmm,dd,yyyy")End SubA.21,07,1997B.21,07,21,1997C.Monday,July,21,1997D.Monday,07,21,19974.在窗体中建立一个文本框text1和一个命令按钮command1，编写下面程序：Private Sub Text1_LostFocusIf Not IsNumeric(Text1) ThenMsgBox "帐号有非数字字符错误"Text1.Text = ""Text1.SetFocuselseMsgBox "帐号正确"End IfEnd Sub当在text1文本框中输入字符"abc"之后，单击命令按钮，结果为(B)(单)A.显示对话框，提示信息为"帐号正确"B.显示对话框，提示信息为"帐号有非数字字符错误"C.程序出错D.没有任何提示5.在窗体中建立一个文本框text1和一个命令按钮command1，编写下面程序：Private Sub Text1_LostFocusIf Not IsNumeric(Text1) ThenMsgBox "帐号有非数字字符错误"Text1.Text = ""Text1.SetFocuselseMsgBox "帐号正确"End IfEnd Sub当在text1文本框中输入数字123456之后，单击命令按钮，结果为(A)(单)A.显示对话框，提示信息为"帐号正确"B.显示对话框，提示信息为"帐号有非数字字符错误"C.程序出错D.没有任何提示6.在窗体中建立一个文本框text1和一个命令按钮command1，编写下面程序：Private Sub Command1_ClickDim I As IntegerIf Text1.Text <> "Gong" ThenI = MsgBox("密码错误", 5 + vbExclamation, "输入密码")If I <> 4 ThenEndElseText1.Text = ""Text1.SetFocusEnd IfElseMsgBox "密码帐号正确!"End IfEnd Sub若在text1中输入字符串"Gong"，则程序运行结果为(A)(单)A.显示对话框，提示"密码帐号正确!"B.显示对话框，提示"密码错误"C.程序出错D.没有任何提示7.在窗体中建立一个文本框text1和一个命令按钮command1，编写下面程序：Private Sub Command1_ClickDim I As IntegerIf Text1.Text <> "Gong" ThenI = MsgBox("密码错误", 5 + vbExclamation, "输入密码")If I <>4 ThenEndElseText1.Text = ""Text1.SetFocusEnd IfElseMsgBox "密码帐号正确!"End IfEnd Sub若在text1中输入字符串"gong"，则程序运行结果为(B)(单)A.显示对话框，提示"密码帐号正确!"B.显示对话框，提示"密码错误"C.程序出错D.没有任何提示8.在窗体中建立一个文本框text1和一个命令按钮command1，编写下面程序：Private Sub Command1_ClickDim I As IntegerIf Text1.Text <> "Gong" ThenI = MsgBox("密码错误", VbRetryCancle + vbExclamation, "输入密码")If I <> 4 ThenEndElseText1.Text = ""Text1.SetFocusEnd IfMsgBox "密码帐号正确!"End IfEnd Sub若在text1中输入字符串"123"，显示"密码错误"对话框，关于此对话框描述正确的是(A)(单)A.显示对话框中有“重试”按钮B.显示对话框中有“确定”按钮C.显示对话框中有“是”按钮D.以上说法都不正确9.在窗体中建立三个文本框，名称分别为text1、text2和text3，还有一个名称为label1的标签，一个名称为command1的命令按钮，编写如下代码：Private Sub Command1_ClickDim x, y, z, t!x = Text1y = Text2z = Text3If x < y Thent = xx = yy = tEnd IfIf y < z Thent = yz = tIf x< y Thent = xx = yy = tEnd IfEnd IfLabel1.Caption = x & "," & y & "," & zEnd Sub当在文本框text1、text2 和 text3 中分别输入5、3和8，则标签显示的结果为(C)(单)A.3,5,8B.5,3,8C.8,5,3D.3.8.510.以下程序段：Private Sub Form_LoadDim Nop As Integer, Op As String * 1Num1 = 3Num2 = 2Nop = val(Inputbox("请输入1-4之间的整数"))Select Case NopCase 1Op = "+"Result = Num1 + Num2Case 2Op = "-"Result = Num1 - Num2Case 3Op = "×"Result = Num1 * Num2Case 4Op = "÷"Result = Num1 / Num2End SelectLabel1= Num1 & Op & Num2 & "=" & ResultEnd Sub窗体运行后，输入1，则label1的标题显示结果为(A)(单)A.3+2=5B.3-2=1C.3×2=6D.3÷2=1.511.以下程序段：Private Sub Form_LoadDim Nop As Integer, Op As String * 1Num1 = 3Num2 = 2Nop = val(Inputbox("请输入1-4之间的整数"))Select Case NopCase 1Op = "+"Result = Num1 + Num2Case 2Op = "-"Result = Num1 - Num2Case 3Op = "×"Result = Num1 * Num2Case 4Op = "÷"Result = Num1 / Num2End SelectLabel1= Num1 & Op & Num2 & "=" & ResultEnd Sub窗体运行后，输入2，则label1的标题显示结果为(B)(单)A.3+2=5B.3-2=1C.3×2=6D.3÷2=1.512.以下程序段：Private Sub Form_LoadDim Nop As Integer, Op As String * 1Num1 = 3Num2 = 2Nop = val(Inputbox("请输入1-4之间的'整数"))Select Case NopCase 1Op = "+"Result = Num1 + Num2Case 2Op = "-"Result = Num1 - Num2Case 3Op = "×"Result = Num1 * Num2Case 4Op = "÷"Result = Num1 / Num2End SelectLabel1= Num1 & Op & Num2 & "=" & ResultEnd Sub窗体运行后，输入3，则label1的标题显示结果为(C)(单) A.3+2=5B.3-2=1C.3×2=6D.3÷2=1.513.以下程序段：Private Sub Form_LoadDim Nop As Integer, Op As String * 1Num1 = 3Num2 = 2Nop = val(Inputbox("请输入1-4之间的整数")) Select Case NopCase 1Op = "+"Result = Num1 + Num2Case 2Op = "-"Result = Num1 - Num2Case 3Op = "×"Result = Num1 * Num2Case 4Op = "÷"Result = Num1 / Num2End SelectLabel1= Num1 & Op & Num2 & "=" & ResultEnd Sub窗体运行后，输入4，则label1的标题显示结果为(D)(单)A.3+2=5B.3-2=1C.3×2=6D.3÷2=1.514.以下程序段的作用是(A)(单)Private Sub Picture1_ClickDim asci As Integer, i As Integeri = 0For asci = 32 To 126Picture1.Print Tab(7 * i + 2); Chr(asci); "="; asci;i = i + 1If i = 7 Then i = 0: Picture1.PrintNext asciA.打印ASCII码表，一行7个表达式B.打印九九乘法表，一行7个表达式C.打印ASCII码表，一行8个表达式D.以上说法都不正确15.我国现在人口有13亿，按人口增长0.8%计算，多少年后我国人口将超过26亿。
计算机二级考试vb题库及答案
计算机二级考试vb题库及答案一、单选题1. 在VB中，以下哪个是正确的数据类型？A. IntegerB. IntC. DoubleD. All of the above答案：D2. VB中的哪个函数可以用来计算数组中元素的个数？A. UBoundB. LBoundC. UBound(数组名, 1)D. LBound(数组名, 1)答案：C3. 在VB中，以下哪个是合法的变量名？A. 2variableB. variable2C. $variableD. variable$答案：B4. VB中，以下哪个是正确的子程序声明？A. Sub 过程名()B. Function 过程名()C. Sub 过程名(ByVal 参数名 As 类型)D. All of the above答案：D5. 在VB中，以下哪个是正确的条件语句？A. If 条件 Then 语句B. If 条件 Then 语句 Else 语句C. If 条件 Then 语句 ElseIf 条件 Then 语句D. All of the above答案：D二、多选题1. VB中可以使用哪些循环结构？A. For...NextB. While...WendC. Do...LoopD. All of the above答案：D2. 在VB中，哪些是合法的数组声明方式？A. Dim 数组名() As IntegerB. Dim 数组名(1 To 10) As IntegerC. Dim 数组名 As Integer()D. ReDim 数组名(1 To 10)答案：A, B, C, D三、判断题1. VB中，所有变量在使用前都必须声明。
（对/错）答案：错2. VB中，一个模块可以包含多个Sub过程和Function过程。
（对/错）答案：对3. VB中，数组的下标总是从1开始。
（对/错）答案：错四、填空题1. 在VB中，使用________关键字可以声明一个全局变量。
计算机二级考试vb题库及答案
计算机二级考试vb题库及答案一、单项选择题1. 在VB中，以下哪个关键字用于声明变量？A. DimB. SubC. FunctionD. Const答案：A2. VB中的“模块”是什么？A. 一个包含多个窗体的集合B. 一个包含多个过程和变量的集合C. 一个包含多个控件的集合D. 一个包含多个模块的集合答案：B3. 在VB中，以下哪个函数用于计算两个日期之间的天数差？A. DateDiffB. DateAddC. FormatD. Now答案：A4. VB中，以下哪个控件用于显示文本信息？A. LabelB. TextBoxC. ComboBoxD. CheckBox答案：A5. 在VB中，如何实现循环结构？A. 使用If语句B. 使用For...Next语句C. 使用While...Wend语句D. 使用Select...Case语句答案：B二、填空题1. 在VB中，声明一个整型变量并赋值为10，可以使用语句________。
答案：Dim a As Integer: a = 102. VB中，若要实现“如果”逻辑，可以使用________语句。
答案：If3. VB中，要将一个字符串转换为小写，可以使用________函数。
答案：LCase4. 在VB中，要实现数组的排序，可以使用________函数。
答案：Sort5. VB中，若要打开一个文件进行读写，可以使用________语句。
答案：Open三、简答题1. 描述VB中事件驱动编程的概念。
答案：事件驱动编程是一种编程范式，程序的执行流程由外部事件（如用户操作、系统消息等）触发，而不是按照预先定义的顺序执行代码。
2. 简述VB中如何使用数组。
答案：在VB中，可以使用数组来存储一系列相同类型的数据。
声明数组时，需要指定数组的类型和大小。
例如，使用Dim arr(10) As Integer声明一个包含11个整数的数组。
四、编程题1. 编写一个VB程序，计算并输出1到100之间所有偶数的和。
计算机二级vb考试题库及答案
计算机二级vb考试题库及答案一、单选题1. VB中，以下哪个选项是正确的数据类型？A. IntegerB. DoubleC. StringD. All of the above答案：D2. 在VB中，以下哪个关键字用于声明变量？A. DimB. ConstC. OptionD. All of the above答案：D3. VB中，以下哪个函数用于计算两个数的绝对值？A. AbsB. SgnC. IntD. Round答案：A4. 在VB中，以下哪个控件用于显示文本信息？A. LabelB. TextBoxC. ComboBoxD. OptionButton答案：A5. VB中，以下哪个事件用于响应按钮点击？A. ClickB. DoubleClickC. MouseDownD. KeyDown答案：A二、多选题1. VB中，以下哪些是合法的变量名？A. myVarB. 2ndVarC. _varD. $var答案：A, C2. 在VB中，以下哪些是基本的数据类型？A. IntegerB. StringC. BooleanD. Date答案：A, B, C, D3. VB中，以下哪些是常用的流程控制语句？A. If...Then...ElseB. For...NextC. Do...LoopD. With...End With答案：A, B, C三、判断题1. VB中的数组声明时必须指定大小。
（对/错）答案：错2. VB中，所有变量在使用前都必须声明。
（对/错）答案：对3. VB中，Sub过程可以返回值。
（对/错）答案：错四、填空题1. 在VB中，使用________关键字可以定义一个函数。
答案：Function2. VB中，使用________方法可以获取当前系统时间。
答案：Now3. VB中，使用________方法可以打开一个文件进行读写。
答案：Open五、简答题1. 请简述VB中事件驱动编程的概念。
计算机二级vb考试题及答案
计算机二级vb考试题及答案一、单项选择题（每题2分，共20分）1. 在VB中，以下哪个选项是正确的数据类型？A. IntegerB. TextC. StringD. Real答案：C2. VB中，以下哪个函数用于计算两个数的和？A. SumB. AddC. AbsD. Round答案：A3. 以下哪个控件不是VB窗体设计器中的控件？A. LabelB. TextBoxC. ButtonD. Excel答案：D4. 在VB中，以下哪个属性用于设置文本框的只读属性？A. ReadOnlyB. EnabledC. VisibleD. MultiLine答案：A5. VB中，以下哪个事件是当文本框内容被改变时触发的？A. ClickB. ChangeC. DblClickD. KeyPress答案：B6. 在VB中，以下哪个关键字用于声明常量？A. DimB. ConstC. StaticD. Public答案：B7. VB中，以下哪个函数用于将字符串转换为小写？A. UCaseB. LCaseC. StrCompD. Trim答案：B8. 在VB中，以下哪个属性用于设置窗体的标题？A. CaptionB. TextC. NameD. Title答案：A9. VB中，以下哪个控件用于显示图像？A. PictureBoxB. ImageBoxC. LabelD. Button答案：A10. 在VB中，以下哪个事件是当按钮被点击时触发的？A. ClickB. LoadC. MouseDownD. MouseUp答案：A二、填空题（每题2分，共20分）1. 在VB中，使用________函数可以将字符串连接起来。
答案：Concatenate2. VB中，使用________关键字可以声明一个变量。
答案：Dim3. 当需要在VB中创建一个数组时，可以使用________关键字。
答案：Dim 或 ReDim4. VB中，使用________函数可以获取当前日期。
计算机二级vb考试题及答案
计算机二级vb考试题及答案一、单选题（每题2分，共20分）1. 在VB中，以下哪个关键字用于声明变量？A. DimB. SubC. FunctionD. Const答案：A2. VB中的窗体对象Form1的默认名称是什么？A. FormB. Form1C. MainFormD. Window1答案：B3. 在VB中，以下哪个控件用于显示文本，但不提供文本编辑功能？A. TextBoxB. LabelC. ComboBoxD. ListBox答案：B4. 如果要使一个变量在多个过程中共享，应该使用哪个关键字？A. PublicB. PrivateC. DimD. Static答案：A5. VB中，以下哪个事件是当窗体被关闭时触发的？A. LoadB. ClickC. UnloadD. Close答案：C6. 在VB中，以下哪个函数用于将字符串转换为数值？A. ValB. StrC. CIntD. Chr答案：A7. VB中，以下哪个控件允许用户从列表中选择一个项目？A. CheckBoxB. RadioButtonC. ComboBoxD. ListBox答案：D8. 在VB中，以下哪个关键字用于结束一个过程？A. EndB. ExitC. ReturnD. Stop答案：B9. VB中，以下哪个属性用于设置文本框的初始文本？A. TextB. CaptionC. ValueD. Label答案：A10. 在VB中，以下哪个方法用于向ListBox控件添加项目？A. AddB. InsertC. AppendD. AddItem答案：C二、填空题（每题2分，共20分）1. 在VB中，使用________关键字可以声明数组。
答案：Dim2. VB中的________事件是当窗体加载到内存时触发的。
答案：Load3. 使用________函数可以获取当前日期。
答案：Date4. VB中，________属性用于设置或返回一个控件的可见性。
计算机二级vb考试题及答案
计算机二级vb考试题及答案一、选择题（每题2分，共20分）1. 在VB中，以下哪个选项是正确的数据类型？A. IntegerB. DoubleC. StringD. All of the above答案：D2. VB中的哪个函数可以用来计算一个数的平方根？A. SqrB. PowC. LogD. Abs答案：A3. 在VB中，以下哪个控件用于显示文本？A. LabelB. TextBoxC. ComboBoxD. CheckBox答案：A4. VB中哪个事件用于响应按钮点击？A. ClickB. DoubleClickC. MouseDownD. KeyPress答案：A5. 在VB中，以下哪个选项是正确的循环结构？A. For...NextB. Do...LoopC. While...WendD. All of the above答案：D6. VB中哪个函数可以返回当前日期？A. NowB. DateC. TimeD. Today答案：D7. 在VB中，以下哪个选项是正确的数组声明方式？A. Dim arr(5) As IntegerB. Dim arr() As Integer = New Integer(5)C. Dim arr As Integer = New Integer(5)D. Dim arr(5) As String答案：A8. VB中哪个属性用于设置窗体的标题？A. CaptionB. TextC. TitleD. Label答案：A9. 在VB中，以下哪个选项是正确的条件语句？A. If...Then...ElseB. Select...CaseC. Do...WhileD. All of the above答案：A10. VB中哪个函数可以返回一个随机数？A. RandB. RandomizeC. IntD. Rnd答案：D二、填空题（每题2分，共10分）1. 在VB中，使用________函数可以生成一个介于0到1之间的随机数。
计算机二级vb考试试卷及答案
计算机二级vb考试试卷及答案一、单项选择题（每题2分，共20分）1. VB中，以下哪个不是基本数据类型？A. IntegerB. DoubleC. StringD. Array答案：D2. 在VB中，以下哪个关键字用于声明常量？A. DimB. ConstC. StaticD. Public答案：B3. VB中，以下哪个函数用于计算字符串的长度？A. LenB. LengthC. SizeD. Count答案：A4. 在VB中，以下哪个控件用于显示文本？A. LabelB. TextBoxC. ComboBoxD. CheckBox答案：A5. VB中，以下哪个语句用于结束当前循环？A. ContinueB. ExitC. BreakD. End答案：C6. 在VB中，以下哪个事件用于响应按钮点击？A. ClickB. DoubleClickC. MouseDownD. MouseUp答案：A7. VB中，以下哪个关键字用于定义过程？A. FunctionB. SubC. ClassD. Interface答案：B8. 在VB中，以下哪个属性用于设置控件的可见性？A. VisibleB. EnabledC. CaptionD. Text答案：A9. VB中，以下哪个语句用于声明变量？A. VarB. DimC. LetD. Set答案：B10. 在VB中，以下哪个控件用于选择一个项目？A. ListBoxB. ComboBoxC. CheckBoxD. RadioButton答案：B二、填空题（每题2分，共20分）1. VB中，使用________关键字可以声明一个变量。
答案：Dim2. 在VB中，使用________函数可以连接两个字符串。
答案：Concatenate3. VB中，使用________事件可以响应文本框内容的变化。
答案：TextChange4. 在VB中，使用________方法可以清除文本框中的内容。