2009年春季计算机等级考试VISUAL BASIC语言笔试试题A卷

选择题(下列各题A)、B)、 C)、 D)四个选项中，只有⼀个选项是正确的)。

(1)执⾏如下语句： a＝InputBox(”You”，”We”，”She”，，，”Him and them”，5)将显⽰⼀个输⼊对话框，在对话框的输⼊区中显⽰的信息是 A)YOU B)WE C)She D)Him and them (2)在窗体上画⼀个名称为Listl的列表框，⼀个名称为Labell的标签。

列表框中显⽰若⼲城市的名当选中列表框中的某个城市名时，在标签中显⽰选中城市的名称。

下列不能正确实现上述功能的程序是 A)Private Sub Listl Click() Label1.Caption＝List1.ListIndex End Sub B)Private Sub List1＿DblClick() Label1.Caption＝List1 End Sub C)Private Sub List1＿DblClick() Label1.Caption＝List1.Text End Sub D)Private Sub List1.Click() Label1.Caption＝List1.Text End Sub (3)在窗体上画⼀个名称为Commandl的命令按钮，然后编写如下事件过程： 程序运⾏后，单击命令按钮，如果输⼊3，则在窗体上显⽰的内容是 A)3 B)4 C)5 D)6 (4)以下关于菜单的叙述中，错误的是 A)在程序运⾏过程中可以增加或减少菜单项 B)如果把⼀个菜单项的Enabled属性设置为False，则可删除该菜单项 C)弹出式菜单在菜单编辑器中设计 D)利⽤控件数组可以实现菜单项的增加或减少 (5)在窗体上画三个单选按钮，组成⼀个名为chkOption的控件数组。

⽤于标识各个控件数组元素的参数是 A)Tag B)Index C)ListIndex D)Name。

2009年全国计算机等级考试二级VB笔试试题(1)总分：100分及格：60分考试时间：90分一、单项选择题（每小题2分，共70分）(1)设在菜单编辑器中定义了一个菜单项，名为menu1。

为了在运行时显示该菜单项，应使用的语句是A. menu1.Enabled=TrueB. menu1.Enabled=FalseC. menu1.Visible=TrueD. menu1.Visible=False(2)以下合法的Visual Basic标识符是A. DoWhileB. DoC. 56dD. A#BC(3)数据结构作为计算机的一门学科，主要研究数据的逻辑结构、对各种数据结构进行的运算，以及（）。

A. 数据的存储结构B. 计算方法C. 数据映象D. 逻辑存储(4)以下语句正确的是（）。

A. CommonDialoFilter＝All Files i*.*I Pictures(*.bmp)|*.bmpB. CommonDialoFliter＝"All FileS"|"*.*"|"Pictures(*.bnlp)|"*.bmp"C. CommonDialoFilter＝＝"All Files|*.*|Pictures(*.bmp)|*.bmp"D. CommonDialoFilter＝{ All Files |*.*| Pictures(*.bmp)|*.bmp}(5)下述关于数据库系统的叙述中正确的是A. 数据库系统中数据的一致性是指数据类型一致B. 数据库系统比文件系统能管理更多的数据C. 数据库系统减少了数据冗余D. 数据库系统避免了一切冗余(6)软件凋试的目的是（）。

A. 发现错误B. 改正错误C. 改善软件的性能D. 挖掘软件的潜能(7)在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，然后编写如下程序：程序运行后，如果单击命令按钮，则在文本框中显示的内容是A. 0B. 14C. zD. Str(z)(8)Visual Basic 6.0变量名Num@的类型是（）。

全国计算机等级考试二级VISUAL BASIC真题2009年9月(总分：100.00，做题时间：90分钟)一、{{B}}选择题{{/B}}(总题数：35，分数：70.00)1.下列数据结构中，属于非线性结构的是（分数：2.00）A.循环队列B.带链队列C.二叉树√D.带链栈解析：[解析] 根据数据结构中各数据元素之间前后关系的复杂程度，一般将数据结构分为两大类型：线性结构与非线性结构。

线性结构表示数据元素之间为一对一的关系，非线性结构表示数据元素之间为一对多或者多对一的关系。

根据各种结构的定义可知二叉树是一种非线性结构。

2.下列数据结构中，能够按照“先进后出”原则存取数据的是（分数：2.00）A.循环队列B.栈√C.队列D.二叉树解析：[解析] 栈是限定只在一端进行插入与删除的线性表，通常称插入、删除的这一端为“栈顶”，另一端为“栈底”。

栈顶元素总是后被插入的元素，也是最先被删除的元素；栈底元素总是最先被插入的元素，也是最后才能被删除的元素。

栈是按照“先进后出”或“后进先出”的原则组织数据的。

3.对于循环队列，下列叙述中正确的是（分数：2.00）A.队头指针是固定不变的B.队头指针一定大于队尾指针C.队头指针一定小于队尾指针D.队头指针可以大于队尾指针，也可以小于队尾指针√解析：[解析] 循环队列是将顺序队列首尾相连形成的，随着插入元素或删除元素的进行，其队头指针及队尾指针是在不断变化的，有时可能会出现队头指针大于队尾指针的情况，也可能是队尾指针大于队头指针，故答案为D)。

