下载文档原格式
高级语言程序设计考试指南鞍山师范学院计算中心2014(一)高级语言程序设计考试系统使用说明1. 考试系统启动使用鼠标左键双击桌面上VB程序设计考试系统图标，进入考试系统考生信息输入界面(如图1所示)。
图1考试系统考生信息输入对话框在考号文本框中输入考号(注意：计算中心为每个学生统一编制的考号)，单击此对话框中的“确定”按钮，系统会弹出另外一个考生考试信息对话框，如图2所示。
界面上会出现考生信息，考生自身信息核对无误后（注意：在实际考试中考生如果发现机器显示信息和自身信息不一致应及时向监考教师说明），单击“进入系统”按钮，进入考试系统考生须知界面(如图3所示)。
图2 考生信息对话框图3 考试系统考生须知界面注意：在考生须知界面有关于本次考试的最新消息和一些注意事项，考生应仔细阅读。
2. 考试系统的使用方法和一些注意事项单击考试系统考生须知界面的“开始答题并计时”按钮进入考试系统主界面，如图4所示。
图4 考试系统主界面考生可以使用主界面上的按钮和菜单选择所答题目。
(1) 单击考试系统主界面的“单选题”按钮，进入单选题的答题界面，如图5所示，考生可以使用命令按钮选择回答哪道题，使用单选按钮选择答案。
做完单选题后，单击“返回主菜单”命令按钮，返回主菜单。
图5 单选题答题界面(2)单击考试系统主界面的“多选题”按钮，进入多选题的答题界面，如图6所示，考生可以使用命令按钮选择回答哪道题，使用复选按钮选择答案。
做完多选题后，单击“返回主菜单”命令按钮，返回主菜单。
图6 多选题答题界面(3)单击考试系统主界面的“程序完善”按钮，进入程序完善的答题界面，如图7所示。
请考生一定认真阅读本窗口的题目要求，程序完善包含4道题，在做题的过程中不要漏题，在做完每道题后一定要保存。
完成程序完善题目后，关闭此窗口，返回“主菜单”界面。
图7 程序完善答题界面(4)单击考试系统主界面的“程序改错”按钮，进入程序改错的答题界面，如图8所示。
河南省2014年Visual Basic 6.0程序设计一、选择题每小题2分31．在设计阶段，双击窗体上的某个控件时打开的窗口是A．代码窗口B．工具箱窗口C．工程资源管理器窗口D．属性窗口32．整型（Integer）变量的取值范围是A．-128～127 B．-32768～32767C．0～65535 D．0～3276733．通过窗体的属性可以设置窗体的标题文字。
A．Name B．BackColor C．Height D．Caption34．将数学表达式sin37xoea b++转换成符合Visual Basic 6.0规范的表达式是A．Sin(37*3.1415926/180)+Exp(x)/(a+b)B．(Sin(37)+Exp(x))/(a+b)C．(Sin(37*3.1415926/180)+Exp(x))/(a+b)D．(Sin370+ex)/(a+b)35．可以作为Visual Basic 6.0的变量名。
A．a+b+c B．a-b-c C．a*b*c D．abc 36．关于变量的描述，错误的是A．程序执行过程中其值可以变化的量称为变量B．变量名实质是计算机内存单元的命名C．隐式声明的变量类型是Integer类型D．全局变量的作用域是整个应用程序37．Visual Basic 6.0表达式x>= - 3 And x<8表示x位于A．[- 3，8] B．（- 3，8）C．[ -3，8) D．（- 3，8] 38．设x是一个实数，表达式能够把x精确到小数点后的第三位。
A．Int(x*100+0.5)/100 B．Int(x*1000+0.5)/100C．Int(x*100+0.5)/1000 D．Int(x*1000+0.5)/100039．表达式Int(400 * Rnd()) + 200表示的是中的整数。
A．[200，600] B．(200，600] C．[200，600) D．(200，600) 40．用max表示a和b中的最大值，不能实现该功能的程序段是A．max=IIf(a<b,a,b) B．If a>b Thenmax=aElsemax=bEnd ifC．If a>b Then max=a Else max=b D．max=IIf(a>b,a,b)41．假设变量a=3456，执行语句t=(a\100) Mod 10后，t的值是A．3 B．4 C．5 D．642．程序段：Dim a(5), i As IntegerFor i = 1 To 5a(i) = iNext iFor i = 2 To 4a(i) = a(i - 1) + a(i + 1)Next iFor i = 1 To 5Print a(i),Next i的输出结果是A．1 2 3 4 5 B．1 4 8 13 5C．1 4 6 8 5 D．1 4 9 16 2543．设a = 1，b = 0，c = 3，d = 4，执行语句a = (b = (c = d))后，a的值是A．True B．1 C．False D．444．根据计算机访问文件的方式，Visual Basic 6.0将文件分成3类，其中不包括A．随机文件B．Unix文件C．顺序文件D．二进制文件45．程序段：Dim a(5), i, t As IntegerFor i = 1 To 5a(i) = iNext it = a(1)For i = 2 To 5a(i - 1) = a(i)Next ia(i - 1) = tFor i = 1 To 5Print a(i),Next i的输出结果是A．1 2 3 4 5 B．2 3 4 5 1C．5 4 3 2 1 D．3 2 1 5 446．程序段：Dim a(3, 3)For i = 1 To 3For j = 1 To 3If (i = j Or i + j = 4) Then a(i, j) = 1 Else a(i, j) = 0Print a(i, j),Next jPrintNext i的输出结果是A． 1 1 1 B． 0 0 0 C． 1 0 1 D． 0 1 01 1 1 0 0 0 0 1 0 1 0 11 1 1 0 0 0 1 0 1 0 1 047．用Dim a(2，4) As Integer声明的数组元素的个数是A．24 B．6 C．8 D．1548．不是鼠标事件。
第一章一、题目 1 2 3 4 5 6 7 8 9 10 答案 A C D B B D C B A A二、1.文件/退出2.Alt+Q3.文件/打开工程/打开工程4.vbp/frm5.Esc第二章一、题目 1 2 3 4 5 6 7 8 9 10 11 答案 C B B A C C C C A B D二、1. 对象框、属性显示方式、属性列表和属性解释2.Text1.text=”Hellor!”3.标准控件/ActiveX控件/可插入对象4.Top和Left，Width和Height5.用鼠标单击属性窗口的任何部分；执行“视图”菜单中的“属性窗口”命令；按F4键；单击工具栏上的“属性窗口”按钮；按组合键Ctrl+PgDn或Ctrl+PgUp6.Ctrl/Shift第三章一、题目 1 2 3 4 5 6 7 8 9 10答案 B D A B A D D B A C二、1．答案：、ABCD，VB Programming2．答案：建立界面，设置属性、编写代码3．答案：属性窗口，运行4．答案：对象，过程5．答案：工具、选项、选项、自动语法检查6．答案：Frm，Vbp7．答案：工程8．答案：窗体模块，标准模块和类模块第四章一、题目 1 2 3 4 5 6 7 8 9 10 答案 C D C A B B C C B D 题目11 12 13 14 15 16 17 18 19 20 答案 C C B A C C D B C C 题目21 22 23 24 25 26 27 28 29 30 答案 C C C D B C A D C B 题目31 32 33 34 35 36 37 38 39 40 答案 D B B C D A B D B D 题目41 42 43 44 45 46 47 48 49 50 答案 D B C D D B D C C B 题目51 52 53 54 55 56 57 58 59 60 答案 D C C B B B D A C B 题目61 62 63 64 65 66 67 68 69 70 答案 C C C C D B C B B B 题目71 72 73 74 75 76 77 78 79 80 答案 D D A A D C C B B D 题目81 82 83 84 85 86 87 88 89 90 答案 B C D D B D D C D C 题目91 92 93 94 95答案 D A C A C二、1．答案：CONTT.DE+COS(28*3.14/180)2．答案：-3/8 +8*INT(24.8)3．答案：(8+6)^(4/-2)+SIN(2*3.14)4．答案：((x+y)+z)*80-5*(C+D)5.答案： A6.答案：17.答案：Good Morning 、 Good Morning8.答案： ABCD 、 HIJK 。
历年Visaul Basic 程序设计（编程题）A 类题说明：A 类题以顺序结构的解析算法为主，解决学生在数学、物理和生活中遇到的简单计算问题。
用到的控件有：标签框、文本框、命令按钮等。
A01、制作一个加法器，在文本框中输入两个数值后，单击“计算”按钮可以计算出两数之和并显示在标签中；单击“清除”按钮可以清除各项数值。
Private Sub Command1_Click()a = Val(Text1.Text)b = Val(Text2.Text)label4.caption = a + bEnd SubPrivate Sub Command2_Click()Text1.Text = ""Text2.Text = ""label4.caption = ""End SubA02、已知y= x 3＋|x －10|＋4， 编程求y 的值 。
要求：在文本框中输入x 的值，单击“计算”按钮后在“y ”框中显示y 的值；单击“退出”按钮退出程序。
Private Sub Command1_Click()X= Val(Text1.Text)Text2.text = x ^ 3 + Abs(x - 10) + 4End SubPrivate Sub Command2_Click()EndEnd SubA03、编程实现：在“半径”框中输入圆的半径，单击“确定”按钮时，“周长”、“面积”框中显示圆的周长和面积。
Private Sub Command1_Click()r=val(text1.text)text2.text=2*3.14*rtext3.text =3.14*r*rEnd SubA04、编程计算圆锥的体积。
要求：输入圆锥的半径与高度，单击“计算”按钮可以计算出圆锥的体积并显示 出来；单击“清除”按钮可以清除各项数值。
提示：V =31πhr 2 ，π取3.14 Private Sub Command1_Click()r= Val(Text1.Text)h= Val(Text2.Text)label4.caption = 1 / 3 * 3.14 * h * r ^ 2End SubPrivate Sub Command2_Click()label4.caption = "" Text2.Text = ""Text1.Text = ""End SubA05、华氏温度（F ）与摄氏温度（C ）之间的转换关系为：3259＋摄氏温度华氏温度⨯= 。
vb考试试题和答案**VB考试试题和答案**一、单项选择题（每题2分，共20分）1. 在VB中，以下哪个选项是正确的数据类型？A. IntegerB. IntC. DoubleD. All of the above**答案：D**2. VB中，哪个函数用于计算一个数的平方根？A. SqrB. PowC. LogD. Abs**答案：A**3. 下列哪个选项是VB中的保留字？A. MyB. MeC. DimD. All of the above**答案：D**4. 在VB中，下列哪个选项用于声明一个变量？A. ConstB. DimC. FunctionD. Sub**答案：B**5. VB中，哪个控件用于显示文本，但不能编辑？A. TextBoxB. LabelC. ComboBoxD. CheckBox**答案：B**6. 在VB中，下列哪个选项用于循环遍历数组中的每个元素？A. For EachB. ForC. WhileD. Do**答案：A**7. VB中，哪个函数用于将字符串转换为大写？A. LCaseB. UCaseC. StrCompD. Trim**答案：B**8. 在VB中，哪个事件用于响应按钮点击？A. ClickB. DoubleClickC. MouseDownD. MouseUp**答案：A**9. VB中，哪个属性用于设置控件的可见性？A. VisibleB. EnabledC. CaptionD. BackColor**答案：A**10. 在VB中，下列哪个选项用于声明一个过程？A. FunctionB. SubC. ClassD. Module**答案：B**二、填空题（每题2分，共20分）1. 在VB中，声明一个整型变量的关键字是________。
**答案：Integer**2. VB中，用于定义一个函数的关键字是________。
**答案：Function**3. VB中，用于定义一个子程序的关键字是________。
1、编写程序，随机生成20个两位整数，并统计出其中小于等于60、大于60小于等于80及大于80的数据以及相应个数，结果打印输出到窗体。
Private Sub Form_Click()For i = 1 To 20a = Fix(Rnd() * 91 + 10)If a <= 60 Thenx = x & a & " "b = b + 1End IfIf a > 60 And b <= 80 Theny = y & a & " "c = c + 1End IfIf a > 80 Thenz = z & a & " "d = d + 1End IfNext iPrint "小于等于60的个数：" & b & "个," & xPrint "大于60小于等于80的个数：" & c & "个," & yPrint "大于80的个数：" & d & "个," & zEnd Sub2、编写程序：利用随机函数产生10个（59，142）范围内的随机整数，显示它们当中的最大值、最小值和平均值。
Private Sub Form_Click()Max = 60Min = 141For i = 1 To 10a = Fix(Rnd * 82 + 60)Sum = Sum + aIf a > Max Then Max = aIf a < Min Then Min = aPrint a;Next iPrintPrint "最大值：" & MaxPrint "最小值：" & MinPrint "平均值：" & Sum / 10End Sub3、编写程序，随机生成15个三位正整数,区间范围是(123,915]，将其中的偶数与奇数分别输出到两个文本框中，并计算出奇数和偶数之和，用消息框输出结果。
VB考试试卷及答案一第一篇：VB考试试卷及答案一Visual Basic程序设计基础试题一（每小题2分，共10分）阅读下列程序说明和程序，在每小题提供的若干可选答案中，挑选一个正确答案。
【程序说明】过程JiSuan用于计算e = 1 + 1/1!+ 1/2!+ 1/3!+ …+1/n!的值，直至末项小于0.00001（不包含小于0.00001的项），并用消息框显示结果。
【程序】Option Explicit Private Sub JiSuan()Dim e As single,(1), i As long e = 1: t = 1:(2)(3)i = i + 1: e = e + t:(4)Loop(5)End Sub 【供选择的答案】（1）A、t As String B、Dim t As String C、Dim t As Single D、t As Single（2）A、i = 1 B、i = 2 C、i = 0 D、i = 3（3）A、While t >= 0.00001 B、Do While t >= 0.00001 C、While e >= 0.00001 D、Do While e >= 0.00001（4）A、t = t * i B、t = 1/(i * t)C、t = t / i D、t = 1 / i（5）A、MsgBox “近似值为：” + t B、MsgBox “近似值为：” & t C、MsgBox “近似值为：” + e D、MsgBox “近似值为：” & e试题二（每小题2分，共8分）阅读下列程序说明和程序，在每小题提供的若干可选答案中，挑选一个正确答案。
【程序说明】程序界面如下图所示，程序运行时要求有以下功能：1.单击“加粗”复选框（Check1）,若复选框被选中，则设置标签(Label1)上显示的文字为加粗，否则设置为不加粗。
VB程序设计试题及答案（一）一、单选题1. VB6.0是一种面向B 的编程环境。
(A) 机器(B) 对象(C) 过程(D) 应用2. 要使FormI窗体的标题栏显示"欢迎使用VB"，以下D 语句是正确的。
(A) Forml.Cap on=“欢迎使用VB”(B) Forml.Cap on='欢迎使用欢迎使用VB'(C) Forml.Cap on=欢迎使用VB(D) Forml.Cap on="欢迎使用VB"3. 若要使命令按钮不可操作，要对A 属性进行设置。
(A) EnabIed (B)Visible(C) Backcolor (D)Cap on4. 如果在窗体上已经创建了一个文本框对象TextI，可以通过C 事件获得输入键值的ASCII码。
(A) Change (B) LostFocus(C) KeyPress (D) GotFocus5. 下面A 是合法的变量名。
(A) X_yz (B) 123ab。
(C) integer (D) X-Y6. 以下关系表达式中，其值为False的是A 。
(A) "ABC">"AbC" (B) "女">"男"(C) "BASIC"=UCase("basic) (D) "123"<"23"7. 为了给x、y、z三个变量赋初值1，下面正确的赋值语句是A 。
(A) x=1:y=1:z=1 (B) x=1,y=1,z=1(C) x=y=z=1 (D) xyz=18. VB提供了结构化程序设计的三种基本结构，三种基本结构是D 。
(A)递归结构、选择结构、循环结构(B)选择结构、过程结构、顺序结构(C)过程结构、输入输出结构、转向结构(D)选择结构、循环结构、顺序结构9. 下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数，不正确的语句是D 。
关于2014-2015-2学期VB期末考试的说明时间：6. 30形式：笔试内容：♦第1 ~8章课后习题与实验及第6〜8章的例题为主■单选题（除第3章外，重点6~8章）■判断题（除第3章外，重点6~8章）■程序填空题（第5、6章的程序填空题）■编程题（第6~8章的例题及课后实验）•重点看：例6-11X例6-12、例6-13、实验6-8、例7-2、例7-3、实验8-4、实验8-6成绩比例：平时20%+期中10%+实验报告10%+期末60%考试要求：请提前10分钟到，带两证：学生证、一卡通或身份证。
编程题题库及代码（要求看懂）（仅供参考,有些在属性窗口设置的属性未注明，有些写在Form_Load 中的设置也可以在属性窗口设置。
）1、新建一个工程，设计一个用来控制文本框中信息格式的程序。
具体要求如下：（1）窗体中有以下控件：一个文本框、三个框架、二个复选框、六个单选钮。
（2）完成以下功能：单击框架1中的复选框可以改变文本框的字型；单击框架2中的单选钮可以改变文本框的字体；单击框架3中的单选钮可以改变文本的字体颜色。
Private Sub Check1_Click() ，单击复选框1设置文本框字体是否加粗If Checkl .Value = 1 ThenTextl.FontBold = TrueElseTextl.FontBold = FalseEnd SubPrivate Sub Check2_Click() ，单击复选框1设置文本框字体是否斜体If Check2.Value = 1 ThenTextl.Fontltalic = TrueElseTextl.Fontltalic = FalseEnd IfEnd SubPrivate Sub Check3_Click()啤击复选框1设置文本框字体是否加下划线If Check3.Value = 1 ThenTextl.FontUnderline = TrueElseTextl.FontUnderline = FalseEnd IfEnd SubPrivate Sub Option 1_Click() Textl. ForeColor = vbRed '红色'RGB(255, 0, 0)End SubPrivate Sub Option2_Click()Textl.ForeColor = vbGreen '绿色'RGB(0, 255, 0)End SubPrivate Sub Option3_Click() Textl.ForeColor = vbBlue '蓝色'RGB(0, 0, 255)End SubPrivate Sub Option4_Click()Textl.FontName = "楷体_gb2312”End SubPrivate Sub Option5_Click()Textl. FontName ="黑体”End SubPrivate Sub Option6_Click()Textl.FontName = ”宋体”End Sub2、编程，单击“确定"按钮, 将所有信息在标签中显示出来。
