2007年秋江苏省计算机等级考试二级VB考试真题及答案
2007年4月全国计算机二级考试VB数据库笔试真题
Close#1 Close#1 s
End Sub End Sub
（27）为了计算1+3+5…+99的值，某人编程如下
k =1
S=0
While k <=99
k = k +2 : s=s+ k
Wend
Textl.Move Teft+100 Textl.Move Textl.Left
End Sub End Sub
（25）某人创建了1个工程，其中的窗体名称为Form1:之后又添加了1个名为Form2的窗体，并希望程序执行时先显示Form2窗体，那么，他需要做的工作是
A）在工程属性对话框中把“启动对象”设置为Form2
A） 窗体的Click事件过程的过程名是Myform_Click
B）命令按钮的Click事件过程的过程名是C1_Click
C）命令按钮的Click事件过程的过程名是Command l_Click
D）上述3种过程名称都是错误的
（14）设窗体上有1个滚动条，要求单击滚动条右端的按钮一次，滚动块移动一定的刻度值，决定此刻度值的属性是
（18）工程中有2个窗体，名称分别为Forml、Form2,From1为启动窗体，该窗体上有命令按钮Cimmand1。要求程序运行后单击该命令按钮时显示Form2,则按钮的Click事件过程应该是
A）Private Sub Commandl_Click() B） Private Sub Commandl_Click()
C）数据的逻辑结构与存储结构是一一对应的.
D）算法的时间复杂度与空间复杂度一定相关.
江苏省计算机二级VB考试真题及参考答案
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机，其内存容量可达数十GBD.所有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 ) 。
2007年9月VB全国计算机等级考试笔试二级VB试卷及答案
2007年9月全国计算机等级考试二级笔试试卷Visual Basic语言程序设计（考试时间90分钟，满分100分）一、选择题（每小题2分，共70分）下列各题A) 、B) 、C) 、D)四个选项中，只有一个选项是正确的。
请将正确选项填涂在答题卡相应位置上，答在试卷上不得分。
（1）软件是指A）程序B）程序和文档C）算法加数据结构 D）程序、数据与相关文档的完整集合（2）软件调试的目的是A）发现错误B）改正错误C）改善软件的性能D）验证软件的正确性（3）在面向对象方法中，实现信息隐蔽是依靠A）对象的继承B）对象的多态C）对象的封装D）对象的分类（4）下列叙述中，不符合良好程序设计风格要求的是A）程序的效率第一，清晰第二 B）程序的可读性好C）程序中要有必要的注释D）输入数据前要有提示信息（5）下列叙述中正确的是A）程序执行的效率与数据的存储结构密切相关B）程序执行的效率只取决于程序的控制结构C）程序执行的效率只取决于所处理的数据量D）以上三种说法都不对（6）下列叙述中正确的是A）数据的逻辑结构与存储结构必定是一一对应的B）由于计算机存储空间是向量式的存储结构，因此，数据的存储结构一定是线性结构C）程序设计语言中的数组一般是顺序存储结构，因此，利用数组只能处理线性结构D）以上三种说法都不对（7）冒泡排序在最坏情况下的比较次数是A）ｎ(n＋1)/2 B）nlogn C）n(n－1)/2 D）ｎ/22（8）一棵二叉树中共有70个叶子结点与80个度为1的结点，则该二叉树中的总结点数为A）219 B）221 C）229 D）231（9）下列叙述中正确的是A）数据库系统是一个独立的系统，不需要操作系统的支持B）数据库技术的根本目标是要解决数据的共享问题C）数据库管理系统就是数据库系统D）以上三种说法都不对（10）下列叙述中正确的是A）为了建立一个关系，首先要构造数据的逻辑关系B）表示关系的二维表中各元组的每一个分量还可以分成若干数据项C）一个关系的属性名表称为关系模式D）一个关系可以包括多个二维表（11）要使一个文本框可以显示多行文本，应设置为True的属性是A）Enabled B）MultiLine C）MasLenfth D）Width（12）在窗体上有一个名为Text1的文本框。
江苏省计算机二级vb考试题库及答案
江苏省计算机二级vb考试题库及答案一、单项选择题（每题2分，共20分）1. VB中的变量声明语句是：A. Dim x As IntegerB. Integer xC. Declare x As IntegerD. Var x As Integer答案：A2. 在VB中，下列哪个函数用于计算两个数的绝对差值？A. AbsB. SgnC. RoundD. Int答案：A3. VB中，以下哪个控件用于显示文本信息？A. LabelB. TextBoxC. ComboBoxD. ListBox答案：A4. 在VB中，要实现一个按钮的点击事件，应该使用哪个关键字？A. OnClickB. ClickC. ButtonClickD. Button答案：A5. VB中，下列哪个数据类型用于存储日期和时间？A. DateB. TimeC. DateTimeD. String答案：C6. 在VB中，下列哪个操作符用于比较两个字符串是否相等？A. =B. ==C. <>D. <>=答案：B7. VB中，下列哪个函数用于计算一个数的平方？A. SqrB. PowC. ExpD. Log答案：B8. 在VB中，下列哪个属性用于设置文本框的只读状态？A. ReadOnlyB. EnabledC. VisibleD. BackColor答案：A9. VB中，下列哪个控件用于显示和编辑多行文本？A. LabelB. TextBoxC. ComboBoxD. ListBox答案：B10. 在VB中，下列哪个关键字用于定义一个子程序？A. FunctionB. SubC. PropertyD. Class答案：B二、填空题（每题2分，共20分）1. 在VB中，使用________关键字可以声明一个变量。
答案：Dim2. VB中的________函数可以将小数四舍五入到最接近的整数。
答案：Round3. 在VB中，使用________属性可以设置窗体的标题。
江苏计算机二年级VB考试真题及参考答案
江苏计算机二年级V B 考试真题及参考答案文稿归稿存档编号：[KKUY-KKIO69-OTM243-OLUI129-G00I-FDQS58-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机，其内存容量可达数十GBD.所有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 ) 。
2007年秋江苏省计算机等级考试二级VB考试真题及答案
2007年秋江苏省计算机等级考试二级VB考试真题及答案2007年秋江苏省计算机等级考试二级VB考试真题及答案来源：南天计算机更新时间：2008-9-24 关键字：2007年秋江苏省计算机等级考试二级VB考试真题及答案第二部分 Visual Basic 程序设计一、选择题（用答题卡答题，答案依次填在21～30答题号内）21．下列语句中，正确的是 21 。
A. Text1.SetFocusB. Form1.ClearC. Label1.SetFocusD. List1.Cls22．创建一个名为“文件”的菜单项，使其可用Alt+F方式访问，则在菜单编辑器的标题文本框中应输入 22 。
A. 文件($F)B. 文件(&F)C. 文件(#F)D. 文件(%F)23．数学表达式的VB算术表达式为 23 。
A. Sin(27) + Sqr(x + Exp3)/(x + y)B. Sin(27 * 3.14159 / 180) + Sqr(x + Exp(3)) / Abs(x + y)C. Sin(27 * 3.14159 / 180) + Sqr(x + e ^ 3) / Abs(x + y)D. Sin(27 * pi / 180) + Sqr(x + Exp(3) / Abs(x + y)24．以下说法不正确的是 24 。
A. 使用不带关键字Preserve的ReDim语句可以重新定义数组的维数B. 使用不带关键字Preserve的ReDim语句可以改变数组各维的上、下界C. 使用不带关键字Preserve的ReDim语句可以改变数组的数据类型D. 使用不带关键字Preserve的ReDim语句可以对数组中的所有元素进行初始化25．下列 25 是合法的变量名。
A. absB. -a1C. cdc dD. Abc_1026．要向文件data.txt添加数据，正确的文件打开命令是 26 。
A. Open data1.txt For Output As #1B. Open data1.txt For Input As #1C. Open data1.txt For Append As #5D. Open data1.txt For Write As #527. 以下对数组参数的说明中，错误的是 27 。
2007年-2011年江苏省计算机二级VB选择题汇总含答案(整理版)
2007年秋季vb考试真题1．下面关于比特的叙述中，错误的是( D )A．比特是组成数字信息的最小单位 B．比特只有“0”和“1”两个符号C．比特既可以表示数值和文字，也可以表示图像和声音D. 比特”1”总是大于比特“0”2．在下列有关集成电路的叙述中，错误的是 ( D )A．现代集成电路使用的半导体材料主要是硅B．大觑模集成电路一般以功能部件、子系统为集成对象C．我国第2代居民身份证中包含有IC芯片D. 目前超大规模集成电路中晶体管的基本线条已小到l纳米左右3．在下列有关通信技术的叙述中，错误的是 ( B )A.通信的基本任务是传递信息，因而至少需由信源、信宿和信道组成B.通信可分为模拟通信和数字通信，计算机网络属于模拟通信C.在通信系统中，采用多路复用技术的目的主要是提高传输线路的利用率D.学校的计算机机房一般采用5类无屏蔽双绞线作为局域网的传输介质4.下面是关于PC机主存储器的一些叙述，其中正确的是( A )A.主存储器是一种动态随机存取存储器(RAM)B.主存储器的基本编址单位是字(即32个二进位)C.目前市场上销售的PC机，其内存容量可达数十GBD.所有PC机的内存条都是通用的：可以互换5．现行PC机中，IDE(或SATA)接口标准主要用于( D )A．打印机与主机的连接 C．声卡与主机的连接B．显示器与主机的连接 D．硬盘与主机的连接6. 下列有关PC机的CPU、内存和主板的叙述中，正确的是( A ) 。
A．大多数Pc机只存一块CPu芯片，即使是“双核”CPU也是一块芯片B．所有Pentium系列微机的内存条相同，仅有速度和容量大小之分C．主板上芯片组的作用是提供存储器控制功能，I/O控制与芯片组无关D．主板上CMOS芯片用于存储CMOS设置程序和一些软硬件设置信息7.下列有关目前Pc机辅助存储器的叙述中，错误的是 ( A )A．硬盘的容量越来越大，这是因为硬盘中磁盘碟片的数目越来越多B．硬盘的内部传输速率一般小于外部传输速率c．优盘采用Flash存储器技术，属于半导体存储器D．目前常见COMBO光驱是一种将CD-RW和DVD-ROM组合在一起的光驱8.下面有关Windows操作系统，(95以后版本)的叙述中，错误的是 ( C ) 。
2007年9月国家二级(VISUALFOXPRO)笔试真题试卷(题后含答案及解析)
2007年9月国家二级（VISUALFOXPRO）笔试真题试卷(题后含答案及解析)题型有：1. 选择题 2. 填空题选择题（每小题2分，共70分）下列各题A、B、C、D四个选项中，只有一个选项是正确的，请将正确选项涂写在答题卡相应位置上。
1．软件是指A．程序B．程序和文档C．算法加数据结构D．程序、数据与相关文档的完整集合正确答案：D解析：本题考查软件的定义。
软件是计算机系统中与硬件相互依存的另一部分，它包括程序、相关数据及其说明文档的总和。
因此，本题正确答案是选项D。
2．软件调试的目的是A．发现错误B．改正错误C．改善软件的性能D．验证软件的正确性正确答案：B解析：本题考查软件工程调试。
调试与测试是两个不同的过程，有着根本的区别：调试是一个随机的、不可重复的过程，它用于隔离和确认问题发生的原因，然后修改软件来纠正问题：测试是一个有计划的，可以重复的过程，它的目的是为了发现软件中的问题。
因此，软件调试的目的是为了改正软件中的错误。
本题的正确答案是选项B。
3．在面向对象方法中，实现信息隐蔽是依靠A．对象的继承B．对象的多态C．对象的封装D．对象的分类正确答案：C解析：通常认为，面向对象方法具有封装性、继承性、多态性几大特点。
就是这几大特点，为软件开发提供了一种新的方法学。
封装性：所谓封装就是将相关的信息、操作与处理融合在一个内含的部件中(对象中)。
简单地说，封装就是隐藏信息。
这是面向对象方法的中心，也是面向对象程序设计的基础。
继承性：子类具有派生它的类的全部属性(数据) 和方法，而根据某一类建立的对象也都具有该类的全部，这就是继承性。
继承性自动在类与子类间共享功能与数据，当某个类作了某项修改，其子类会自动改变，子类会继承其父类所有特性与行为模式。
继承有利于提高软件开发效率，容易达到一致性。
多态性：多态性就是多种形式。
不同的对象在接收到相同的消息时，采用不同的动作。
例如，一个应用程序包括许多对象，这些对象也许具有同一类型的工作，但是却以不同的做法来实现。
07江苏省计算机等级考试二级
江苏省计算机等级考试二级（VB）2007春1.微电子技术是信息技术领域的关键技术，它以集成电路（IC）为核心。
在下列有关叙述中，错误的是 B 。
A．A．目前IC芯片（如CPU芯片）的集成度可达数千万个电子元件B．B．Moore定律指出，单块IC的集成度平均每半年翻一番C．C．从原料熔练到最终产品包装，IC的制造工序繁多，工艺复杂，技术难度非常高D．D．非接触式IC卡采用电磁感应方式无线传输数据，所以又称为射频卡或感应卡2．在下列有关通信中使用的传输介质的叙述中，错误的是 D 。
A．A．计算机局域网中大多使用无屏蔽双绞线，其无中继有效传输距离大约100mB．B．同轴电缆可用于传输电视信号C．C．光纤价格高，一般不在校园网和企业网中使用D．D．微波的波长很短，适合于长距离、大容量无线通信3．二进制数（1010）2与十六进制数（B2）16相加，结果为 B 。
A．(273)8 B.(274)8 C.(314)8 D.(313)84.设有一段文本由基本ASCII字符和GB2312字符集中的汉字组成，其代码为B0 A1 57 69 6E D6 D0 CE C4 B0 E6，则在这段文本中含有 D 。
A．1个汉字和9个西文字符 C.3个汉字和5个西文字符B.2个汉字和7个西文字符 D.4个汉字和3个西文字符5.在下列有关CPU的叙述中,错误的是 D .A. CPU的主要组成部分有运算器、控制器和寄存器组B. CPU的主要功能是执行指令，不同类型CPU的指令系统通常有所不同C. 为了加快运算速度，CPU中可包含多个算术逻辑部件（ALU）D. 目前PC机所有的CPU芯片均为Intel公司的产品6．PC机在加电启动过程中会运行POST程序、引导程序、系统自举程序等。
若在启动过程中，用户按某一热键（通常是Del键）则可以启动CMOS设置程序。
这些程序运行的顺序是 A 。
A．A．POST程序->CMOS设置程序->系统自举程序->引导程序B．B．POST程序->引导程序->系统自举程序->CMOS设置程序C．C．CMOS设置程序->系统自举程序->引导程序->POST程序D．D．POST程序->CMOS设置程序->引导程序->系统自举程序7.目前PC机一般都有USB和FirWire接口,用于连接各种外部设备.在下列关于这两种接口的叙述中,错误的是 B .A. A. USB是一种串行接口,可以连接键盘、鼠标器、优盘、数码相机等多种设备B. B. FireWire是一种并行接口，通常用于连接需要高速传输大量数据的设备（如音视频设备）C. C. USB 2.0的数据传输速率是USB 1.0的数十倍D. D. 一个USB接口上可以连接不同的设备8.在下列有关PC机外存储器的叙述中,错误的是 C .A.1.44MB软盘的每一面有80个磁道,每个磁道分为18个扇区,每个扇区512字节B.硬盘的主要性能指标之一是平均存取时间,它与硬盘的转速(rpm)有很大关系C.优盘的缺点是:优盘均无写保护功能,且不能起到引导操作系统的作用D.CD-R是目前常用的可记录式光盘,但其刻录的数据不能修改9.在下列关于Windows 98/XP操作系统的存储管理功能的叙述中,错误的是 C .A. A. 存储管理的功能主要包括内存的发配与回收、共享和保护、自动扩充（虚存的实现）等C. C. 虚拟存储器采用的页面调度算法是“先进先出”（FIFO）算法D. D. 在Window Windows XP 中，虚拟内存其实就是一个磁盘文件，即“交换文件”10．人们常说“软件的主体是程序，程序的核心是算法”。
2007年9月全国计算机等级考试二级VB语言程序设计-计算机二级考试VB试卷与试题
[2分]-----正确答案(C)
A Private Sub Command1_Click( )
Listl Clear
End Sub
B Private Sub Command1_Click( )
List1.Clear List1.ListIndex
End Sub
C Private Sub Command1_Click( )
16. 若窗体上的图片框中有一个命令按钮，则此按钮的Left属性是指（ A 按钮左端到窗体左端的距离 B 按钮左端到图片框左端的距离 C 按钮中心点到窗体左端的距离 D 按钮中心点到图片框左端的距离
）。[2分]-----正确答案(B)
17. 为使程序运行时通用对话框CD1上显示的标题为“对话框窗口”。若通过程序设置该标题，则应使用的语句是（ ）。[2分]-----正确答案(A) A CD1.DialogTitle="对话框窗口" B CD1.Action="对话框窗口" C CD1.FileName="对话框窗口" D CD1.Filter="对话的是（ ）。[2分]-----正确答案(B) A 数据库系统是一个独立的系统，不需要操作系统的支持 B 数据库技术的根本目标是要解决数据的共享问题 C 数据库管理系统就是数据库系统 D 以上3种说法都不对
10. 下列叙述中正确的是（ ）。[2分]-----正确答案(A) A 为了建立一个关系，首先要构造数据的逻辑关系 B 表示关系的二维表中各元组的每一个分量还可以分成若干数据项 C 一个关系的属性名表称为关系模式 D 一个关系可以包括多个二维表
）。[2分]-----正确答案(A)
21. 若窗体中已经有若干个不同的单选按钮，要把它们改为一个单选按钮数组，在属性窗口中需要且只需要进行的操
江苏省计算机2级VB2007春上机3
江苏省高等学校非计算机专业学生计算机基础知识和应用能力等级考试上机试卷(2007春)二级Visual Basic语言(试卷代号VB03)(本试卷完成时间70分钟)【考试须知】1．改错题的界面不作要求，主要用来调试程序，若题目中有参考界面，则仅作参考：2．考试结束后，文件必须存放在指定位置，否则适当扣分：考试盘中若无指定文件，则不予评分；3．程序代码书写应呈锯齿形。
一、改错题(14分)【题目】本程序的功能是查找3位和4位的Armstrong数。
若一个N位的正整数，其各位数字的N次方之和等于这个数本身。
则这个数就是一个Armstrong数。
如：153=1^3+5^3+3^3，1634=1^4+6^4+3^4+4^。
Option ExplicitOption Base 1Private Sub Command1_Click()Dim I As Integer, A() As Integer, f As Boolean, n As IntegerDim j As Integer, st As Stringst = ""For I = 153 To 9999f = FalseCall Arms(I, f, A, n)If f Thenst = st & I & "="For j = 1 To UBound(A) - 1st = st & A(j) & "^" & n & "+"Next jst = st & A(j) & "^" & nList1.AddItem stEnd IfNext IEnd SubPrivate Sub Arms(k As Integer, f As Boolean, B() As Integer, n As Integer)Dim I As Integer, Sum As Integer, M As Integern = Len(Str(k))M = kReDim B(n)For I = n To 1 Step -1B(I) = k Mod 10k = k \ 10Next IFor I = 1 To nSum = Sum + B(I) ^ n '计算各位数字的N次方之和Next IIf Sum = M Then f = TrueEnd Sub【要求】1．新建工程，输入上述代码，改正程序中的错误：2．改错时，不得增加或删除语句，但可适当调整语句位置：3．将窗体文件和工程文件分别命名为Fl 和P1，并保存到软盘A 的根目录下。
江苏省计算机等级考试二级VB考试真题及答案
江苏省计算机等级考试二级VB考试真题及答案第二部分 Visual Basic 程序设计一、选择题（用答题卡答题，答案依次填在21～30答题号内）21．下列语句中，正确的是A. Text1.SetFocusB. Form1.ClearC. Label1.SetFocusD.List1.Cls22．创建一个名为“文件”的菜单项，使其可用Alt+F方式访问，则在菜单编辑器的标题文本框中应输入A. 文件($F)B. 文件(&F)C. 文件(#F)D. 文件(%F)23．数学表达式的VB算术表达式为A. Sin(27) + Sqr(x + Exp3)/(x + y)B. Sin(27 * 3.14159 / 180) + Sqr(x + Exp(3)) / Abs(x + y)C. Sin(27 * 3.14159 / 180) + Sqr(x + e ^ 3) / Abs(x + y)D. Sin(27 * pi / 180) + Sqr(x + Exp(3) / Abs(x + y)24．以下说法不正确的是 24 。
A. 使用不带关键字Preserve的ReDim语句可以重新定义数组的维数B. 使用不带关键字Preserve的ReDim语句可以改变数组各维的上、下界C. 使用不带关键字Preserve的ReDim语句可以改变数组的数据类型D. 使用不带关键字Preserve的ReDim语句可以对数组中的所有元素进行初始化25．下列是合法的变量名。
A. absB. -a1C. cdc dD. Abc_1026．要向文件data.txt添加数据，正确的文件打开命令是A.Open data1.txt For Output As #1B.Open data1.txt For Input As #1C.Open data1.txt For Append As #5D.Open data1.txt For Write As #527. 以下对数组参数的说明中，错误的是A.在过程中可以用Dim语句对形参数组进行声明B.形参数组只能按地址传递C.实参为动态数组时，可用ReDim 语句改变对应形参数组的维界D.只需把要传递的数组名作为实参，即可调用过程28．设a = 3，b = 2，c = 1，运行print a > b > c的结果是 28 。
2007年4月全国计算机等级考试二级VB语言笔试试题及答案
2007年 4月全国计算机等级考试二级笔试试卷Visual Basic 语言程序设计一、选择题(第小题 2分,共 70分下列各题 A、B、C、D四个选项中, 只有一个选项是正确的。
请将正确选项填涂在答题卡相应位置上, 答在试卷上不得分。
(1下列叙述中正确的是(BA算法的效率只与问题的规模有关,而与数据的存储结构无关B算法的时间复杂度是指执行算法所需要的计算工作量C数据的逻辑结构与存储结构是一一对应的D算法的时间复杂度与空间复杂度一定相关(2在结构化程序设计中,模块划分的原则是(DA各模块应包括尽量多的功能B各模块的规模应尽量大C各模块之间的联系应尽量紧密D模块内具有高内聚度、模块间具有低耦合度(3下列叙述中正确的是(AA软件测试的主要目的是发现程序中的错误B软件测试的主要目的是确定程序中错误的位置C为了提高软件测试的效率, 最好由程序编制者自己来完成软件的测试工作D软件测试是证明软件没有错误(4下面选项中不属于面向对象程序设计特征的是(C A继承性B多态性C类比性D封装性(5下列对队列的叙述正确的是(DA队列属于非线性表B队列按“先进后出”原则组织数据C队列在队尾删除数据D队列按“先进先出”原则组织数据(6对下列二叉树(CAB CD E F XY Z进行前序遍历的结果为ADYBEAFCZXBYDEBFZXCACABDYECFXZDABCDEFXYZ(7某二叉树中有 n 个度为 2的结点,则该二叉树中的叶子结点数为(AAn+1Bn-1C2nDn/2(8在下列关系运算中,不改变关系表中的属性个数但能减少元组个数的是 (B A并B交C投影D笛卡儿乘积(9在 E—R 图中,用来表示实体之间联系的图形是(CA矩形B椭圆形C菱形D平行四边形(10下列叙述中错误的是(AA在数据库系统中,数据的物理结构必须与逻辑结构一致B数据库技术的根本目标是解决数据共享问题C数据库技术是指己有数据管理系统的基础上建立数据库D数据库系统需要操作系统的支持(11下面可以正确定义 2个整形变量和 1个字符串变量的语句的是(DADim n,m AS Interger,s AS StringBDim a%,b$,cAS StringCDim a AS Integer,b,c AS StringDDim x%,yAS Integer,z AS String(12下列表述中不能判断 x 是否为偶数的是(DAx/2=Int(x/2Bx Mod 2=0CFix(x/2=x/2Dx\2=013设在名称为 Myform 的窗体上只有 1个名称为 C1的命令按钮,下面叙述中正确的是(BA窗体的 Click 事件过程的过程名是 Myform_ClickB命令按钮的 Click 事件过程名是 C1_ClickC命令按钮的 Click 事件过程的过程名是 Command1_Click(14设窗体上有 1个滚动条,要求单击滚动条右端的◢按钮一次,滚动条移动一定的刻度值,决定此刻度的属性是(CAMaxBMinCSmallChangeDLargeChang(151个二维数组可以存放 1个矩形.在程序开始有语句 Option Base 0,则下面定义的数组中正好可以存放 1个 4*3矩阵(即只有 12个元素的是(BADim a(-2To 0,2 AS IntegerBDim a(3,2AS IngegerCDim a(4,3ASIngegerDDim a(-1To -4,-1To -3AS Ingeger(16若设置了文本框的属性PasswordChar=”$”,则运行程序时向文本框中输入 8个任意字符后,文本框中显示的是(AA8个”$”B1个”$”C8个”*”D无任何内容(17设在窗体上有 1个名称为 Combo1的组合框,含有 5个项目,要删除最后一项,正确的语句是(BACombo1.RemoveItem Combo1.TextB Combo1.RemoveItem4C Combo1.RemoveItem Combo1.ListCountD Combo1.RemoveItem5(18工程中有 2个窗体,名称分别为 Form1.Form2,Form1为启动窗体,该窗体上有命令按钮 Command1,要求程序运行后单击该命令按钮时显示 Form2,则按钮的Click 事件过程应该是(AAPrivate Sub Command1_Click( B Private Sub Command1_Click( Form2.Show Form2.VisibleEnd Sub End SubC Private Sub Command1_Click( DPrivate Sub Command1_Click( Load Form2Form2.LoadEnd Sub End Sub(19若在某窗体模块中有如下事件过程(DPrivate Sub Command1_Click(IndexAS Integer……End Sub则以下叙述中正确的是A 此事件过程与不带参数的事件过程没有区别B 有 1个名称为 Command1的窗体,单击此窗体则执行此事件过程C 有 1个名称为 Command1的空件数组,数组中有多个不同类型控件D 有 1个名称为 Command1的空件数组,数组中有多个相同类型控件(20以下循环语句中在任何情况下都至少执行一次循环体的是(CADo While <条件>BWhile <条件>循环体循环体Loop WendCDo DDo Until <条件>循环体循环体Loop Until <条件>Loop(21在窗体上有 1个名为 Cd1的通用对话框,为了在运行程序时打开保存文件对话框,则在程序总应使用的语句是(AACd1.Action=2BCd1.Action=1CCd1.ShowSave=TureDCd1.ShowSave=0(22下面关于菜单的叙述中错误的是(BA各级菜单中的所有菜单项的名称必须唯一B同一子菜单中的菜单项名称必须唯一,但不同子菜单中的菜单项名称可以相同C弹出式菜单也用菜单编辑器编辑(23已知有下面的过程(DPrivate Sub proc1(aAs Integer,b As String,Optional x As Boolean ……End Sub正确调用此过程的语句是ACall procl(5BCall proc15,”abc”,FalseCproc1(12,”abc”,TrueDproc15, “abc”(24在窗体上有一个文件名称为 Text1的文本框和 1个名称为 Command1的命令按钮, 要求在程序执行时, 每单击命令按钮一次, 文本框向右移动一定距离。
江苏二级VB2007秋笔试参考答案及解析
2007年（秋）笔试试卷参考答案及解析第一部分计算机基础知识（1）D）【解析】1 bit是单个的二进制数值，0或1。
虽然计算机可以提供指令测试和操作比特，但通常以多个比特的集合——字节来存储数据和执行指令。
在大多数计算机系统中，1B由8bit构成。
1bit 数值在存储器中用单个电容器充放电高于或低于某个电平来表示，比特是最小单位，字节是比特的集合也是一个单位。
（2）D）【解析】根据美国半导体协会预测，到2010年将能达到18英寸、0.07~0.05微米的工艺水平。
（3）B）【解析】通信可分为模拟通信和数字通信，计算机网络属于数字通信。
（4）A）【解析】主存储器的基本编址单位是位，也就是它只能存储一个二进制的0或1。
目前市场上销售的PC机，其内存容量可达数几百GB。
不是所有PC的内存条都是通用的，DDR1和DDR2是不可以互换的。
（5）D）【解析】现行PC机中，IDE（或SATA）接口标准主要用于硬盘与主机的连接。
（6）A）【解析】Pentium系列微机的内存条不相同，比如接口有些都不一样。
主板上芯片组的作用提供存储器控制功能和I/O控制。
主板上CMOS芯片用于存储BIOS设置程序和一些软硬件设置信息。
（7）A）【解析】目前的主流硬盘容量为60～160GB，影响硬盘容量的因素有单碟容量和碟片数量。
（8）C）【解析】在Windows操作系统（95以后版本）中文件名最长可以使用255个字符。
（9）B）【解析】一个算法应该具有以下五个重要的特征。
有穷性：一个算法必须保证执行有限步之后结束；确切性：算法的每一步骤必须有确切的定义；输入：一个算法有0个或多个输入，以刻画运算对象的初始情况；输出：一个算法有一个或多个输出，以反映对输入数据加工后的结果。
没有输出的算法是毫无意义的；可行性：算法原则上能够精确地运行，而且人们用笔和纸做有限次运算后即可完成。
（10）B）【解析】目前IP地址都是4组数，每组都是由二进制换算所得，IP是0～255的数字。
2007年9月全国计算机等级考试二级VB语言笔试试题及答案
2007年9月全国计算机等级考试二级VB语言笔试试题及答案一、选择题(第小题2分,共70分) 下列各题A)、B)、C)、D)四个选项中，只有一个选项是正确的。
请将正确选项填涂在答题卡相应位置上，答在试卷上不得分。
(1)下列叙述中正确的是(B)A)算法的效率只与问题的规模有关，而与数据的存储结构无关B)算法的时间复杂度是指执行算法所需要的计算工作量C)数据的逻辑结构与存储结构是一一对应的D)算法的时间复杂度与空间复杂度一定相关(2)在结构化程序设计中，模块划分的原则是(D)A)各模块应包括尽量多的功能B)各模块的规模应尽量大C)各模块之间的联系应尽量紧密D)模块内具有高内聚度、模块间具有低耦合度(3)下列叙述中正确的是(A)A)软件测试的主要目的是发现程序中的错误B)软件测试的主要目的是确定程序中错误的位置C)为了提高软件测试的效率，最好由程序编制者自己来完成软件的测试工作D)软件测试是证明软件没有错误(4) 下面选项中不属于面向对象程序设计特征的是(C)A)继承性B)多态性C)类比性D)封装性(5) 下列对队列的叙述正确的是(D)A)队列属于非线性表B)队列按“先进后出”原则组织数据C)队列在队尾删除数据D)队列按“先进先出”原则组织数据（6) 对下列二叉树(C)AB CD E F XY Z进行前序遍历的结果为A)DYBEAFCZXB)YDEBFZXCAC)ABDYECFXZD)ABCDEFXYZ(7)某二叉树中有n个度为2的结点,则该二叉树中的叶子结点数为(A)A)n+1B)n-1C)2nD)n/2(8)在下列关系运算中,不改变关系表中的属性个数但能减少元组个数的是(B)A)并B)交C)投影D)笛卡儿乘积(9)在E—R图中,用来表示实体之间联系的图形是(C)A)矩形B)椭圆形C)菱形D)平行四边形(10)下列叙述中错误的是(A)A)在数据库系统中,数据的物理结构必须与逻辑结构一致B)数据库技术的根本目标是解决数据共享问题C)数据库技术是指己有数据管理系统的基础上建立数据库D)数据库系统需要操作系统的支持(11)下面可以正确定义2个整形变量和1个字符串变量的语句的是(D)A)Dim n,m AS Interger,s AS StringB)Dim a%,b$,c AS StringC)Dim a AS Integer,b,c AS StringD)Dim x%,y AS Integer,z AS String(12)下列表述中不能判断x是否为偶数的是(D)A)x/2=Int(x/2)B)x Mod 2=0C)Fix(x/2)=x/2D)x\2=013)设在名称为Myform的窗体上只有1个名称为C1的命令按钮,下面叙述中正确的是(B)A)窗体的Click事事件过程的过程名是Myform_ClickB)命令按钮的Click事件过程名是C1_ClickC)命令按钮的Click事件过程的过程名是Command1_Click(14)设窗体上有1个滚动条,要求单击滚动条右端的◢按钮一次,滚动条移动一定的刻度值,决定此刻度的属性是(C)A)MaxB)MinC)SmallChangeD)LargeChang(15)1个二维数组可以存放1个矩形.在程序开始有语句Option Base 0,则下面定义的数组中正好可以存放1个4*3矩阵(即只有12个元素)的是(B)A)Dim a(-2 To 0,2) AS IntegerB)Dim a(3,2) AS IngegerC)Dim a(4,3)AS IngegerD)Dim a(-1 To -4,-1 To -3)AS Ingeger(16)若设置了文本框的属性PasswordChar=”$”,则运行程序时向文本框中输入8个任意字符后,文本框中显示的是(A)A)8个”$”B)1个”$”C)8个”*”D)无任何内容(17)设在窗体上有1个名称为Combo1的组合框,含有5个项目,要删除最后一项,正确的语句是(B)A)Combo1.RemoveItem Combo1.TextB) Combo1.RemoveItem4C) Combo1.RemoveItem Combo1.ListCountD) Combo1.RemoveItem5(18)工程中有2个窗体,名称分别为Form1.Form2,Form1为启动窗体,该窗体上有命令按钮Command1,要求程序运行后单击该命令按钮时显示Form2,则按钮的Click事件过程应该是(A)A)Private Sub Command1_Click( ) B) Private Sub Command1_Click( )Form2.Show Form2.VisibleEnd Sub End SubC) Private Sub Command1_Click( ) D)Private Sub Command1_Click( )Load Form2 Form2.LoadEnd Sub End Sub(19)若在某窗体模块中有如下事件过程(D)Private Sub Command1_Click(Index AS Integer)……End Sub则以下叙述中正确的是A) 此事件过程与不带参数的事件过程没有区别B) 有1个名称为Command1的窗体,单击此窗体则执行此事件过程C) 有1个名称为Command1的空件数组,数组中有多个不同类型控件D) 有1个名称为Command1的空件数组,数组中有多个相同类型控件(20)以下循环语句中在任何情况下都至少执行一次循环体的是(C)A)Do While <条件> B)While <条件>循环体循环体Loop WendC)Do D)Do Until <条件>循环体循环体Loop Until <条件> Loop(21)在窗体上有1个名为Cd1的通用对话框,为了在运行程序时打开保存文件对话框,则在程序总应使用的语句是(A)A)Cd1.Action=2B)Cd1.Action=1C)Cd1.ShowSave=TureD)Cd1.ShowSave=0(22)下面关于菜单的叙述中错误的是(B)A)各级菜单中的所有菜单项的名称必须唯一B)同一子菜单中的菜单项名称必须唯一,但不同子菜单中的菜单项名称可以相同C)弹出式菜单也用菜单编辑器编辑(23)已知有下面的过程(D)Private Sub proc1(a As Integer,b As String,Optional x As Boolean)……End Sub正确调用此过程的语句是A)Call procl(5)B)Call proc1 5,”abc”,FalseC)proc1(12,”abc”,True)D)proc1 5, “abc”(24)在窗体上有一个文件名称为Text1的文本框和1个名称为Command1的命令按钮，要求在程序执行时，每单击命令按钮一次，文本框向右移动一定距离。
江苏省计算机二级vb考试题库及答案
江苏省计算机二级vb考试题库及答案在计算机技术的不断发展和应用的推广下，计算机二级考试在各个地区都成为了一个非常重要的考试内容。
江苏省计算机二级VB考试题库及答案是众多考生备考时必备的资料之一。
本文将就江苏省计算机二级VB考试题库及答案进行详细的介绍。
一、江苏省计算机二级VB考试题库1. VB程序的基本结构是什么？答案：VB程序的基本结构由窗体、控件和代码组成。
2. VB中如何定义一个变量？答案：可以使用“Dim”关键字定义一个变量。
例如：Dim num As Integer。
3. VB中如何实现画图功能？答案：可以使用绘图工具或者画布控件来实现画图功能。
4. VB程序中如何实现输入输出？答案：可以使用输入框控件或者消息框来实现输入输出功能。
5. VB中如何调用函数？答案：可以使用函数名+参数的方式来调用函数。
二、江苏省计算机二级VB考试答案1. 请简述VB程序的运行过程。
答案：VB程序的运行过程包括以下几个步骤：- 加载窗体和控件；- 执行代码；- 响应用户操作。
2. 请写出VB程序中定义一个计算两数之和的函数的代码。
答案：```Function Add(num1 As Integer, num2 As Integer) As IntegerAdd = num1 + num2End Function```3. 如何实现在VB程序中播放音乐？答案：可以使用“WindowsMediaPlayer”控件来实现音乐的播放功能。
4. 请写出VB程序中实现文件读取的代码。
答案：```Dim file As Stringfile = FreeFileOpen "文件路径" For Input As fileInput #file, dataClose file```5. VB中如何处理异常错误？答案：可以使用“On Error Resume Next”语句来处理异常错误。
以上就是江苏省计算机二级VB考试题库及答案的相关内容介绍。
江苏vb二级考试真题及答案
江苏vb二级考试真题及答案一、单选题1. 在Visual Basic中，以下哪个选项是正确的数据类型？A. IntegerB. DoubleC. StringD. All of the above答案：D2. 如果一个变量被声明为Dim x As Integer，则x的值域是多少？A. -32,768 到 32,767B. -2,147,483,648 到 2,147,483,647C. 0 到 255D. -32,768 到 65,535答案：A3. 在Visual Basic中，哪个关键字用于声明一个过程？A. FunctionB. SubC. ClassD. Property答案：B4. 下列哪个控件不是Visual Basic的标准控件？A. LabelB. TextBoxC. ButtonD. Slider答案：D5. 在Visual Basic中，哪个属性用于设置文本框（TextBox）的只读状态？A. ReadOnlyB. EnabledC. VisibleD. MultiLine答案：A二、判断题1. Visual Basic是一种面向对象的编程语言。
（正确）2. 在Visual Basic中，所有的变量都必须先声明后使用。
（错误）3. 使用“End”关键字可以终止程序的运行。
（正确）4. Visual Basic中的数组下标默认从0开始。
（错误）5. Visual Basic不支持多线程编程。
（错误）三、填空题1. 在Visual Basic中，使用________关键字可以定义一个类。
答案：Class2. 如果需要在Visual Basic中创建一个窗体，可以使用________设计器。
答案：Form3. 在Visual Basic中，使用________方法可以向文本框中添加文本。
答案：AppendText4. 在Visual Basic中，使用________属性可以获取或设置一个控件的背景颜色。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
2007年秋江苏省计算机等级考试二级VB考试真题及答案第二部分 Visual Basic 程序设计一、选择题（用答题卡答题，答案依次填在21～30答题号内）21．下列语句中，正确的是A. Text1.SetFocusB. Form1.ClearC. Label1.SetFocusD.List1.Cls22．创建一个名为“文件”的菜单项，使其可用Alt+F方式访问，则在菜单编辑器的标题文本框中应输入A. 文件($F)B. 文件(&F)C. 文件(#F)D. 文件(%F)23．数学表达式的VB算术表达式为A. Sin(27) + Sqr(x + Exp3)/(x + y)B. Sin(27 * 3.14159 / 180) + Sqr(x + Exp(3)) / Abs(x + y)C. Sin(27 * 3.14159 / 180) + Sqr(x + e ^ 3) / Abs(x + y)D. Sin(27 * pi / 180) + Sqr(x + Exp(3) / Abs(x + y)24．以下说法不正确的是 24 。
A. 使用不带关键字Preserve的ReDim语句可以重新定义数组的维数B. 使用不带关键字Preserve的ReDim语句可以改变数组各维的上、下界C. 使用不带关键字Preserve的ReDim语句可以改变数组的数据类型D. 使用不带关键字Preserve的ReDim语句可以对数组中的所有元素进行初始化25．下列是合法的变量名。
A. absB. -a1C. cdc dD. Abc_1026．要向文件data.txt添加数据，正确的文件打开命令是A.Open data1.txt For Output As #1B.Open data1.txt For Input As #1C.Open data1.txt For Append As #5D.Open data1.txt For Write As #527. 以下对数组参数的说明中，错误的是A.在过程中可以用Dim语句对形参数组进行声明B.形参数组只能按地址传递C.实参为动态数组时，可用ReDim 语句改变对应形参数组的维界D.只需把要传递的数组名作为实参，即可调用过程28．设a = 3，b = 2，c = 1，运行print a > b > c的结果是 28 。
A. TrueB. FalseC. 1D. 出错29．能够将任意一个两位整数X的个位数与十位数对调（例如将78 转换为87）的表达式是 29 。
① Val(Right(X, 1) & Left(X, 1))② Val(Right(Str(X), 1) & Left(Str(X), 1))③ Val(Right(CStr(X), 1) & Left(CStr(X), 1))④ Val(Mid(X, 2, 1) + Mid(X, 1, 1))A. ③B. ②③C. ①④D. ①③④30．下列是正确的VB常量。
A. D-6B. E-6C. 5DD. 5E-6二、填空题（请将答案填写在答题纸的相应答题号内，每个答案只占一行）1．执行下面程序，单击Command1，则窗体上显示的第一行是（1），第二行是（2），第三行是（3）。
Option ExplicitPrivate Sub Command1_Click()Dim a As String, i As IntegerDim x As String, z As Stringa = iamstudenti = InStr(5, a, d)Dox = Mid(a, i, 3)z = Right(x, 1)z = UCase(x & z)i = i - 2Print zLoop Until i = 1End Sub2. 执行以下程序，单击Command1，则在Picture1上显示的第一行是（4），第二行是（5），第三行是（6）。
Option ExplicitPrivate Sub Command1_Click()Dim A(3, 3) As Integer, i As Integer, j As IntegerDim k As Integeri = 3 : j = 2 : A(i, j) = 1 : k = 1Do Until k > 9k = k + 1If i + 1 > 3 And j + 1 <= 3 Theni = 1 : j = j + 1ElseIf i + 1 <= 3 And j + 1 > 3 Theni = i + 1 : j = 1ElseIf i + 1 > 3 And j + 1 > 3 Theni = i - 1ElseIf i + 1 <= 3 And j + 1 <= 3 And A(i + 1, j + 1) <>0 Theni = i - 1Elsei = i + 1 : j = j + 1End IfA(i, j) = kLoopFor i = 1 To 3For j = 1 To 3Picture1.Print A(i, j)Next jPicture1.PrintNext iEnd Sub3. 执行下面的程序，单击Command1，则窗体上第一行显示的是（7），第二行显示的是（8）。
Option ExplicitDim x As IntegerPrivate Sub Command1_Click()Dim y As Integerx = 10 : y = 2Call process(y)Print x, yCall process((y))Print x, yEnd SubPrivate Sub process(n As Integer)Dim y As IntegerIf n > 0 Thenx = x - ny = xElsex = x + ny = x + 2End Ifn = -nEnd Sub4．执行下面的程序，连续三次单击命令按钮Command1之后，A数组共有（9）个元素；数组元素A(2)的值是（10），A(4)的值是（11）。
Option ExplicitOption Base 1Private Sub Command1_Click()Static A() As Integer, n As IntegerDim i As Integer, k As Integerk = nn = n + 2ReDim Preserve A(n)For i = k + 1 To nA(i) = i * n + 1Next iFor i = 1 To nPrint A(i)Next iPrintEnd Sub5．执行下面的程序，单击Command1，在窗体界面上显示的第一行是（12），第二行是（13），第三行（14），第四行是（15）。
Option ExplicitPrivate Sub Command1_Click()Dim a As Integer, b As Integer, i As Integeri = 1218a = i \ 100b = i Mod 100If b <> 0 ThenPrint aPrint bPrint Lcd((a), (b)) a bPrint Lcd(a, b) a bEnd IfEnd SubPrivate Function Lcd(x As Integer, y As Integer) As Integer Dim d As IntegerIf x < y Thend = x : x = y : y = dEnd Ifd = xDoIf x Mod y = 0 ThenLcd = xExit DoElsex = x + dEnd IfLoopEnd Function6．本程序的功能是利用无穷级数求cos(x)的近似值。
已知：当第n项的绝对值小于等于10-7，计算终止。
Option ExplicitPrivate Sub Command1_Click()Dim x As Single, n As Integer, sum As SingleDim a As Singlex = Text1（16）a = 1n = 1Doa = -aa = （17）sum = sum + an = n + 1Loop Until （18）Text2 = sumEnd Sub7．下面程序的功能是求一个4×4方阵的范数。
方阵的数值是随机生成的-20～20之间的整数。
方阵范数是指方阵各列元素的绝对值之和中的最大的数值。
Option ExplicitOption Base 1Private Sub Command1_Click()Dim a(4, 4) As IntegerDim i As Integer, j As IntegerFor i = 1 To 4For j = 1 To 4a(i, j) = （19）Picture1.Print Right( & Str(a(i, j)), 4)Next jPicture1.PrintNext iText1.Text = （20）End SubPrivate Function fan(a() As Integer) As IntegerDim b(4) As Integer, max As IntegerDim i As Integer, j As IntegerFor i = 1 To 4For j = 1 To 4b(j) = （21）Next jNext imax = b(1)For i = 2 To 4If max < b(i) Then max = b(i)Next ifan = maxEnd Function8、下面程序的功能是，找出仅由数字1、2、3、4组成的4位素数，要求每个素数由4个不同数字组成。
算法提示：函数Validate用于验证一个4位数是否由4个不同数字组成。
在函数中用A数组的各个元素分别对应数字0～9，只要某数字出现在四位数中，无论几次，均将该数字对应的数组元素值置为1。
Option ExplicitPrivate Sub Command1_Click()Dim i As Integer, Flg As BooleanFor i = 1234 To 4321（22）Call Prime(i, Flg)If Flg ThenIf Validate(i) ThenText1 = Text1 & i & vbCrLfEnd IfEnd IfNext iEnd SubPrivate Sub Prime(n As Integer, f As Boolean)Dim k As IntegerFor k = 2 To Sqr(n)（23）Next kf = TrueEnd SubPrivate Function Validate(n As Integer) As Boolean Dim A(0 To 9) As Integer, s As String, i As IntegerDim s1 As String * 1（24）For i = 1 To Len(s)s1 = Mid(s, i, 1)（25）Next iIf A(1) + A(2) + A(3) + A(4) = 4 Then（26）End IfEnd Function9．下面程序的功能是：首先生成一个由小到大已排好序的整数数组，再输入一个数据，单击“插入”按钮，会自动把这个数据插入到原数组适当的位置，并保持数组的有序性。