4.算法的空间复杂度是指（分数：2.00）A.算法在执行过程中所需要的计算机存储空间√B.算法所处理的数据量C.算法程序中的语句或指令条数D.算法在执行过程中所需要的临时工作单元数解析：[解析] 算法的空间复杂度是指：算法执行过程中所需的存储空间。

一个算法所占用的存储空间包括算法程序所占的空间、输入的初始数据所占的存储空间及算法执行过程中所需要的额外空间。

第一套客观题第一题：是非题（共10分，每项1分）1. ActiveX部件是可以重复使用的编程代码和数据。

A.对B.错2. 窗体的Enabled属性设为False时，窗体题的按钮、文本框控件就不会对用户的操作做出反应。

A.对B.错3. 每一个控件实质上都是一个微型程序。

AA.对B.错4. 在程序运行过程中，变量中的值不会改变，而常量中的值会被改变。

A.对B.错5. 用Dim语句声明变量时，VB系统不仅为变量分配相应数据类型的内在空间，而且还为变量赋所需的初值。

A.对B.错6. 定义菜单项时，可以不设置分隔线的菜单项控件名称。

A.对B.错7. 在事件驱动的应用程序中，代码是按照预定的路径执行的。

A.对B.错8. 函数调用时，实际参数与形式参数在数量必须完全一致。

A.对B.错9. 每个菜单项都是一个控件，与其他控件一样也有自己的属性和事件。

A.对B.错10. 通用过程可以放在标准模块中，也可以放在窗体模块中。

A.对B.错第二题、单选题（共45分，每项1.5分）11. 要判断“命令按钮”是否被鼠标单击，应在“命令按钮”的事件中判断。

CA.ChangB.KeyDownC.ClickD.KeyPress12. InputBox函数的返回值的类型为 B 。

A.数值B.字符串C.逻辑值D.日期值13. 要想在过程调用后返回两个结果，下面的过程定义语句合法的是A。

A.Sub Proc1(ByVal n,Byval m)B.Sub Proc1(ByVal n, m)C.Sub Proc1(n,Byval m)D.Sub Proc1(n, m)14. 下面关于打印对话框属性的说法错误的是 C 。

A.Copies属性指定打印的份数。

B.HDC属性指定分配给打印机的句柄，用来识别对象的设备环境。

C.FromPage属性指定要打印文档的页范围。

使用该属性时必须把Flags属性设置为1。

D.Max和Min属性用来显示FromPage和ToPage的范围，其中Min指定允许的起始页码，Max指定允许的最后页码。

浙江省2009年春二级VB考试试卷及答案2009年春浙江省高等学校计算机等级考试试卷(二级Visual Basic) 试题1 阅读下列程序说明和程序，在每小题提供的若干可选答案中，挑选一个正确答案。

【程序说明】输入n后，计算并显示下列表达式的值。

1?1111????? 234n运行时初始界面如下图左所示，输入10并按回车键后的界面如下图中所示，按“计算”按钮后的界面如下图右所示。

【程序】Dim n As Integer Private Sub Form_Load() Command1. (1)End Sub Private Sub Text1_(2)(K As Integer) If K 13 Then Exit Sub(3) If n > 0 Then = True= False Else = \ End If End Sub Private Sub Command1_Click() Dim yAs Single, i As Integer For i = 1 To n (4)Next i = y= False = True= \ 1 End Sub 【供选择的答案】(1) A、Enabled=True B、Enabled=False C、Visible=True D、Visible=False (2)A、KeyPressB、ClickC、Change(3) A、k=B、k = 13C、n = 13D、KeyDown D、n = (4) A、y = y + 1/n B、y = y + 1\\n C、y = y + 1/i D、y = y + 1\\i 试题2 阅读下列程序说明和程序，在每小题提供的若干可选答案中，挑选一个正确答案。

【程序说明】运行时输入10个数后，输出其中较小的5个数。

【程序】Private Sub Command1_Click() Dim a(10) As Single, t As Single, i As Byte, j As Byte, k As Byte For i = 1 To 10 a(i) = InputBox( (5)) Next i Fori = 1 To 9(6)For j = i +1 To 10 If (7)Then k = j Next j t = a(i): a(i) = a(k): a(k) = tNext i For i = (8)Print a(i) Next i End Sub 【供选择的答案】(5) A、\、\C、\、\(6) A、k = i B、i = k C、k = i + 1D、i = k + 1 (7) A、a(j) a(i)C、a(j) > a(k)D、a(j) D、5 To 10 试题3 阅读下列程序说明和程序，在每小题提供的若干可选答案中，挑选一个正确答案。

