下载文档原格式
全国计算机等级考试二级VB笔试试题(1)一、单项选择题(每小题2分，共70分)1. 设在菜单编辑器中定义了一个菜单项，名为menu1。
为了在运行时显示该菜单项，应使用的语句是( )。
A.menu1.Enabled=TrueB.menu1.Enabled=FalseC.menu1.Visible=TrueD.menu1.Visible=False 【答案】： C【解析】：显示是将属性Visual设置为True2. 以下合法的Visual Basic标识符是( )。
A.DoWhileB.DoC.56dD.A#BC【答案】：A【解析】：DoWhile是两个关键字拼接，从而变成非关键字，直接选择A。
B是关键字，丽C 以数字开头，D中间夹带字符“#”，均属于不允许之列。
3. 数据结构作为计算机的一门学科，主要研究数据的逻辑结构、对各种数据结构进行的运算，以及( )。
A.数据的存储结构B.计算方法C.数据映象D.逻辑存储【答案】：A4. 以下语句正确的是( )。
monDialog.Filter=All Files i*.*IPictures(*.bmp)|*.bmpmonDialog.Fliter="AllFileS"|"*.*"|"Pictures(*.bnlp)|"*.bmp"monDialog.Filter=="AllFiles|*.*|Pictures(*.bmp)|*.bmp"monDialog.Filter={ All Files |*.*| Pictures(*.bmp)|*.bmp}【答案】：C【解析】：这是概念题，答案为C。
可以这样解题：Filter属性要求的是字符串，所以只能从B和C中选择。
不会使用像B那样的混乱方式，由此可以判定应该选择C。
5. 下述关于数据库系统的叙述中正确的是( )。
A.数据库系统中数据的一致性是指数据类型一致B.数据库系统比文件系统能管理更多的数据C.数据库系统减少了数据冗余D.数据库系统避免了一切冗余【答案】：C【解析】：C和D两者的描述对象一样，结果必然在这两者之中。
二级vb计算机试题及答案题目：二级VB计算机试题及答案一、选择题（每题2分，共40分）1. VB是哪个公司的开发工具？A. 微软B. 谷歌C. 苹果D. IBM2. VB是基于哪种编程语言开发的？A. C#B. JavaC. Visual BasicD. Python3. VB中用于显示消息框的语句是：A. MessageBox.ShowB. Console.ReadLineC. PrintD. MsgBox4. 下面哪个功能不属于VB开发的特点？A. 可视化界面设计B. 强大的数据库支持C. 高效的并发处理能力D. 多线程编程支持5. VB中声明一个整型变量的关键字是：A. intB. byteC. integerD. dim二、填空题（每题2分，共20分）1. VB中的对象是通过_________进行创建和使用的。
2. VB中用于循环控制的关键字是_________。
3. VB语言中的函数返回值类型可以是_________。
4. VB中用于判断条件的关键字是_________。
5. VB中用于定义常量的关键字是_________。
三、简答题（每题5分，共30分）1. VB中的控件是什么？2. VB中的“事件”是什么？举例说明。
3. VB中的数组有哪些类型？请简述各自的特点。
4. VB中的循环语句有哪些？请简述各自的应用场景。
5. VB中的错误处理机制是什么？如何使用？四、编程题（共30分）请使用VB语言编写一个简单的计算器程序，要求满足以下功能：1. 界面设计：包括两个文本框用于输入两个数字，一个下拉列表选择运算符号，一个按钮用于触发计算。
2. 运算功能：根据选择的运算符号，对输入的两个数字进行相应的计算（加、减、乘、除），并将结果显示在一个文本框中。
注意事项：- 每个题目的答案请放在相应的题目下方。
- 答案可以按照题目顺序直接写在文章中，无需换行或空行。
- 格式排版整洁美观，语句通顺，使用合适的标点符号和语法结构。
计算机vb二级考试试题及答案一、单项选择题（每题2分，共20分）1. 在Visual Basic中，下列哪个选项是正确的变量声明方式？A. Dim a$B. Dim a% IntegerC. Dim a As IntegerD. Dim a Integer答案：C2. 下列哪个函数用于计算一个数的平方？A. SqrB. AbsC. RoundD. Sq答案：A3. 在Visual Basic中，哪个控件用于显示图像？A. LabelB. PictureBoxC. TextBoxD. ComboBox答案：B4. 下列哪个选项是正确的Visual Basic程序结构？A. Sub Main()B. Function Main()C. Procedure Main()D. Process Main()答案：A5. 在Visual Basic中，哪个关键字用于声明一个子程序？A. FunctionB. SubC. ClassD. Module答案：B6. 下列哪个选项是正确的数组声明方式？A. Dim arr(10)B. Dim arr As Integer(10)C. Dim arr(10) As IntegerD. Dim arr Integer(10)答案：C7. 在Visual Basic中，哪个控件用于创建下拉列表？A. ListBoxB. ComboBoxC. CheckBoxD. OptionButton答案：B8. 下列哪个选项是正确的条件语句？A. If condition ThenB. If condition BeginC. If condition Then ElseD. If condition Begin Else答案：C9. 在Visual Basic中，哪个关键字用于退出当前的循环？A. ContinueB. ExitC. BreakD. Return答案：C10. 下列哪个选项是正确的Visual Basic事件处理方式？A. Function eventname()B. Sub eventname()C. Procedure eventname()D. Call eventname()答案：B二、填空题（每题2分，共20分）1. 在Visual Basic中，使用________关键字可以声明一个全局变量。
二级vb计算机考试试题及答案一、选择题1. VB是指以下哪个编程语言？A. Visual StudioB. Visual BasicC. Virtual BasicD. Visual 2. VB中用于声明整型变量的关键字是：A. intB. doubleC. stringD. integer3. 下列哪个不是VB的控件？A. ButtonB. TextBoxC. LabelD. Table4. 在VB中，以下哪个操作符用于连接字符串？A. +B. -C. *D. /5. VB中的条件判断语句是：A. Switch CaseB. For LoopC. If ElseD. While Loop二、填空题1. VB中用于定义子程序的关键字是________。
2. VB中用于将变量转换为整数的函数是________。
3. VB中用于获取用户输入的函数是________。
4. VB中用于退出程序的语句是________。
5. VB中用于显示消息框的函数是________。
三、简答题1. 请简要介绍VB的基本特点和用途。
VB（Visual Basic）是一种基于事件驱动的编程语言，其主要特点包括易学易用、可视化设计、面向对象等。
它广泛应用于Windows平台的软件开发，尤其适合开发图形界面的应用程序。
2. 请简述VB中的循环语句，并举例说明其用法。
在VB中，循环语句主要有For循环、While循环和Do While循环。
这些循环语句用于重复执行特定的代码块，直到满足某个条件为止。
例如，使用For循环来输出1到10的数字：```vbFor i = 1 To 10Console.WriteLine(i)Next```3. 请简要介绍VB中的数组，并说明其用途。
在VB中，数组是一种用于存储多个相同类型数据的容器。
它可以一次性声明和管理多个变量，提供了方便的方式来操作一系列数据。
数组在处理大量数据时非常有用，可以通过循环遍历数组来进行一系列的操作。
计算机二级vb试题题目及答案一、选择题（每题2分，共20分）1. 在VB中，以下哪个选项是正确的字符串比较？A. "Hello" > "hello"B. "Hello" < "hello"C. "Hello" = "hello"D. "Hello" <> "hello"答案：B2. VB中，哪个函数可以用来计算数组中元素的个数？A. UBoundB. LBoundC. CountD. Size答案：A3. 在VB中，以下哪个选项表示创建一个名为“myForm”的窗体？A. Form myFormB. Dim myForm As FormC. Dim myFormD. Form myForm As New Form答案：D4. VB中，下列哪个选项是正确的文件打开模式？A. Open "filename" For Input As #1B. Open "filename" For Output As #1C. Open "filename" For Append As #1D. All of the above答案：D5. 在VB中，以下哪个选项是正确的数据类型？A. IntegerB. IntC. FloatD. All of the above答案：D6. VB中，哪个关键字用来声明一个变量？A. DimB. DeclareC. ConstD. All of the above答案：D7. 在VB中，以下哪个选项是正确的循环结构？A. ForB. DoC. WhileD. All of the above答案：D8. VB中，哪个函数可以用来获取当前系统日期？A. NowB. DateC. TimeD. Today答案：D9. 在VB中，以下哪个选项表示创建一个名为“myButton”的按钮？A. Button myButtonB. Dim myButton As ButtonC. Dim myButtonD. Button myButton As New Button答案：D10. VB中，哪个关键字用来结束一个程序的运行？A. EndB. ExitC. StopD. All of the above答案：D二、填空题（每题2分，共20分）1. 在VB中，使用________关键字可以声明一个全局变量。
国家二级计算机vb考试试题及答案一、单项选择题（每题2分，共20分）1. 在Visual Basic中，以下哪个选项不是基本数据类型？A. IntegerB. StringC. ObjectD. Boolean答案：C2. 如果一个变量被声明为Dim x As Integer，那么x的值可以是以下哪个？A. 123B. "Hello"C. 3.14D. True答案：A3. 在Visual Basic中，哪个关键字用于声明过程？A. FunctionB. SubC. IfD. For答案：B4. 下列哪个选项不是Visual Basic的控件？A. TextBoxB. LabelC. ButtonD. List答案：D5. 在Visual Basic中，以下哪个选项可以用于循环结构？A. ForB. IfC. Select CaseD. With答案：A6. 在Visual Basic中，哪个函数用于计算一个数的绝对值？A. AbsB. RoundC. IntD. Sgn答案：A7. 在Visual Basic中，哪个属性用于设置文本框的只读属性？A. ReadOnlyB. BackColorC. ForeColorD. Enabled答案：A8. 在Visual Basic中，哪个事件用于响应按钮点击？A. ClickB. DoubleClickC. MouseDownD. MouseUp答案：A9. 在Visual Basic中，哪个关键字用于创建数组？A. ArrayB. ListC. CollectionD. Dim答案：D10. 在Visual Basic中，哪个函数用于将字符串转换为数字？A. StrB. ValC. CStrD. Chr答案：B二、填空题（每题2分，共20分）1. 在Visual Basic中，使用________关键字可以声明一个全局变量。
答案：Public2. 如果一个变量的值需要在多个过程中共享，应该使用________关键字进行声明。
国家二级计算机vb考试试题及答案一、单项选择题（每题1分，共10分）1. 在VB中，用于定义变量的关键字是（）。
A. DimB. SubC. FunctionD. Const答案：A2. 下列哪个选项不是VB中的控制结构？（）A. 顺序结构B. 选择结构C. 循环结构D. 函数结构答案：D3. VB中，用于声明一个子程序的关键字是（）。
A. FunctionB. SubC. DimD. Const答案：B4. 在VB中，用于表示逻辑“与”运算符的是（）。
A. AndB. OrC. NotD. Xor答案：A5. VB中，用于表示逻辑“或”运算符的是（）。
A. AndB. OrC. NotD. Xor答案：B6. 在VB中，用于声明一个数组的关键字是（）。
A. DimB. SubC. FunctionD. Const答案：A7. VB中，用于声明一个常量的关键字是（）。
A. DimB. SubC. FunctionD. Const答案：D8. 在VB中，用于表示逻辑“非”运算符的是（）。
A. AndB. OrC. NotD. Xor答案：C9. VB中，用于声明一个函数的关键字是（）。
A. FunctionB. SubC. DimD. Const答案：A10. 在VB中，用于表示逻辑“异或”运算符的是（）。
A. AndB. OrC. NotD. Xor答案：D二、填空题（每题2分，共10分）1. 在VB中，使用____关键字可以定义一个全局变量。
答案：Public2. 当需要在VB中定义一个私有变量时，应使用____关键字。
答案：Private3. 在VB中，使用____关键字可以定义一个局部变量。
答案：Dim4. VB中，使用____关键字可以定义一个过程。
答案：Sub5. VB中，使用____关键字可以定义一个函数。
答案：Function三、简答题（每题5分，共20分）1. 请简述VB中事件驱动编程的概念。
计算机vb二级考试试题及答案一、选择题（每题2分，共20分）1. VB中用于声明变量的关键字是：A. DimB. DeclareC. ConstD. Let答案：A2. 在VB中，下列哪个选项不是合法的变量名？A. _myVariableB. 123VariableC. myVariableD. Variable$答案：B3. VB中，用于结束一个循环的语句是：A. ContinueB. ExitC. BreakD. Stop答案：B4. 在VB中，下列哪个函数用于计算字符串的长度？A. Len()B. Length()C. StrLen()D. Size()答案：A5. 下列哪个选项不是VB中的流程控制语句？A. If...ThenB. For...NextC. Do...LoopD. Switch...Case答案：D6. VB中，用于定义一个类模块的关键字是：A. ClassB. ModuleC. FormD. Sub答案：A7. 在VB中，下列哪个选项是正确的事件处理程序的声明方式？A. Private Sub Button1_Click()B. Public Sub Button1_Click()C. Private Function Button1_Click()D. Public Function Button1_Click()答案：A8. VB中，用于创建一个数组的语句是：A. Dim arr(5) As IntegerB. Dim arr As Integer(5)C. Dim arr As Integer[5]D. Dim arr(5) As Integer()答案：A9. 在VB中，下列哪个选项不是合法的数值类型？A. IntegerB. DoubleC. StringD. Long答案：C10. VB中，下列哪个选项是正确的字符串连接操作？A. "Hello" & "World"B. "Hello" || "World"C. "Hello" + "World"D. "Hello" ||| "World"答案：A二、填空题（每题2分，共10分）1. 在VB中，使用________函数可以将数字转换为字符串。
计算机二级《VB》考题与答案计算机二级《VB》考题与答案 1单选题(每小题1分共30分)在微机中，1MB准确等于__B__。
A、 1024×1024个字B、 1024×1024个字节C、 1000×1000个字节D、 1000×1000个字十进制整数100化为二进制数是_A___。
A、 1100100B、 1101000C、 1100010D、 1110100 计算机病毒是指___C_ 。
A、带细菌的磁盘B、已损坏的磁盘C、具有破坏性的特制程序D、被破坏的程序计算机的主存储器是指 __C__。
A、RAM和磁盘B、ROMC、ROM和RAMD、硬盘和控制器下列描述中不正确的是_B___。
A、多媒体技术最主要的两个特点是集成性和交互性B、所有计算机的字长都是固定不变的，都是8位C、通常计算机的存储容量越大，性能就越好D、各种高级语言的翻译程序都属于系统软件在_C___视图下可以插入页眉和页脚。
A、普通B、大纲C、页面D、主控文档8.关于Word的常用工具栏，下面说法正确的是( C )。
A.不包括文档建立B.不包括打印预览C.不包括自动滚动D.不能设置字体9、在Windows的回收站中，可以恢复 __A__。
A、从硬盘中删除的文件或文件夹B、从软盘中删除的文件或文件夹C、剪切掉的文档D、从光盘中删除的文件或文件夹10、为获得WINDOWS帮助，必须通过下列途径__D_。
A、在“开始”菜单中运行“帮助”命令B、选择桌面并按F1键C、在使用应用程序过程中按F1键D、A和B都对11、在WORD中查找和替换正文时，若操作错误则__A__。
A、可用“撤消”来恢复B、必须手工恢复C、无可挽回D、有时可恢复，有时就无可挽回12、在Word中，___B___用于控制文档在屏幕上的'显示大小。
A、全屏显示B、显示比例C、缩放显示D、页面显示13、Word在正常启动之后会自动打开一个名为___D___的文档。
计算机二级vb考试题库及答案一、单项选择题（每题2分，共20分）1. VB中，以下哪个函数用于计算字符串的长度？A. UCaseB. LCaseC. LenD. Mid答案：C2. 在VB中，以下哪个选项表示“不等于”的比较运算符？A. =B. <>C. ==D. <=答案：B3. VB中，以下哪个控件用于显示图像？A. LabelB. PictureBoxC. TextBoxD. ComboBox答案：B4. 在VB中，以下哪个关键字用于声明一个过程？A. FunctionC. DimD. Const答案：B5. VB中，以下哪个选项是正确的变量声明方式？A. Dim xB. Dim x%C. Dim x$D. All of the above答案：D6. 在VB中，以下哪个语句用于结束当前循环？A. ContinueB. ExitC. BreakD. Loop答案：B7. VB中，以下哪个控件用于接收用户输入的文本？A. CheckBoxB. TextBoxC. ListBoxD. ComboBox答案：B8. 在VB中，以下哪个选项表示“大于等于”的比较运算符？B. <=C. >=D. <答案：C9. VB中，以下哪个函数用于将字符串转换为大写？A. UCaseB. LCaseC. StrCompD. Trim答案：A10. 在VB中，以下哪个关键字用于声明一个数组？A. DimB. ConstC. FunctionD. Sub答案：A二、填空题（每题2分，共20分）1. VB中，使用________函数可以将字符串中的字符转换为小写。
答案：LCase2. VB中，使用________关键字可以声明一个全局变量。
答案：Public3. VB中，使用________语句可以创建一个新的过程。
答案：Sub 或 Function4. VB中，使用________控件可以显示和选择多个项目。
国家二级计算机vb考试试题及答案一、单项选择题（每题1分，共20分）1. 在Visual Basic中，以下哪个选项是正确的数据类型？A. IntegerB. DoubleC. StringD. All of the above答案：D2. 下列哪个函数用于计算两个数的和？A. Max()B. Min()C. Sum()D. Avg()答案：C3. 在Visual Basic中，以下哪个关键字用于声明一个过程？A. FunctionB. SubC. ClassD. Property答案：B4. 如果变量x的值为5，那么表达式x > 3 AND x < 7的结果是什么？A. TrueB. FalseC. 5D. 3答案：A5. 在Visual Basic中，以下哪个控件用于显示文本，但不提供文本选择功能？A. LabelB. TextBoxC. ComboBoxD. ListBox答案：A6. 下列哪个属性用于设置文本框（TextBox）的只读状态？A. ReadOnlyB. EnabledC. VisibleD. BackColor答案：A7. 在Visual Basic中，以下哪个事件用于响应按钮点击？A. ClickB. LoadC. ChangeD. KeyPress答案：A8. 如果需要在Visual Basic程序中创建一个数组，以下哪个声明是正确的？A. Dim arr(5)B. Dim arr() As IntegerC. Dim arr As Integer()D. Dim arr(5) As Integer答案：D9. 在Visual Basic中，以下哪个控件用于选择一个日期？A. LabelB. TextBoxC. ComboBoxD. DateTimePicker答案：D10. 下列哪个属性用于设置窗体的标题？A. TextB. CaptionC. TitleD. Name答案：B11. 在Visual Basic中，以下哪个关键字用于退出当前过程？A. ExitB. EndC. ReturnD. Stop答案：A12. 如果变量x的值为10，那么表达式Not x > 5的结果是什么？A. TrueB. FalseC. 9D. -11答案：B13. 在Visual Basic中，以下哪个控件用于显示图像？A. PictureBoxB. ImageBoxC. LabelD. TextBox答案：A14. 下列哪个属性用于设置命令按钮（CommandButton）的点击事件？A. ClickB. CommandC. ActionD. Press答案：A15. 在Visual Basic中，以下哪个函数用于将字符串转换为数字？A. Str()B. Val()C. Chr()D. Asc()答案：B16. 如果变量x的值为"Hello"，那么表达式Len(x)的值是多少？A. 5B. 4C. 6D. 7答案：C17. 在Visual Basic中，以下哪个控件用于显示下拉列表？A. ListBoxB. ComboBoxC. CheckBoxD. RadioButton答案：B18. 下列哪个属性用于设置文本框（TextBox）的文本对齐方式？A. TextAlignB. TextModeC. TextAlignModeD. TextAlignType答案：A19. 在Visual Basic中，以下哪个事件用于响应文本框内容的改变？A. ChangeB. ClickC. DblClickD. KeyPress答案：A20. 如果变量x的值为True，那么表达式x AND False的结果是什么？A. TrueB. FalseC. 1D. 0答案：B结束语：以上是国家二级计算机VB考试的部分单项选择题及答案，希望能够帮助考生们更好地复习和准备考试。
全国计算机等级考试二级教程vb答案一、单选题（每题1分，共10分）1. 在VB中，以下哪个选项不是基本数据类型？A. IntegerB. DoubleC. StringD. Object答案：D2. VB中，以下哪个关键字用于声明常量？A. DimB. ConstC. ReDimD. Static答案：B3. 如果一个变量被声明为Static，则以下哪个描述是正确的？A. 变量在每次调用过程中都会重新初始化B. 变量在程序运行期间只初始化一次C. 变量的生命周期与程序相同D. 变量在每次调用过程中保持其值答案：D4. 在VB中，以下哪个函数用于将字符串转换为数字？A. StrB. ValC. CIntD. CStr5. VB中的哪个控件用于显示文本，但不允许用户编辑？A. TextBoxB. LabelC. ComboBoxD. CheckBox答案：B6. 在VB中，以下哪个事件用于响应鼠标单击操作？A. ClickB. DoubleClickC. MouseDownD. MouseUp答案：A7. VB中，以下哪个属性用于设置或返回一个控件的可见性？A. VisibleB. EnabledC. CaptionD. Font答案：A8. 在VB中，以下哪个关键字用于循环遍历数组中的所有元素？A. ForB. DoC. WhileD. Each答案：A9. VB中，以下哪个函数用于计算一个数的平方根？B. PowC. LogD. Abs答案：A10. 在VB中，以下哪个控件用于创建下拉选择列表？A. ListBoxB. ComboBoxC. CheckBoxD. OptionButton答案：B二、填空题（每题2分，共10分）1. 在VB中，使用________关键字可以声明一个变量为全局变量。
答案：Public2. VB中的________方法用于在运行时动态创建控件。
答案：CreateControl3. 使用________函数可以获取当前日期。
全国计算机二级vb考试试题及答案一、单项选择题（每题2分，共40分）1. VB中，以下哪个不是基本数据类型？A. IntegerB. DoubleC. StringD. Object答案：D2. 在VB中，以下哪个关键字用于声明变量？A. DimB. ConstC. FunctionD. Sub答案：A3. VB中，以下哪个函数用于计算字符串的长度？A. LenB. LengthC. SizeD. Count答案：A4. 在VB中，以下哪个是正确的循环结构？A. ForB. WhileC. LoopD. All of the above答案：D5. VB中，以下哪个不是控制结构？A. IfB. Select CaseC. DoD. Call答案：D6. 在VB中，以下哪个不是数组的声明方式？A. Dim arr(10) As IntegerB. Dim arr() As Integer = New Integer(10)C. ReDim arr(10)D. Dim arr As Integer = {1, 2, 3}答案：D7. VB中，以下哪个不是窗体(Form)的属性？A. NameB. CaptionC. TextD. Color答案：C8. 在VB中，以下哪个不是基本的输入输出函数？A. InputBoxB. MsgBoxC. PrintD. MessageBox答案：D9. VB中，以下哪个不是事件驱动编程中的事件？A. ClickB. LoadC. ChangeD. Execute答案：D10. 在VB中，以下哪个不是常用的控件？A. LabelB. TextBoxC. ButtonD. Chart答案：D11. VB中，以下哪个不是控件的属性？A. NameB. TextC. ValueD. Execute答案：D12. 在VB中，以下哪个不是控件的事件？A. ClickB. DoubleClickC. MouseDownD. Open答案：D13. VB中，以下哪个不是文件操作的函数？A. OpenB. CloseC. WriteD. Execute答案：D14. 在VB中，以下哪个不是数据库访问的方法？A. OpenB. FetchC. UpdateD. Execute答案：D15. VB中，以下哪个不是错误处理的关键字？A. On ErrorB. ResumeC. ExitD. Err答案：C16. 在VB中，以下哪个不是面向对象编程的概念？A. ClassB. ObjectC. InterfaceD. Function答案：D17. VB中，以下哪个不是类的成员？A. PropertyB. MethodC. EventD. Variable答案：D18. 在VB中，以下哪个不是继承的特性？A. 单继承B. 多继承C. 覆盖D. 封装答案：B19. VB中，以下哪个不是多态性的表现？A. 方法重载B. 方法重写C. 接口实现D. 函数调用答案：D20. 在VB中，以下哪个不是封装的体现？A. PrivateB. PublicC. ProtectedD. Friend答案：D二、填空题（每题2分，共20分）1. VB中，声明一个整型变量并赋值为10的语句是：Dim num As Integer; num = _______。
2024年等级考试-计算机二级-VB语言程序设计考试历年真题常考点试题带答案（图片大小可任意调节）第1卷一.单选题(共20题)1.如果要改变窗体的标题,则需要设置的属性是A.BorderStyleC.BackColorD.Caption2.窗体的 DrawWidth属性值设置为大于 1 时，下列 ( ) 属性会失去作用A.BackcolorB.FillStyleC.DrawstyleD.Fillcolor3.要改变控件的宽度，应修改该控件的 ( ) 属性。
A.TopB.LeftC.WidthD.Height4.要使鼠标指向“命令按钮”时，出现一个提示文本，应设置其()属性。
A.ToolTipTextB.StyleC.PictureD.Caption5.下面方法不属于列表框和组合框。
B.AddItemC.GetFocusD.RemoveItem6.为了把焦点移到某个指定的控件,所使用指定的控件的()方法.A.VisibleB.RefreshC.SetFocusD.GetFocus7.下列数据类型中,占用内存最大的是A.BooleanB.IntegerC.ByteD.Single8.要使标签控件标题内容居中显示，应设置其()属性。
A.ToolTipTextB.AlignmentC.BackStyleD.Appearance9.定时器控件唯一能够响应的事件为()A.Click事件B.Timer事件C.Change事件D.DblClick事件10.对象不具有 Caption 属性。
belB.OptionC.FormD.Timer11.产生[10,37]之间的随机整数的VisualBasic表达式是A.Int(Rnd(1)*27)+11B.Int(Rnd (1)*28)+11C.Int (Rnd(1) w28)+10D.In t(Rnd(1)*27)+1012.以下关键字中,不能定义变量的就是()C.PublicD.Private13.下列数据类型中，占用内存最小的是A.BooleanB.ByteC.IntegerD.Single14.程序运行后,在窗体上单击鼠标,此时窗体不会接收到的事件是A.LoadB.ClickC.MouseDownD.MouseUp15.以下关于窗体的描述中，错误的是()。
计算机等级考试二级VB试题及答案计算机等级考试二级VB试题及答案一、选择题(1)假设线性表的长度为n，则在最坏情况下，冒泡排序需要的比较次数为A)log2nB)n2C)O(n1..5)D)n(n-1)/2正确答案: D(2)算法分析的目的是A)找出数据结构的合理性B)找出算法中输入和输出之间的关系C)分析算法的易懂性和可靠性D)分析算法的效率以求改进正确答案: D(3)线性表L=(a1,a2,a3,…ai，…an)，下列说法正确的是A)每个元素都有一个直接前件和直接后件B)线性表中至少要有一个元素C)表中诸元素的排列顺序必须是由小到大或由大到小D)除第一个元素和最后一个元素外，其余每个元素都有一个且只有一个直接前件和直接后件正确答案: D(4)在单链表中，增加头结点的目的是A)方便运算的实现B)使单链表至少有一个结点C)标识表结点中首结点的位置D)说明单链表是线性表的链式存储实现正确答案: A(5)软件工程的出现是由于A)程序设计方法学的影响B)软件产业化的需要C)软件危机的出现D)计算机的发展正确答案: C(6)软件开发离不开系统环境资源的支持，其中必要的测试数据属于A)硬件资源B)通信资源C)支持软件D)辅助资源正确答案: D(7)在数据流图(DFD)中，带有名字的箭头表示A)模块之间的调用关系B)程序的组成成分C)控制程序的执行顺序D)数据的流向正确答案: D(8)分布式数据库系统不具有的特点是A)数据分布性和逻辑整体性B)位置透明性和复制透明性C)分布性D)数据冗余正确答案: D(9)关系表中的每一横行称为一个A)元组B)字段C)属性D)码正确答案: A(10)下列数据模型中，具有坚实理论基础的是A)层次模型B)网状模型C)关系模型D)以上3个都是(11)下列说法正确的是A)对象的可见性可设为True或FalseB)标题的属性值不可设为任何文本C)属性窗口中属性只能按字母顺序排列D)某些属性的值可以跳过不设置，自动设为空值正确答案: A(12)下列关于退出Visual Basic系统的方法的描述错误的是A)打开Visual Basic主窗体的"文件"菜单，执行其中的"退出"命令B)按快捷键Alt+Q退出C)单击Visual Basic主窗体右上角的"关闭"按钮D)按快捷键Alt+E退出正确答案: D(13)单击窗体上的关闭按钮时，触发的事件是A)Form_Initialize( )B)Form_Load( )C)Form_Unload( )D)Form_Click( )正确答案: C(14)在代码编辑器中，续行符是用来换行书写同一个语句的符号，用以表示续行符的是A)一个空格加一个下划线"_"B)一个下划线"_"C)一个造字符"-"D)一个空格加一个连字符"-"正确答案: A(15)为了暂时关闭计时器，应把该计时器控件的哪个属性设置为False?A)VisibleB)TimerC)EnabledD)Interval正确答案: C(16)以下关于Visual Basic数据类型的说法，不恰当的是A)Visual Basic 6.0提供的数据类型主要有字符串型和数值型，此外还有字节、货币、对象、日期、布尔和变体数据类型等B)目前Decimal数据类型只能在变体类型中使用C)用户不能定义自己的数据类型D)布尔型数据只能取两种值，用两个字节存储正确答案: C(17)以下各项，可以作为Visual Basic变量名的是A)BookB)2_SeekC)123.58D)Book-1正确答案: A(18)表达式(3 / 2 + 1)* (5 / 2 + 2)的值是A)11.25B)3C)6.125D)4正确答案: A(19)关于自定义对话框概念的说明，错误的是A)建立自定义对话框时必须执行添加窗体的操作B)自定义对话框实际上是VB的窗体C)在窗体上还要使用其他控件才能组成自定义对话框D)自定义对话框不一定要有与之对应的事件过程正确答案: D(20)下面Change事件过程中，文本框控件Text1用来接收数字字符的输入，该事件过程的作用是Private Sub Text1_Change()Text2.Text=Str(6.28 * Val(Text1.Text))End SubA)将在文本框Text1输入的数字变为数值B)将在文本框Text1输入的数字作为半径，求圆的周长并转换为字符串C)只要Text1中的内容一改变，T ext2中显示的圆周长也随之改变D)事件过程中的.Val函数和Str函数使用错误，事件过程不能执行正确答案: C21)用什么语句可以选择指定的表项或取消已选择的表项?A)列表框.Selected(索引值)B)列表框名.Selected(索引值)=True|FalseC)列表框.SelectedD)列表框名.Selected=True|False正确答案: B(22)用于将屏幕上的对象分组的控件是A)列表框B)组合框C)标签D)框架正确答案: D(23)以下说法不正确的是A)使用ReDim语句可以改变数组的维数B)使用ReDim语句可以改变数组的类型C)使用ReDim语句可以改变数组的每一维的大小D)使用ReDim语句可以改变对数组中的所有元素进行初始化正确答案: B(24)有如下事件过程：Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)If (Button And 3)=3 ThenPrint "OK"End IfEnd Sub程序运行后，为了在窗体上输出"OK"，应当按下的鼠标键是A)左键B)右键C)同时按下左键和右键D)按什么都不显示正确答案: D(25)在窗体上画一个名称为CommonDialog1的通用对话框，一个名称为Command1的命令按钮，要求单击命令按钮时，打开一个保存文件的对话框，该窗口的标题为"Save"，缺省文件名称为"SaveFile"，在"文件类型"栏中显示*txt，则能够满足上述要求的程序是A)Private Sub Command1_Click()CommonDialog1.FileName="SaveFile"CommonDialog1.Filter="AllFiles|*.*|(*.txt)|*.txt|(*.doC)|*.doc"CommonDialog1.FilterIndex=2CommonDialog1.DialogTitle="Save"CommonDialog1.Action=2End SubB)Private Sub Command1_Click()CommonDialog1.FileName="SaveFile"CommonDialog1.Filter="AllFiles|*.*|(*.txt)|*.txt|(*.doC)|*.doc"CommonDialog1.FilterIndex=1CommonDialog1.DialogTitle="Save"CommonDialog1.Action=2End SubC)Private Sub Command1_Click()CommonDialog1.FileName="Save"CommonDialog1.Filter="AllFiles|*.*|(*.txt)|*.txt|(*.doC)|*.doc" CommonDialog1.FilterIndex=2CommonDialog1.DialogTitle="SaveFile" CommonDialog1.Action=2End SubD)Private Sub Command1_Click()CommonDialog1.FileName="SaveFile"CommonDialog1.Filter="AllFiles|*.*|(*.txt)|*.txt|(*.doC)|*.doc" CommonDialog1.FilterIndex=1CommonDialog1.DialogTitle="Save"CommonDialog1.Action=1End Sub正确答案: A (26)阅读下面的程序段：For a=1 To 2For b=1 To aFor c=b To 2I=I + 1NextNextNextPrint I执行上面的三重循环后，I的值为A)4B)5C)6D)9正确答案: B(27)设有下面的循环：i=0While i <=1i=i + 3Print iWend则运行后的输出结果是A)1B)2C)3D)4正确答案: C(28)设有下面的循环：i=1Doi=i + 3Print iLoop Until I>程序运行后要执行3次循环体，则条件中I的最小值为A)6B)7C)8D)9正确答案: B(29)执行以下语句过程，在窗体上显示的内容是Option Base 0Private Sub Command3_Click()Dim dd=Array("a", "b", "c", "d")Print d(1); d(3)End SubA)abB)bdC)acD)出错正确答案: B(30)下列程序段，在运行时最早输出的内容是a=2c=1AAA:c=c + aIf c < 10 ThenPrint cGoTo AAAElsePrint "10以内的奇数显示完毕。
全国计算机二级vb考试试题及答案一、单项选择题（每题2分，共40分）1. VB中，以下哪个函数用于获取当前系统时间？A. NowB. DateC. TimeD. Timer答案：A2. 在VB中，以下哪个控件用于显示文本信息？A. LabelB. TextBoxC. ComboBoxD. ListBox答案：A3. VB中，以下哪个属性用于设置文本框的只读属性？A. ReadOnlyB. EnabledC. VisibleD. BackColor答案：A4. 在VB中，以下哪个事件用于响应文本框内容的改变？A. ClickB. ChangeC. DblClickD. KeyPress答案：B5. VB中，以下哪个关键字用于声明全局变量？A. DimB. PublicC. PrivateD. Static答案：B6. 在VB中，以下哪个函数用于计算两个数的和？A. SumB. AddC. PlusD. +答案：D7. VB中，以下哪个属性用于设置窗体的标题？A. CaptionB. TextC. TitleD. Name答案：A8. 在VB中，以下哪个事件用于响应窗体的关闭？A. LoadB. UnloadC. CloseD. FormClosing答案：B9. VB中，以下哪个关键字用于定义过程？A. FunctionB. SubC. ProcedureD. Method答案：B10. 在VB中，以下哪个控件用于显示下拉列表？A. ListBoxB. ComboBoxC. CheckBoxD. OptionButton答案：B11. VB中，以下哪个属性用于设置按钮的点击事件？A. ClickB. CommandC. PressD. Activate答案：A12. 在VB中，以下哪个函数用于获取系统日期？A. NowB. DateC. TimeD. Timer答案：B13. VB中，以下哪个属性用于设置文本框的字体大小？A. FontSizeB. FontC. SizeD. TextSize答案：B14. 在VB中，以下哪个事件用于响应鼠标的双击动作？A. ClickB. DblClickC. MouseDownD. MouseUp答案：B15. VB中，以下哪个关键字用于声明局部变量？A. DimB. PublicC. PrivateD. Static答案：A16. 在VB中，以下哪个函数用于获取系统时间？A. NowB. DateC. TimeD. Timer答案：C17. VB中，以下哪个属性用于设置标签的背景颜色？A. BackColorB. BackgroundColorC. ColorD. FillColor答案：A18. 在VB中，以下哪个事件用于响应鼠标的按下动作？A. ClickB. MouseDownC. MouseUpD. DblClick答案：B19. VB中，以下哪个关键字用于声明静态变量？A. DimB. PublicC. PrivateD. Static答案：D20. 在VB中，以下哪个控件用于显示复选框？A. CheckBoxB. OptionButtonC. RadioButtonD. ToggleButton答案：A二、填空题（每题2分，共20分）1. VB中，使用________关键字可以声明一个数组。
国家二级计算机vb考试试题及答案一、单项选择题1. 下列选项中，属于VB常用数据类型的是：A) IntegerB) StringC) BooleanD) All of the above答案: D2. 下列关于VB中函数和子过程的说法，哪个是正确的？A) 函数可以返回一个值，子过程不能返回值B) 函数和子过程都可以返回一个值C) 函数和子过程都不能返回值D) 函数和子过程都可以返回多个值答案: A3. VB中的控件“Label”用于：A) 显示文本信息B) 接受用户的输入C) 显示图像D) 进行数据计算操作答案: A4. 下列关于VB中数组的说法，哪个是正确的？A) 数组的下标从0开始B) 数组的下标从1开始C) 数组的下标可以是负数D) 数组的下标可以是小数答案: A5. VB中用于处理数据的语句不包括：A) If-ThenB) For-NextC) Do-WhileD) Break-Continue答案: D二、填空题1. VB中，用于变量声明与赋值的是_________语句。
答案: Dim2. VB中，执行循环的语句是___________。
答案: For-Next3. VB中，用于判断条件的语句是___________。
答案: If-Then4. VB中，用于定义子过程的关键字是_____________。
答案: Sub5. VB中，用于结束程序的语句是____________。
答案: End三、编程题编写一个VB程序，实现计算一个数字列表的平均值的功能。
具体要求如下：1. 创建一个名为"frmAverageCalculator"的窗体，包含一个Label控件、一个TextBox控件和一个Button控件。
2. 在Label控件中显示提示信息："请输入数字，以逗号分隔："。
3. 用户在TextBox控件中输入一组数字列表，以逗号分隔，例如："1,2,3,4,5"。
国家二级vb计算机考试试题及答案一、选择题（每题2分，共40分）1. 在VB中，以下哪个选项表示逻辑“与”运算？A. AndB. OrC. NotD. Xor答案：A2. VB中，下列哪个函数用于计算字符串的长度？A. Len()B. Str()C. Mid()D. Left()答案：A3. 以下哪个选项不是VB中的标准控件？A. TextBoxB. ComboBoxC. ListBoxD. DataGrid答案：D4. 在VB中，以下哪个关键字用于定义一个子程序？A. FunctionB. SubC. ProcedureD. Method答案：B5. VB中，以下哪个选项用于声明一个整型变量？A. Dim intVar As IntegerB. Dim intVar As StringC. Dim intVar As DoubleD. Dim intVar As Boolean答案：A6. 在VB中，以下哪个选项用于创建一个数组？A. Dim arr(10) As IntegerB. Dim arr As IntegerC. Dim arr(10)D. Dim arr[10] As Integer答案：A7. VB中，以下哪个选项用于获取当前日期？A. NowB. TodayC. DateD. Time答案：B8. 在VB中，以下哪个选项用于打开一个文件进行读取？A. Open For OutputB. Open For InputC. Open For RandomD. Open For Append答案：B9. VB中，以下哪个选项用于关闭一个打开的文件？A. CloseB. OpenC. WriteD. Read答案：A10. 在VB中，以下哪个选项用于实现循环结构？A. If...ThenB. Do...LoopC. For...NextD. While...Wend答案：C11. VB中，以下哪个选项用于声明一个全局变量？A. DimB. PublicC. PrivateD. Static答案：B12. 在VB中，以下哪个选项用于实现事件驱动编程？A. SubB. FunctionC. EventD. Procedure答案：C13. VB中，以下哪个选项用于声明一个模块级变量？A. DimB. PublicC. PrivateD. Static答案：C14. 在VB中，以下哪个选项用于实现条件分支结构？A. If...ThenB. Do...LoopC. For...NextD. While...Wend答案：A15. VB中，以下哪个选项用于声明一个静态变量？A. DimB. PublicC. PrivateD. Static答案：D16. 在VB中，以下哪个选项用于声明一个函数？A. SubB. FunctionC. ProcedureD. Method答案：B17. VB中，以下哪个选项用于实现异常处理？A. Try...CatchB. On ErrorC. If...ThenD. Do...Loop答案：B18. 在VB中，以下哪个选项用于声明一个类模块？A. ClassB. ModuleC. InterfaceD. Structure答案：A19. VB中，以下哪个选项用于声明一个接口？A. ClassB. ModuleC. InterfaceD. Structure答案：C20. 在VB中，以下哪个选项用于声明一个结构体？A. ClassB. ModuleC. InterfaceD. Structure答案：D二、填空题（每题2分，共20分）1. 在VB中，使用________关键字可以声明一个全局常量。
二级vb计算机考试试题及答案一、选择题（每题2分，共20分）1. 在VB中，以下哪个选项是正确的数据类型？A. IntegerB. RealC. StringD. All of the above答案：D2. VB中的哪个函数用于计算两个数的和？A. Sum()B. Add()C. +D. Concatenate()答案：C3. 下列哪个控件用于在VB中显示文本？A. LabelB. TextBoxC. ComboBoxD. CheckBox答案：A4. 在VB中，如何声明一个变量？A. Dim variableNameB. Declare variableNameC. Variable variableNameD. Let variableName5. VB中哪个事件用于响应按钮点击？A. ClickB. PressC. DoubleClickD. MouseDown答案：A6. 在VB中，以下哪个选项是正确的循环结构？A. For EachB. WhileC. Do WhileD. All of the above答案：D7. VB中哪个函数用于获取当前日期？A. Now()B. Date()C. Today()D. GetCurrentDate()答案：C8. 在VB中，哪个属性用于设置控件的可见性？A. VisibleB. DisplayC. ShowD. Hide答案：A9. VB中哪个事件用于响应文本框内容改变？B. TextChangeC. TextModifiedD. TextUpdate答案：A10. 在VB中，以下哪个选项是正确的数组声明方式？A. Dim arrayName() As IntegerB. Dim arrayName As Integer()C. Array arrayName = New Integer()D. Both A and B答案：D二、填空题（每题2分，共20分）1. VB中的________函数用于将字符串转换为数值。
全国计算机二级vb考试试题及答案一、选择题1. 下列哪个选项是VB中的合法标识符？A. 123abcB. vb-abcC. _abcD. abc$23答案：C. _abc2. VB中哪个函数可以将字符串转换为整数？A. Val()B. Str()C. Len()D. Mid()答案：A. Val()3. 在VB中，下面哪个关键字用于定义子过程？A. SubB. DimC. FunctionD. Private答案：A. Sub4. VB中用于循环的语句是：A. ForB. IfC. SwitchD. Case答案：A. For5. VB的数据类型中，用于表示单个字符的是：A. StringB. BooleanC. CharD. Integer答案：C. Char二、填空题1. VB中通过使用_______关键字来定义常量。
答案：Const2. VB中的数组下标是从_______开始的。
答案：03. VB中使用_______关键字来定义一个新的类。
答案：Class4. VB中使用_______关键字来引发一个错误。
答案：Err5. VB中通过使用_______关键字来定义全局变量。
答案：Public三、编程题题目：编写一个VB程序，实现将一个字符串反转输出的功能。
答案：```vbPublic Module ReverseStringSub Main()Dim str As String = "Hello World!"Dim reversedStr As String = Reverse(str)Console.WriteLine(reversedStr)End SubFunction Reverse(ByVal str As String) As StringDim reversed As String = ""For i As Integer = str.Length - 1 To 0 Step -1reversed += str(i)NextReturn reversedEnd FunctionEnd Module```以上就是全国计算机二级VB考试试题及答案。
2005年9月全国计算机等级考试二级笔试试卷公共基础知识和Visual Basic 语言程序设计(考试时间90 分钟，满分100 分)一、选择题 (每小题 2 分,共 70 分 )下列各题A) 、 B) 、C)、 D) 四个选项中，只有一个选项是正确的。
请将正确选项填涂在答题卡相应位置上，答在试卷上不得分。
（1）下列叙述中正确的是A ．程序设计就是编制程序C．程序经调试改错后还应进行再测试C。
B．程序的测试必须由程序员自己去完成D．程序经调试改错后不必进行再测试（2）下列数据结构中，能用二分法进行查找的是A ．顺序存储的有序线性表 B ．线性链表AC．二叉链表。
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 ．简化数据维护（9）设有如下关系表 :R S TA B C A B C A B C112313112223223313则下列操作中正确的是B。
A．T＝R∩S B．T＝R∪S C． T＝R×S D．T＝R/S（10）数据库系统的核心是B。
A ．数据模型B ．数据库管理系统C．数据库D．数据库管理员（11）假定一个Visual Basic 应用程序由一个窗体模块和一个标准模块构成。
为了保存该应用程序，以下正确的操作是B。
A ．只保存窗体模块文件B ．分别保存窗体模块、标准模块和工程文件C．只保存窗体模块和标准模块文件 D ．只保存工程文件（12）为了清除窗体上的一个控件，下列正确的操作是C。
A．按回车键B．按 Esc 键C．选择（单击）要清除的控件，然后按Del 键D．选择（单击）要清除的控件，然后按回车键（13）以下叙述中错误的是C。
A．打开一个工程文件时，系统自动装入与该工程有关的窗体、标准模块等文件B．当程序运行时，双击一个窗体，则触发该窗体的DblClick 事件C． Visual Basic 应用程序只能以解释方式执行D．事件可以由用户引发，也可以由系统引发（14）设 a=2, b=3, c=4, d=5,下列表达式的值是D。
Not a<=c Or 4*c=b^2 And b<>a+cA ． -1B ． 1C． True D． False（15）设 a = 5，b = 10 ，则执行 c = Int((b - a) * Rnd + a) + 1后，c值的范围为C。
A ． 5～10B． 6～9C． 6～ 10D． 5～ 9（16）在窗体上画一个命令按钮，名称为Command1 ，然后编写如下事件过程：Private Sub Command1_Click()a$ = "software and hardware"b$ = Right(a$, 8)c$ = Mid(a$, 1, 8)MsgBox a$, b$, c$, 1End Sub2运行程序，单击命令按钮，则在弹出的信息框的标题栏中显示的是C。
A ． software and hardware B． software C． hardware D． -1（17）在窗体上画一个命令按钮和一个文本框，其名称分别为Command1和Text1，把文本框的 Text 属性设置为空白，然后编写如下事件过程：Private Sub Command1_Click()a = InputBox("Enter an integer")b = InputBox("Enter an integer")Text1.Text = b + aEnd Sub8 和10，则文本框中显示的内程序运行后，单击命令按钮，如果在输入对话框中分别输入容是A。
A．108B． 18C．810D．出错（18）在窗体上画两个文本框，其名称分别为Text1 和Text2，然后编写如下程序：Private Sub Form_Load()ShowText1.Text = ""Text2.Text = ""Text1.SetFocusEnd SubPrivate Sub Text1_Change()Text2.Text = Mid(Text1.Text, 8)End Sub程序运行后，如果在文本框Text1 中输入BeijingChina ，则在文本框Text2 中显示的内容是B。
A ． BeijingChinaB ．China C． Beijing D． BeijingC（19）在窗体上画一个列表框和一个命令按钮，其名称分别为List1和Command1，然后编写如下事件过程：Private Sub Form_Load()List1.AddItem "Item 1"List1.AddItem "Item 2"List1.AddItem "Item 3"End SubPrivate Sub Command1_Click()List1.List(List1.ListCount) = "AAAA"End Sub程序运行后，单击命令按钮，其结果为B。
A ．把字符串“ AAAA ”添加到列表框中，但位置不能确定B．把字符串“AAAA ”添加到列表框的最后（即“Item 3”的后面）C．把列表框中原有的最后一项改为“AAAA ”D．把字符串“ AAAA ”插入到列表框的最前面（即“Item 1”的前面）（20）假定有如下事件过程：Private Sub Form_Click()Dim x As Integer, n As Integerx = 1n = 0Do While x < 28x = x * 3n = n + 1LoopPrint x, nEnd Sub程序运行后，单击窗体，输出结果是A。
A．81 4B．56 3C． 28 1D．2435（21）有如下程序：Private Sub Form_Click()Dim Check, CounterCheck = TrueCounter = 0DoDo While Counter < 20Counter = Counter + 1If Counter = 10 ThenCheck = FalseExit DoEnd IfLoopLoop Until Check = FalsePrint Counter, CheckEnd Sub程序运行后，单击窗体，输出结果为D。
A ． 15 0B． 20 -1C． 10 True D ．10 False（22）有如下程序：Private Sub Form_Click()Dim i As Integer, sum As Integersum = 0For i = 2 To 10If i Mod 2 <> 0 And i Mod 3 = 0 Thensum = sum + iEnd IfNext iPrint sumEnd Sub4程序运行后，单击窗体，输出结果为A。
A．12B． 30C．24D． 18（23）在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Dim array1(10, 10) As IntegerDim i As Integer, j As IntegerFor i = 1 To 3For j = 2 To 4array1(i, j) = i + jNext jNext iText1.Text = array1(2, 3) + array1(3, 4)End Sub程序运行后，单击命令按钮，在文本框中显示的值是A。
A．12B． 13C．14D． 15（24）在窗体上画一个命令按钮，其名称为Command1 ，然后编写如下事件过程：Private Sub Command1_Click()Dim a1(4, 4), a2(4, 4)For i = 1 To4For j = 1 To4a1(i, j) = i + ja2(i, j) = a1(i, j) + i + jNext jNext iPrint a1(3, 3); a2(3, 3)End Sub程序运行后，单击命令按钮，在窗体上输出的是D。
A ． 66B． 105C． 721D． 612（25）有如下程序：Option Base 1Private Sub Form_Click()Dim arr, SumSum = 0arr = Array(1, 3, 5, 7, 9, 11, 13, 15, 17, 19)For i = 1 To 10If arr(i) / 3 = arr(i) \ 3 ThenSum = Sum + arr(i)End IfNext iPrint SumEnd Sub程序运行后，单击窗体，输出结果为C。
A ． 25B． 26C．27D． 28（26）在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Dim a(5) As StringFor i = 1 To 5a(i) = Chr(Asc("A") + (i - 1))Next iFor Each b In aPrint b;NextEnd Sub程序运行后，单击命令按钮，输出结果是A。