2009年全国计算机等级考试二级VB笔试试题(5)总分：100分及格：60分考试时间：90分一、单项选择题(每小题2分，共70分)(1)有如下程序：程序运行后的输出结果为A. CCFB. ccfC. CDEABCFGHD. cdeabcfgh(2)下列说法中不正确的是A. 数据库减少了数据冗余B. 数据库中的数据可以共享C. 数据库避免了一切数据的重复D. 数据库具有较高的数据独立性(3)设a一12．b＝8，e＝5，执行语句Print a>b>c后，窗体上显示的是A. 出错信息B. 1C. FalseD. True(4)在窗体上画两个单选按钮，名称分别为Option1、Option2，标题分别为“宋体”和“黑体”；一个复选框，名称为Check1，标题为“粗体”；一个文本框，名称为Text1，Text属性为“改变文字字体”。

要求程序运行时，“宋体”、“单选按钮”和“粗体”复选框被选中(窗体外观如图所示)，则能够实现上述要求的语句序列是A. Option1.Value=True Check1.Value=FalseB. Option1.Value=True Check1.Value=TrueC. Option2.Value=False Check1.Value=TrueD. Option1.Value=True Check1.Value=1(5)下列叙述中，正确的是A. 软件就是程序清单B. 软件就是存放在计算机中的文件C. 软件应包括程序清单及运行结果D. 软件包括程序和文档(6)在窗体上画一个命令按钮(其NAME属性为Commandl)．然后编写如下代码：运行上面的程序，单击命令按钮，其输出结果是A. 2 8B. 0 1C. ．25 1D. ．25 8(7)在面向对象方法中，实现信息隐蔽是通过对象的某一特性来实现的，这个特性是A. 封装B. 类C. 对象D. 继承(8)下列有关数据库的描述，正确的是（）。

二级VISUAL BASIC机试真题2009年03月1 基本操作题请根据以下各个小题的要求设计Visual Basic应用程序(包括界面和代码)。

1. 在窗体上拖拉出一个文本框，名称为Txt1，Text属性为空白。

再画一个列表框，名称为Lst1，通过属性窗口向列表框中添加4个项目，分别为“aaaa”、“bbbb”、“cccc”和“dddd”(如下图所示)。

编写适当的事件过程，使程序运行后，在文本框中输入一个字符串，如果双击列表框中的任一项，则把文本框中的字符串添加到列表框中。

程序运行时的窗体界面如下图所示。

注意：存盘时必须存放在考生文件夹下，工程文件名为sjt1.vbp，窗体文件名为sjt1.frm。

答案：第一步：建立工程和添加窗体。

单击考试界面的“功能”选项，从弹出的菜单中选择“启动应用程序”选项。

启动Visual Basic后，在“新建工程”对话框中选择“新建”项目中的“标准EXE”，然后单击“打开”按钮，建立一个新的工程文件，里面会同时自动建立一个名为Form1的窗体文件。

第二步：设计窗体。

单击工具箱中的ListBox控件图标，然后在窗体上拖拉出一个列表框，通过属性窗口设计其Name属性为Lst1，通过设置List属性为列表框添加“aaaa”、“bbbb”、“cccc”和“dddd”四个列表项，按Ctrl+Enter组合键换行。

单击工具箱中的TextBox 控件图标，然后在窗体上拖拉出一个文本框，通过属性窗口设置其Name属性为Txt1，Text属性为空。

第三步：编写代码：在弹出的代码窗口中，输入如下程序语句：1 Private Sub Lst1_DblClick()2 Lst1.AddItem Txt1.Text3 End Sub第四步：保存。

(1)[解答]本题主要考查列表框的AddItem方法，用来在列表框中插入一行文本。

另外，注意本题的触发事件是DblClick，而不是Click。

2. 在名称为Form1的窗体上建立两个名称分别为Command1和Command2.标题分别为“上午”和“下午”的命令按钮。

2009年3月28日全国计算机等级考试VB考试卷一、选择题1.下列叙述中正确的是A. 栈是“先进先出”的线性表B. 队列是“先进后出”的线性表C. 循环队列是非线性结构D. 有序线性表既可以采用顺序存储结构，也可以采用链式存储结构考核知识点:(1) 数据结构答案:D分析：栈是“先进后出”的线性表；队列是“先进先出”的线性表；循环队列是线性结构2.支持子程序调用的数据结构是A. 栈B. 树C. 队列D. 二叉树考核知识点:(1) 数据结构具体应用答案:A分析：栈是“先进后出”的线性表，栈具有记忆作用3.某二叉树有5个度为2的结点，则该二叉树中叶子结点数是A. 10B. 8C. 6D. 4考核知识点:(1) 二叉树的性质答案:C分析：二叉树的性质：度为0的结点（即叶子结点）总是比度为2的结点多一个4.下列排序方法中，最坏情况下比较次数最少的是A. 冒泡排序B. 简单选择排序C. 直接插入排序D. 堆排序考核知识点:(1) 常用算法的时间复杂度答案:D分析：交换类排序法：（1）冒泡排序法，需要比较的次数为n(n-1)/2；（2）快速排序法。

插入类排序法：（1）简单插入排序法，最坏情况需要n(n-1)/2次比较；（2）希尔排序法，最坏情况需要O(n1.5)次比较。

选择类排序法：（1）简单选择排序法,最坏情况需要n(n-1)/2次比较；（2）堆排序法，最坏情况需要O(nlog2n)次比较5.软件按功能可以分为：应用软件、系统软件和支撑软件（或工具软件）。

下面属于应用软件的是A. 编译程序B. 操作系统C. 教务管理系统D. 汇编程序考核知识点:(1) 软件的分类答案:C分析：编译程序、操作系统和汇编程序都属于系统软件6.下面叙述中错误的是A. 软件测试的目的是发现错误并改正错误B. 对被调试的程序进行“错误定位”是程序调试的必要步骤C. 程序调试通常也称为DebugD. 软件测试应严格执行测试计划，排除测试的随意性考核知识点:(1) 软件测试与调试的区别答案:A分析：软件测试的目的是发现错误，而改正错误不属于软件测试的目的，属于调试的目的7.耦合性和内聚性是对模块独立性度量的两个标准。

2009年9月全国计算机等级考试二级笔试试卷Visual Basic语言程序设计参考答案一、选择题（每小题2分，共70分）(1)-(5) C B D A B(6)-(10) A C B C D(11)-(15)C D A C D(16)-(20)D A C B C(21)-(25)A C A B B(26)-(30)C D B D A(31)-(35)B D B C A二、填空题（每空2分，共30分）(1)【1】14(2)【2】逻辑条件或逻辑判断或条件或判断(3)【3】需求分析(4)【4】多对多(5)【5】身份证号(6)【6】Text1.Text【7】Text1.Text【8】Form2(7)【9】 Is【10】Else 或 Is<60【11】End Select(8)【12】12【13】10(9)【14】Number【15】s一、选择题（每小题2分，共70分）（1）下列数据结构中，属于非线性结构的是C）二叉树（2）下列数据结构中，能够按照“先进后出”原则存取数据的是B）栈（3）对于循环队列，下列叙述中正确的是D）队头指针可以大于队尾指针，也可以小于队尾指针（4）算法的空间复杂度是指A）算法在执行过程中所需要的计算机存储空间（5）软件设计中划分模块的一个准则是B）高内聚低耦合（6）下列选项中不属于结构化程序设计原则的是A）可封装（7）软件详细设计器产生的图如下，该图是C）程序流程图（8）数据库管理系统是B）操作系统支持下的系统软件（9）在E-R图中，用来表示实体联系的图形是C）菱形（10）有三个关系R，S和T如下，其中关系T由关系R和S通过某种操作得到，该操作为D）并（11）以下变量名中合法的是C）str_n（12）把数学表达式表示为正确的VB表达式应该是D）(x*5+3)/(y*2-6)（13）下面有关标准模块的叙述中，错误的是A）标准模块不完全由代码组成，还可以有窗体（14）下面控件中，没有Caption属性的是C）组合框（15）用来设置文字字体是否斜体的属性是D）FontItalic（16）若看到程序有如下事件过程，则可以肯定的是，当程序运行时Private SubClick_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)Print "VB Program"End SubD）用鼠标左键或右键单击名称为“Click”的控件时，执行此过程（17）可以产生30-50（含30到50）之间的随机整数的表达式是A）Int(Rnd*21+30)（18）在程序运行时，下面的叙述中正确的是C）只装入而不显示窗体，也会执行窗体的Form_Load事件过程（19）窗体有名称为Command1的命令按钮和名称为Text1的文本框Private Sub Command1_Click()Text1.Text = "程序设计"Text1.SetFocusEnd SubPrivate Sub Text1_GotFocus()Text1.Text = "等级考试"End Sub运行以上程序，单击命令按钮后B）文本框中显示的是“等级考试”，且焦点在文本框中（20）设窗体上有名称为Option1的单选按钮，且程序中有语句：If Option.Value=True Then下面语句中与该语句不等价的是C）If Value=True Then（21）设窗体上有1个水平滚动条，已经通过属性窗口把它的Max属性设置为1，Min属性设置为100，下面叙述中正确的是A）程序运行时，若使滚动条向左移动，滚动条的Value属性值就增加（22）有如下过程代码：Sub var_dim()Static numa As IntegerDim numb As Integernuma = numa + 2numb = numb + 1Print numa; numbEnd Sub连续3次调用var_dim过程，第3次调用时的输出是C）6 1（23）在窗体上画1个命令按钮，并编写如下事件过程：Private Sub Command1_Click()For i = 5 To 1 Step -0.8Print Int(i);Next iEnd Sub运行程序，单击命令按钮，窗体上显示的内容为A）5 4 3 2 1 1（24）在窗体上画1个命令按钮，并编写如下事件过程：Private Sub Command1_Click()Dim a(3, 3)For m = 1 To 3For n = 1 To 3If n = m Or n = 4 - m Thena(m, n) = m + nElsea(m, n) = 0End IfPrint a(m, n);Next nPrintNext mEnd SubB）2 0 40 4 04 0 6（25）设有如下函数过程：Function fun(a As Integer, b As Integer) Dim c As IntegerIf a < b Thenc = a: a = b: b = cEnd Ifc = 0Doc = c + aLoop Until c Mod b = 0fun = cEnd Function若调用函数fun时的实际参数都是自然数，则函数返回的是B）a、b的最小公倍数（26）窗体上有1个名称为Text1的文本框；1个名称为Timer1的计时器控件，其Interval 属性为5000，Enabled属性值是True。

XXXXX 职业技术学校2018—2019学年第二学期期中考试卷《程序设计VisualBasic 》试卷（闭卷）（A 卷） 出卷人：黄锦云（考试时间：90分钟， 18 级 计算机 专业使用）请将选择题的答案写在下列方框内一、 控件解释（写出以下控件名称（中英文名称））（每题3分，共15分）二、单项选择题（每题3分，共45分）1、在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Command1_Click() a=12345Print Format$(a,"000.00")End Sub程序运行后，单击命令按钮，窗体上显示的是______。

A 123.45B 2345.00C 00123.45D 123452、在窗体上画一个文本框(其名称为Text1)和一个标签(其名称为Label1)，程序运行后，如果在文本框中输入指定的信息，则立即在标签中显示相同的内容。

以下可以实现上述操作的事件过程是______。

3、设x=4，y=6，则以下不能在窗体上显示出"A=10"的语句是______。

A Print "A = " x + yB Print "A = " + Str(x+y)C Print "A = " & x + yD Print A = x + y 4、用下面语句定义的数组的元素个数是______。

dim A(-3 to 5) as integer A.8 B.9 C.7 D.65、某人在窗体上画了一个名称为Timer1的计时器和一个名称为Label1的标签，计时器的属性设置为Enabled=True ，Interval=0，并编程如下。

希望在程序运行时，可以每2秒在标签上显示一次系统当前时间。

Private Sub Timer1_Timer() Label1.Caption=Time$End Sub在程序执行时发现未能实现上述目的，那么，他应做的修改是______。

2009年春浙江省高等学校【程序说明】输入n 后，计算并显示下列表达式的值。

n 14131211+++++ 运行时初始界面如下图左所示，输入10并按回车键后的界面如下图中所示(输入数若小于1则清空文本框，需重新输入)，按“计算”按钮后的界面如下图右所示。

【程序】Dim n As IntegerPrivate Sub Form_Load()Command1. Enabled=False 1End SubPrivate Sub Text1_KeyPress 2 (K As Integer)If K <> 13 Then Exit Sub n=Text1.Text 3If n > 0 ThenCommand1.Enabled = TrueText1.Enabled = FalseElseText1.Text = ""End IfEnd SubPrivate Sub Command1_Click()Dim y As Single, i As IntegerFor i = 1 To ny=y+1/i （4）Next iLabel3.Caption = yCommand1.Enabled = FalseText1.Enabled = TrueText1.Text = " "Text1.SetFocusEnd Sub【程序说明】运行时输入10个数后，输出其中较小的5个数。

【程序】Private Sub Command1_Click()Dim a(10) As Single, t As Single, i As Byte, j As Byte, k As ByteFor i = 1 To 10a(i) = InputBox("a(" & i & ")=" （5）)Next iFor i = 1 To 9k=i （6）For j = i + 1 To 10If a(j)<a(k) （7）Then k = jNext jt = a(i): a(i) = a(k): a(k) = tNext iFor i = 1 To 5 （8）Print a(i)Next iEnd Sub【（每小题3分，共12分）阅读下列程序说明和程序，在每小题提供的若干可选答案中，挑选一个正确答案。

江苏计算机一级2009年春考题(第2套)及参考答案1.下列文件类型中，属于简单文本的文件类型是_________。

A.PDF文件B.HLP文件C.DOC文件D.TXT文件2.从逻辑功能上讲，计算机硬件系统中最核心的部件是_____，它控制着内存储器、外存储器和I/O设备有条不紊地工作。

3.在Windows系统中，若2个纯文本文件分别包含100和200个英文字符，下面关于它们占用磁盘空间大小的说法中，正确的是____________ 。

A.前者大于后者B.后者大于前者C.两者相等D.不确定4.信号调制是指用载波信号调整信源信号的幅度、频率或相位。

5.人的眼底虹膜具有与指纹一样特有的纹理，常被用来作为__________的依据，以便确定用户身份后授予一定的访问权限。

6.CD-ROM盘片表面有许多极为微小的、长短不等的凹坑，所记录的信息与此有关。

7.现代信息技术涉及众多领域，例如通信、广播、计算机、微电子、遥感遥测、自动控制、机器人等。

8.Windows系统中，只有安装了外设的驱动程序，系统才可以正常使用该设备。

9.要发送电子邮件就需要知道对方的邮件地址，邮件地址包括邮箱名和邮箱所在的主机域名，两者中间用_________隔开。

10.下列有关虚拟专网的叙述中错误的是________。

A.构建虚拟专网需租用电信局的专线来实现端到端的物理连接B.隧道技术、加密、身份鉴别等是实现虚拟专网常用的技术C.虚拟专网是架构在公用数据网所提供的网络平台之上的逻辑网络D.基于因特网的VPN具有节省费用、运行灵活、易于扩展、易于管理等优点11.GB2312汉字编码标准中，二级汉字按照偏旁部首的顺序排列，而一级汉字是按照__________顺序排列的。

12.由于微波________，所以在实际通信中得到广泛应用。

A.绕射能力强，能沿地面传播B.具有较强的电离层反射能力C.直线传播，容量大，通信设施建设费用少D.与光波具有相同的波长和传输特性13.CRT显示器在工作时产生的辐射会对人体有不良的影响，但不影响信息安全。

第一部分计算机基础知识1．在下列有关现代信息技术的一些叙述中，正确的是 1 。

A．集成电路是20世纪90年代初出现的，它的出现直接导致了微型计算机的诞生B．集成电路的集成度越来越高，目前集成度最高的已包含几百个电子元件C．目前所有数字通信均不再需要使用调制解调技术和载波技术D．光纤主要用于数字通信，它采用波分多路复用技术以增大信道容量2．最大的10位无符号二进制整数转换成八进制数是 2 。

A．1023 B．1777 C．1000 D．10243．在下列有关目前PC机CPU的叙述中，错误的是 3 。

A．CPU芯片主要是由Intel公司和AMD公司提供的B．“双核”是指PC机主板上含有两个独立的CPU芯片C．Pentium 4微处理器的指令系统由数百条指令组成D．Pentium 4微处理器中包含一定容量的Cache存储器4．在下列有关当前PC机主板和内存的叙述中，正确的是 4 。

A．主板上的BIOS芯片是一种只读存储器，其内容不可在线改写B．绝大多数主板上仅有一个内存插座，因此PC机只能安装一根内存条C．内存条上的存储器芯片属于SRAM(静态随机存取存储器)D．目前内存的存取时间大多在几个到十几个ns(纳秒)之间5．在下列有关PC机辅助存储器的叙述中，正确的是 5 。

A．硬盘的内部传输速率远远大于外部传输速率B．对于光盘刻录机来说，其刻录信息的速度一般小于读取信息的速度C．使用USB 2.0接口的移动硬盘，其数据传输速率大约为每秒数百兆字节D．CD-ROM的数据传输速率一般比USB 2.0还快6．在下列PC机I／O接口中，数据传输速率最快的是 6 。

A．USB 2.0 B．IEEE_1394 C．IrDA(红外) D．SATA7．计算机软件可分为商品软件、共享软件和自由软件等类型。

在下列叙述中，错误的是7 。

A．通常用户需要付费才能得到商品软件的使用权，但这类软件的升级总是免费的B．共享软件通常是一种“买前免费试用”的具有版权的软件C．自由软件的原则是用户可共享，并允许拷贝和自由传播D．软件许可证是一种法律合同，它确定了用户对软件的使用权限8．人们通常将计算机软件划分为系统软件和应用软件。

2009年上海市高等学校计算机等级考试试卷及答案A卷2009年上海市高等学校计算机等级考试试卷二级 C语言程序设计（ A 卷）一、单选题1.执行下列语句序列后，不可能出现的运行结果是___C______。

int n;scanf( "%d", &n);switch ( n ){case 1:case 2: putchar('X');case 3:case 4: putchar('Y'); break;default: putchar('Z');A. 显示：zB. 显示：xyC. 显示：xD. 显示：y2.设a,b为整型变量, 且二者均不为0, 以下关系表达式中恒成立的是__C____。

A. a/b*b/a==1B. a/b*b==aC. a*b/a==bD. a*b/ a*b ==13.设有定义：int x=10,y=20,z=30; 则执行下列语句后的结果是___B____。

if ( x>y ) z=x;x=y; y=z;printf("%d,%d,%d",x, y, z );A. 20,30,20B. 20,30,30C. 20,30,10D. 10,20,304.下列程序的输出结果是__B___。

main(){int a = 011;printf( "%d\", ++a );}A. 9B. 10C. 11D. 125.设 x, y 和 z 是int型变量，且 x=3, y=4, z= 5，则下面表达式中值为0的是__B__。

A. !(x<y)&&!z||1< bdsfid="110" p=""></y)&&!z||1<>B. x==y&&y!=zC.x||y+z&&y-zD. y&&’y’6.以下所列的各函数声明中，正确的是___D____。

上机试卷 第1套2009年4月25日一、设计程序界面如图1所示。

程序运行时，单击“生成矩阵”按钮Command1，在图片框Picture1中生成由3位正整数组成的5×5矩阵；随后单击“查找最大值”按钮Command2，在图片框Picture2中显示矩阵中的最大值。

（40分，存盘工程文件名为Ex11nnnn.Vbp ，窗体文件名为Ex11nnnn.Frm ，其中nnnn 为考生准考证号的右4位）二、编写程序，从窗体工作区左上角开始，沿主对角线画出8个相切的红色矩形块，运行结果如图2所示。

（30分，存盘工程文件名为Ex12nnnn.Vbp ，窗体文件名为Ex12nnnn.Frm ，其中nnnn 为考生准考证号的右4位）三、程序界面如图3所示，启动运行后，在文本框Text1中依次输入同学的姓名、身高和体重，数据项之间以空格分开，然后单击“查找”按钮，在标签Label2中显示最胖者的姓名（体重/身高的值最大者）。

（30分，已知程序代码有错，请根据程序功能调试程序。

将修改正确的程序存盘，工程文件名为Ex13nnnn.Vbp ，窗体文件名为Ex13nnnn.Frm ，其中nnnn 为考生准考证号的右4位）Private Sub Command1_Click()Dim a As Integer ‘errora = Split(Text1)Max = 0Order = 0For i = LBound(a) To UBound(a) Step 2 ‘errorx = a(i + 2) / a(i + 1)If x ＜ Max Then ‘errorx=Max ‘errorOrder = iEnd IfNext iLabel2 = "最胖的人是：" & Order ‘errorEnd Sub 图1 图2 图3上机第一套参考答案一、参考答案Dim a(25) As IntegerPrivate Sub Command1_Click()RandomizeFor i = 1 To 25a(i) = Int(Rnd * 900 + 100)Picture1.Print a(i);If i Mod 5 = 0 Then Picture1.PrintNext iEnd SubPrivate Sub Command2_Click()Max = a(1)For i = 2 To 25If a(i) > Max Then Max = a(i)Next iPicture2.Print "最大值="; MaxEnd Sub评分标准：界面设计15分正确显示矩阵10分正确查找最大值10分正确存盘5分二、参考答案Private Sub Form_Click()x = 0y = 0Me.ForeColor = vbRedFor i = 1 To 8Line (x, y)-(x + 400, y + 300), , BFx = x + 400y = y + 300Next iEnd Sub评分标准：正确设置画图初始位置5分正确设置填充颜色5分正确设置循环5分正确画出矩形5分正确定位矩形5分正确存盘5分三、参考答案Private Sub Command1_Click()Dim a As Varianta = Split(Text1)Max = 0Order = 0For i = LBound(a) To UBound(a) Step 3 x = a(i + 2) / a(i + 1)If x > Max ThenMax = xOrder = iEnd IfNext iLabel2 = "最胖的人是：" & a(Order) End Sub评分标准：每改正一个错误，得5分正确存盘，得5分上机试卷 第2套2009年4月25日一、设计程序界面如图1所示。

2008年12月温州市中职毕（结）业会考《Visual Basic语言》试卷一、选择题：（将正确答案填写在以下表格内。

每小题2分，共40分）1．Visual Basic是一种面向对象的程序设计语言，所采用的编程机制是＿＿＿＿＿。

A．从主程序开始执行B．按过程顺序执行C．事件驱动D．按模块顺序执行2．不能响应Click事件的对象是＿＿＿＿＿。

A．标签框B．图片框C．窗体D．计时器3．可视化编程基本过程的3个步骤是＿＿＿＿＿。

A．创建工程、设计界面、编写代码B．创建工程、编写程序、保存程序C．设计界面、设置属性、编写代码D．设计界面、编写代码、调试程序4．要改变标签控件（Label）所显示的文字内容，就是改变该控件的＿＿＿属性值。

A．Caption B．Text C．Name D．Left5．为了暂时关闭计时器，应该把计时器的＿＿＿＿＿属性设置为False。

A．Interval B．TimerC．Visible D．Enabled6．把一个命令按钮设置成无效，应设置其哪一属性值＿＿＿＿＿。

A．Visible B．EnabledC．Default D．Cancel7．决定图片框背景色的属性是＿＿＿＿＿。

A．BackColor B．ForeColorC．FontColor D．FillColor8．若希望让操作者输入文字数据时，可以建立＿＿＿＿＿控件。

A．标签B．文本框C．命令按钮D．图片框9．有程序代码如下：Text1.Text = "Visual Basic程序设计"则Text1、Text 和"Visual Basic程序设计"分别代表＿＿＿＿。

A．对象，值，属性B．对象，方法，属性C．对象，属性，值D．属性，对象，值10．通过＿＿＿＿窗口，可以显示或改变窗体在屏幕中的位置。

A．属性B．窗体布局C．监视D．数据视图11．在Visual Basic中通过________属性来设置字体的颜色。

二级Visual Basic 语言笔试试题A卷一、单项选择题（每题 1 分，共20分）1．语句X = Rnd * 1000 执行之后，变量X可能的取值范围是（）（A）0≤X＜1 （B）0≤X≤1（C）0≤X＜1000 （D）0≤X≤10002．VB中表示回车换行的符号常量是（）（A）VBRed （B）vbCrLf（C）VBrgb （D）VBcolor3．VB表达式64 \ 4 * 2 Mod 5的值是（）（A）1 （B）2 （C）3 （D）44．函数String(3，"Student")的返回值是（）（A）"SSS" （B）"Stu" （C）"StuStuStu" （D）"StudentStudentStudent" 5．若使标签控件Label1能自动改变自身大小，以保证文字在其中能够完整显示，应设置属性（）（A）Label1.Caption = ””（B）Label1.BorderStyle = 0 (None)（C）Label1.AutoSize = True（D）Label1.Width = Max6．下列关于数组定义的语句中，概念正确的语句是（）（A）一维数组的下标只能从0或1开始（B）使用语句Dim a(-10, 10) As Double ，可以定义一个拥有21个元素的数组（C）使用语句Dim a(n) As Integer，可以定义一个拥有n个元素的数组（D）使用语句Option Base 0: Dim b(3,5) As Single定义的数组b拥有24个元素7．函数表达式Val("最大值256")的返回值为（）（A）0 （B）256 （C）65536 （D）类型不匹配8．在Visual Basic程序运行期间始终不可见的控件是( )（A）Label （B）Frame （C）Timer （D）ListBox9．能在程序运行期间将图片文件“d:\background.jpg”设置为窗体背景的语句是（）（A）Me.Picture = "d:\background.jpg"（B）Me.Picture = LoadPicture("d:\background.jpg")（C）Me.BackColor = "d:\background.jpg"（D）Me.FillColor = LoadPicture("d:\background.jpg")10．下列窗体事件过程最先被执行的是（）（A）Load() （B）Click() （C）MouseDown() （D）Unload()11．下列程序运行后，单击命令按钮Command1，则在窗体上显示的内容是（）Option Base 0Private Sub Command1_Click()Dim city As Variantcity = Array("北京", "上海", "天津", "重庆")Print city(1)End Sub（A）空白（B）错误提示（C）北京（D）上海12．下面程序段的执行结果是（）a = 75If a >= 90 Then score = "优秀"If a >= 80 Then score = "良好"If a >= 70 Then score = "中等"If a >= 60 Then score = "及格"If a < 60 Then score = "不及格"Print "成绩等级为："; score（A）成绩等级为：优秀（B）成绩等级为：良好（C）成绩等级为：中等（D）成绩等级为：及格13．运行程序时，要在图片框中显示“Good Morning”字符串，应使用语句（）（A）Picture1.Picture=LoadPicture(Good Morning)（B）Picture1.Picture=LoadPicture("Good Morning")（C）Picture1.Print "Good Morning"（D）Me.Print "Good Morning"14. 能产生下面形式消息框的语句是（）（A）n = MsgBox("输入的数据是否正确", vbOKCancel + vbQuestion, "请确认")（B）n = MsgBox("输入的数据正确吗", vbYesNoCancel + vbInformation, "请确认")（C）n = MsgBox("输入的数据是否正确",vbOKCancel + vbInformation, "请确认")（D）n = MsgBox("输入的数据是否正确", vbYesNoCancel + vbQuestion, "请确认")15．下列程序段执行后的结果为（）Private Sub Form_Click()Dim a As Integer, b As Integer, c As Integera = 5:b = 7:c = a + bLabel1.Caption = "运算结果=" & cEnd Sub（A）标签控件Label1 中显示：运算结果=5（B）标签控件Label1 中显示：运算结果=7（C）标签控件Label1 中显示：运算结果=12（D）标签控件Label1 中显示：运算结果=3516．已知程序中有如下事件过程，则程序运行时（）Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) If Button = 2 ThenCurrentX = X：CurrentY = Y：Print "*"End IfEnd Sub（A）在窗体上移动鼠标光标，将沿光标移动轨迹画出由“*”组成的曲线（B）在窗体上按下鼠标左键并移动鼠标光标，将沿光标移动轨迹画出由“*”组成的曲线（C）在窗体上按下鼠标右键并移动鼠标光标，将沿光标移动轨迹画出由“*”组成的曲线（D）在窗体上按下鼠标左键并立即释放，能在光标位置画出一个“*”17．能产生下图所示对话框的正确语句为（）（A）InputBox("请输入一个整数", "键盘输入数据", 0)（B）InputBox("计算", "键盘输入整数", 10)（C）n=InputBox("请输入一个整数", "键盘输入数据",0)（D）n=InputBox("计算", "输入整数", 10)18．启动Visual Basic应用程序时将自动触发的事件是（）（A）Form_Click （B）Form_DblClick （C）Form_Load （D）Form_Unload19．在程序运行期间，为列表框（ListBox）增加数据项的方法是（）（A）AddItem （B）AddNew （C）AddOption （D）AddPoint20. 在一个语句行内书写多个语句时，各语句之间应该使用（）符号分隔开来。