《VB二级考试分章练习.pdf》由会员分享，可在线阅读，更多相关《VB二级考试分章练习.pdf（45页珍藏版）》请在taowenge.com淘文阁网|工程机械CAD图纸|机械工程制图|CAD装配图下载|SolidWorks_CaTia_CAD_UG_PROE_设计图分享下载上搜索。
1、第一章Visual Basic 基础一、选择题1 与传统的程序设计语言相比，Visual Basic 最突出的特点是A)结构化程序设计B)程序开发环境C)事件驱动编程机制D)程序调试技术2在正确安装VB 后，可以通过多种方式启动VB。在以下方式中，不能启动VB 的是：A)通过“开始”菜单中的“程序”命令B)通过“我的电脑”找到VB6.exe，双击该文件名C)通过“开始”菜单中的“运行”命令D)进入 DOS 方式，执行VB6.exe。3为了用键盘打开菜单和执行菜单命令，第一步应按的键是A)功能键 F10 或 Alt B)Shift+功能键 F4 C)Ctrl 或功能键F8 D)Ctrl+Alt
2、4VB6.0 集成环境的主窗口中不包括A)标题栏B)菜单栏C)状态栏D)工具栏5用标准工具栏中的工具按钮不能执行的操作是A)添加工程B)打印源程序C)运行程序D)打开工程6VB 窗体设计器的主要功能是A)建立用户界面B)编写源程序代码C)画图D)显示文字7以下叙述中正确的是A)用属性窗口只能设置窗体的属性B)用属性窗口只能设置控件的属性C)用属性窗口可以设置窗体和控件的属性D)用属性窗口只能设置对象的属性二、填空题1 VB6.0 分为 3 个版本，这3 种版本是 _、_和_。2 可以通过 _菜单中的 _命令退出VB。3 退出 VB 的快捷键是 _。4 快捷键Ctrl+O的功能相当于执行_菜单中
3、的 _命令，或者相当于单击工具栏上的 _按钮。5 如果打开了不需要的菜单或对话框，可以用_键关闭。6 工程文件的扩展名是_，窗体文件的扩展名是_。7 VB 中的菜单栏有2 种形式，分别为_形式和 _形式。8 属性窗口分为4 个部分，分别是_，_，_，_。第二章可视化编程的概念与步骤一、选择题1 下列可以激活属性窗口的操作是A)用鼠标双击窗体的任何部位B)执行“工程”菜单中的“属性窗口”命令C)按 Ctrl+F4 键D)按 F4 键2下列不能打开工具箱窗口的操作是A)执行“视图”菜单中的“工具箱”命令B)按 Alt+F8 键C)单击工具栏上的“工具箱”按钮D)按 Alt+V，然后按 X 键3下列
4、叙述中正确的是A)只有窗体才是VB 中的对象B)只有控件才是VB 中的对象C)控件和窗体都是VB 中的对象D)控件和窗体都不是VB 中的对象4为了把窗体上的某个控件变为活动的，应执行的操作是A)单击窗体的边框B)单击该控件的内部C)双击该控件D)双击窗体5确定一个控件在窗体上的位置的属性是A)Width 或 Height B)Width 和 Height C)Top 或 Left D)Top 和 Left 6确定一个窗体或控件的大小的属性是A)Width 或 Height B)Width 和 Height C)Top 或 Left D)Top 和 Left 7为了同时改变一个活动控件的高度和宽
5、度，正确的操作是A)拖拉控件4 个角上的某个小方块B)只能拖拉位于控件右下角的小方块C)只能拖拉位于控件左下角的小方块D)不能同时改变控件的高度和宽度8若窗体的名称（Name 属性）为Form1，则把窗体的标题设为“VB Test”的语句为A)Form1=”VB Test”B)Caption=”VB Test”C)Form1.Text=”VB Test”D)Form1.Name=”VB Test”9下列不能打开代码窗口的操作是A)双击窗体上的某个控件B)双击窗体C)按 F7 键D)单击窗体或控件10为了保存一个VB 应用程序，应当A)只保存窗体文件(.frm)B)只保存工程文件(.vbp)C)
6、分别保存工程文件和标准模块文件(.bas)D)分别保存工程文件、窗体文件和标准模块文件11为了装入一个VB 应用程序，应当A)只装入窗体文件(.frm)B)只装入工程文件(.vbp)C)分别装入工程文件和标准模块文件(.bas)D)分别装入工程文件、窗体文件和标准模块文件12为了使窗体的大小可以改变，必须把他的BorderStyle 属性设置为A)1 B)2 C)3 D)4 13决定窗体标题条显示内容的属性是A)Text B)Name C)Caption D)BackStyle 14当窗体最小化时缩小为一个图标，设置这个图标的属性是A)MouseIcon B)Icon C)Picture D)
7、MousePoint 15为了取消窗体的最大化功能，需要把它的一个属性设置为False，这个属性是A)ControlBox B)MinButton C)Enabled D)MaxButton 16决定窗体有无控制菜单的属性是A)ControlBox B)MinButton C)Enabled D)MaxButton 17为了使一个窗体从屏幕上消失但仍在内存中，所使用的方法或语句为A)Show B)Hide C)Load D)Unload 18下列操作中不能向工程中添加窗体的是A)执行“工程”菜单中的“添加窗体”命令B)单击工具栏上的“添加窗体”按钮C)右击窗体，在弹出的菜单中选择“添加窗体”命
8、令D)右击工程资源管理器，在弹出的菜单中选择“添加”命令，然后在下一级菜单中选择“添加窗体”命令19当一个工程含有多个窗体时，其中的启动窗体是A)启动 Visual Basic 时建立的窗体B)第一个添加的窗体C)最后一个添加的窗体D)在“工程属性”对话框中指定的窗体20关于多重窗体应用程序，以下描述中不正确的是A)对于多重窗体应用程序，可以有多个当前窗体B)多重窗体应用程序的启动窗体可以在设计时设定C)多重窗体应用程序中每个窗体作为一个磁盘文件保存，所有窗体、标准模块等作为一个工程文件被保存D)多重窗体应用程序可以编译生成一个exe 文件二、填空题1 VB 中的控件分为3 类，他们是 _、_
9、、_。2 一个控件在窗体上的位置由_和_属性决定，其大小由_和_属性决定。3 可以通过多种方式激活属性窗口，这些方式是_、_、_、_、_。4 为了选择多个控件，可以按住_键，然后单击每个控件。5 在窗体上画两个文本框和一个命令按钮，并在命令按钮的代码窗口中编写如下事件过程Private Sub Command1_Click()Text1.Text=VB Programming Text2.Text=Text1.Text Text1.Text=ABCD End Sub 程序运行后，单击命令按钮，两个文本框中显示的内容分别为_和_。6 用 VB 开发应用程序时，一般需要_、_和_3 步。7 控件和
10、窗体的Name 属性只能通过 _设置，不能在 _期间设置。8 代码窗口分为左右两栏，左边一栏称为_，右边一栏称为_。9 为了在输入程序时能自动进行语法检查，必须执行_菜单中的 _命令，打开 _对话框，然后选择“编辑器”选项卡中的_选项10在保存VB 应用程序时，窗体文件和工程文件的扩展名分别为_和_。11为了把一个VB 应用程序装入内存，只要装入_文件即可。12若要加载一个新窗体，使用_语句实现；若要卸载一个窗体，使用_语句实现。13若要显示一个窗体，使用_方法；若要隐藏一个窗体，使用_方法；清除窗体上的内容，使用 _方法。第 3章Visual Basic 基本控件一、选择题1 为了在按下回车
11、键时执行某个命令按钮的事件过程，需要把该按钮的哪个属性设为True A)Value B)Default C)Cancel D)Enabled 2 为了在按下ESC 键时执行某个命令按钮的事件过程，需要把该按钮的哪个属性设为True A)Value B)Default C)Cancel D)Enabled 3用菜单编辑器创建菜单时，如果要在菜单中添加一条分隔线，正确的操作是A)在标题输入框中输入“”（减号）B)在名称输入框中输入“”（减号）C)在标题输入框中输入“_”（下划线）D)在名称输入框中输入“_”（下划线）4，在显示菜单时，菜单的哪个属性为Ture 时将用灰色显示该菜单项标题A)Capt
12、ion B)Checked C)Enabled D)Visible 5设有菜单结构如下表所示标题名称层次显示Appear 1 大图标BigIcon 2 小图标SmallIcon 2 要求在运行时，当鼠标单击菜单项“大图标”时，在这个菜单项前面就添加一个“”，下面正确的过程是A)Private Sub Bigicon_Click()B)Private Sub Bigicon_Click()Bigicon.Checked=False Me.Appear.Bigicon.Checked=True End Sub End Sub C)Private Sub Bigicon_Click()D)Priva
13、te Sub Bigicon_Click()Bigicon.Checked=True Appear.Bigicon.Checked=True End Sub End Sub 6设在菜单编辑器中定义了一个菜单项，名为menu1。为了在运行时隐藏该菜单项，应在程序中使用的语句是A)menu1.Enabled=True B)menu1.Enabled=False C)menu1.Visible=True D)menu1.Visible=False 7为了使文本框同时具有水平和垂直滚动条，应该把Multiline属性设为Ture，然后再把ScrollBars 属性设置为A)0 B)1 C)2 D)3
14、8使文本框获得焦点的方法是A)Change B)GotFocus C)SetFocus D)LostFocus 9为了使标签覆盖背景，应把BackStyle 属性设置为A)0 B)1 C)Ture D)False 10为了使标签中的内容居中显示，应把Alignment 属性设置为A)0 B)1 C)2 D)3 11决定标签内显示内容的属性是A)Text B)Name C)Alignment D)Caption 12在窗体（Name 属性为 Form1）上画两个文本框（Name 属性分别为Text1 和 Text2）和一个命令按钮（Name 属性为 Command1），然后编写如下两个事件过程：
15、Private Sub Command1_Click()a=Text1.Text+Text2.Text Print a End Sub Private Sub Form_Load()Text1.Text=Text2.Text=End Sub 程序运行后，在第一个文本框（Text1）和第二个文本框（Text2）中分别输入123 和 321，然后单击命令按钮，则输出结果为A)444 B)321123 C)123321 D)132231 13当拖动滚动条中的滚动块时，将触发滚动条的事件是A)Move B)Change C)Scroll D)SetFocus 二、填空题1在 VB 中可以建立 _菜单和
16、 _菜单。2菜单编辑器可以分为3 个部分，即 _、_和 _。3如果要将某个菜单项设计为分隔线，则该菜单项的标题应设置为_。4在菜单编辑器中，菜单项后面4 个小点的含义是_。5建立弹出式菜单所使用的方法是_。6为了使标签能自动调整大小以显示全部文本内容，应把标签的_属性设为 True。7要在文本框中显示垂直滚动条，必须把 _属性设为2，同时还应把 _属性设为 _。8有一个名称为Text1 的文本框，为使其有焦点，应执行的语句是_。9为了使一个标签透明且没有边框，必须把它的BorderStyle 属性设为 _，并把 BackStyle属性设为 _。9 假定一个文本框的Name 属性为 Text1，
17、为了在该文本框中显示“Hello”，所使用的语句为_。第 4章代码基础选择题1 在 Visual Basic 中，下列优先级最高的运算符是A*B C DNot 2 以下关系表达式中，其值为False 的是A XYZ XYz B Visual Basic visualbasic Cthe there D Integer Int 3 设有如下声明：Dim x As Integer 如果 Sgn(x)的值为-1，则表示 x 的值是A整数B大于 0 的整数C等于 0 的整数D小于 0 的整数4 下列表达式中值为-6 的是AFix(-5.678)BInt(-5.678)CFix(-5.678+0.5)D
18、 Int(-5.678+0.5)5 以下语句的输出结果是Print 3+4 5*6/7 Mod 8 A3 B4 C5 D6 6 下列可作为Visual Basic 的变量名的是A3*Delta BPrintChar CAbs DAB 7 下列可作为Visual Basic 的变量名的是AFilename B A(A+B)CA%D DPrint 8 下列可作为Visual Basic 中所允许的形式的数是A 25.74 B3.457E-100 C.368 D1.87E+50 9 下列可作为Visual Basic 中所允许的形式的数是A10(1.256)BD32 C2.5E D12E3 10下面
19、的数写成普通的十进制数是2.65358979335278D-006 A0.0000265358979335278 B0.00000265358979335278 C0.000265358979335278 D 0.000000265358979335278 11下面的数写成普通的十进制数是1.21576654590569D+019 A12157665459056900 B121576654590569000 C1215766545905690000 D 12157665459056900000 12下面的数写成普通的十进制数是8.6787E8 A86787000 B867870000 C867
20、8700 D8678700000 13下面的数写成普通的十进制数是2.567E-12 A0.000000000002567 B0.0000000002567 C0.000000002567 D 0.00000000002567 14设 a=2，b=3，c=4，d=5，下列表达式的值是ab AND cc ATrue BFalse C-1 D1 15设 a=2，b=3，c=4，d=5，下列表达式的值是32*b OR a=c AND bc OR cd A1 BTrue CFalse D-1 16设 a=2，b=3，c=4，d=5，下列表达式的值是NOT a=c OR 4*c=b2 AND ba+c
21、A-1 B1 CTrue DFalse 17实现字符的Unicode 编码方式ANSI 编码方式相互转换的函数是AStr BStrConv CTrim DMid 1、要强制显示声明变量，可在窗体模块或标准模块的声明段中加入语句（）A、Option Base 0 B、Option Explicit C、Option Base 1 D、Option Compare 2、/、Mod、*等 4 个算术运算符中，优先级最低的是（）A、B、/C、Mod D、*3、表达式Mid(“SHANGHAI”,6,3)的值是（）A、SHANGH B、SHA C、ANGH D、HAI 4、代数式x1-|a|+ln10+
22、sin(x2+2)/cos(57 o)对应的 Visual Basic表达式是（）A、X1-Abs(A)+Log(10)+Sin(X2+2*3.14)/Cos(57*3.14/180)B、X1-Abs(A)+Log(10)+Sin(X2+2*)/Cos(57*3.14/180)C、X1-Abs(A)+Log(10)+Sin(X2+2*3.14)/Cos(57)D、X1-Abs(A)+Log(10)+Sin(X2+2*)/Cos(57)5、删除字符串前导和尾随空格的函数是（）A、Ltrim()B、Rtrim()C、Trim()D、Lcase 6、系统符号常量的定义通过（）获得A、对象浏览器 B、
23、代码窗口 C、属性窗口 D、工具箱7、代数式exSin(300)2x/(x+y)lnx对应的 VB 表达式是A、EX*Sin(30*3.14/180)*2*x/x+y*log(x)B、Exp(x)*Sin(30)*2*x/(x+y)*ln(x)C、Exp(X)*Sin(30*3.14/180)*2*x/(x+y)*log(x)D、Exp(X)*Sin(30*3.14/180)*2*x/(x+y)*ln(x)8、表达式X+1X 是A、算术表达式 B、非法表达式 C、字符表达式 D、关系表达式9、设 A=”abcdefghijklm”，下面（）的函数值为”jklm”。A、Mid(A,10,14)B
24、、Ringht(A,4)C、Mid(A,10,4)D、Left(A,10,4)10、如果 X 是一个正的实数，将千分位四舍五入，保留两位小数的表达式是A、0.01*int(x+0.05)B、0.01*int(100*(x+0.005)C、0.01*int(100*(x+0.05)D、0.01*int(x+0.005)11、不能正确表示条件“两个整型变量A 和 B 之一为 0，但不能同时为0”的布尔表达式A、A*B=0 AND AB B、（A=0 OR B=0）AND AB C、A=0 AND B0 OR A0 AND B=0 E、A*B=0 AND（A=0 OR B=0）12、下列对变量的定义
25、中，不能定义A 为变体变量的是A、DIM A AS DOUBLE B、DIM A AS VARIANT C、DIM A D、A=24 13、表达式INT（8*SQR（36）*10（-2）*10+0.5）/10 的值是A、0.48 B、0.048 C、.5 D、.05 14、将任意一个正的两数N 的个位数与十位数对换的表达式为A、（N-INT（N/10）*10）*10+INT（N/10）B、N-INT（N/10）*10）*10+INT（N）/10 C、INT（N/10）+（N-INT（N/10）D、（N-INT（N/10）*10）*10+INT（N/10）15、货币型数据需（）字节A、2 B、4
26、 C、6 D、8 16、以下可以作为VB 变量名的是A、SIN B、CO1 C、COS（X）D、X（-1）17、MSGBOX函数中有4 个参数，其中必须写明的参数是A、指定对话框中显示按钮的数目 B、设置对话框标题C、提示信息 D、所有参数都是可选的18、INT（100*RND（1）产生的随机整数的闭区间是A、0，99 B、1，100 C、0，100 D、1，99 19、OPTION EXPLICIT语句不可以放在A、窗体模块的声明段中 B、标准模块的声明段中C、类模块的声明段中 D、任何事件过程中20、VB 认为下面（）组变量是同一个变量A、A1 和 a1 B、SUM 和 SUMMARY C
27、、AVER 和 AVERAGE D、A1 和 A_1 21、定义货币类型数据应该用关键字A、SINGLE B、DOUBLE C、CURRENCY D、BOOLEAN 22、表达式2+3*45-SIN（X+1）/2 中最先进行的运算是A、45 B、3*4 C、x+1 D、SIN 23、声明符号常量应该用关键字（）A、Static B、Const C、Private D、V26/ariant 24、下列字符串常量中，最大的是（）A、“北京”B、“上海”C、“天津”D、“广州”25、表达式（-1）*Sgn（-100+Int(Rnd*100)）的值是（）A、0 B、1 C、-1 D、随机数26、产生
28、10，37 之间的随机整数的Visual Basic表达式是（）A、Int(Rnd(1)*27)+10 B、Int(Rnd(1)*28)+10 C、Int(Rnd(1)*27)+11 D、Int(Rnd(1)*28)+11 27、设 A、B、C 表示三角形的3 条边，表示条件“任意两边之和大于第三边”的布乐表达式可以用（）表示。A、A+B=C Or A+C=B Or B+C=A B、Not(A+B=C Or A+C=B Or B+CB And B+CA 28、下列（）是日期型常量A、”2/1/02”B、2/1/02 C、#2/1/02#D、|2/1/02|29、函数 Len(Str(Val(“
29、123.4”)的值为（）A、11 B、5 C、6 D、8 30、InputBox 函数返回的函数值的类型是（）A、数值 B、字符串C、数值或字符串 D、根据需要可以是任何类型数据31、表达式（73+1）*(185-1)的值是（）A、876 B、7.8 C、6 D、6.67 32、常量-0.00013579的科学计数法是（）A、-1,3579E+0.4 B、1.3579E-4 C、-13.579E-5 D、-1.3579E-0.4 33、函数 InStr(“VB 程序设计教程”,”程序”)的值为（）A、1 B、2 C、3 D、4 34、函数 Ucase(Mid(“visual basic”,8,
30、8)的值为（）A、visual B、basic C、VISUAL D、BASIC 35、Rnd 函数不可能产生的（）值A、0 B、1 C、0.1234 D、0.00005 36、表达式25.28 Mod 6.99的值是（）A、1 B、5 C、4 D、出错37、函数 INT（RND（0）*100）是下列哪个范围内的整数A、（0，10）B、（1，100）C、（0，100）D、（1，99）38、在一个语句行内写多条语句时，语句之间应该用（）分隔A、逗号 B、分号 C、顿号 D、冒号二、填空题1、MSGBOX函数的“TYPE”参数作用是 _ 2、根据所给条件，列出逻辑表达式A、闰年的条件是：年号（ye
31、ar）能被 4 整除，但不能被100 整除；或者能被400 整除。B、一元两次方程ax2+bx+c=0有实根的条件为a0，并且 b2-4ac 0 C、征兵的条件：男性（sex）年龄（age）在 1820 岁之间，身高(size)在 1.65 米以上；或者女性年龄在1618 岁之间，身高在1.60 以上。_-D、分房的条件为：已婚（marrigerat），年龄(age)在 26 岁以上，工作年限（workingage）在 5 年以上。1 设有如下程序段：a$=Visual Basic Programing b$=.NET c$=Left(a$,12)&b$&Right(a$,11)执行该程序段后
32、，变量c$的值为。2 假定有如下的变量定义：Dim a,b As Integer 则变量 a 被定义为类型，b 被定义为类型。3 设有如下的程序段：a$=BeijingShanghai:b$=Mid(a$,InStr(a$,g)+1)执行上面的程序段后，变量b$的值为。4 下列 Visual Basic 表达式有错误，其正确的形式是。CONTT.DE+COS(28)5 下列 Visual Basic 表达式有错误，其正确的形式是。-3/8+8.INT24.8 6 下列 Visual Basic 表达式有错误，其正确的形式是。(8+6)(4-2)+SIN(2*)7 下列 Visual Basic
33、 表达式有错误，其正确的形式是。(x+y)+z 80-5(C+D)8 与下列数学式子对应的Visual Basic 表达式是。cos2(c+d)(C+D)为弧度)9 与下列数学式子对应的Visual Basic 表达式是。5+(a+b)210与下列数学式子对应的Visual Basic 表达式是。cos(x)(sin(x)+1)(x 为弧度)11与下列数学式子对应的Visual Basic 表达式是。e2+2 12与下列数学式子对应的Visual Basic 表达式是。2a(7+b)13与下列数学式子对应的Visual Basic 表达式是。8e3.ln2 14以下语句的输出结果是。Print
34、 chr$(65)(为回车，下同)15以下语句的输出结果是。Print sgn(2)16执行以下语句后，输出结果是、。a$=Good b$=Morning Print a$+b$Print a$&b$17执行以下语句后，输出结果是、。s$=ABCDEFGHIJK Print Left$(s$,4)Print Right$(s$,4)18执行以下语句后，输出结果是、。s$=ABCDEFGHIJK Print Mid$(s$,3,4)Print Len(s$)19执行以下语句后，输出结果是、。s$=ABCDEFGHIJK Print InStr(s$,efg)Print LCase(s$)20假定
35、当前日期为2003 年 10 月 5 日，星期五，则执行以下语句后，输出结果是、。Print Day(Now)Print Month(Now)Print Year(Now)Print Weekday(Now)21在 Visual Basic 中，字符串常量要用括起来，日期/时间型常量要用括起来。225.0/6.0 版的 Visual Basic 中，字符采用编码方式。在这种编码方案中，一个中文字符或一个西文字符均视为个字符，每个字符用个字节编码。23下列语句的输出结果是。Print Int(12345.6789*100+0.5)/100 24顺序结构1.选择题1.假定 Picture1 和 T
36、ext1 分别为图片框和文本框的名称，下列不正确的语句是A)Print 25 B)Picture1.Print 25 C)Text1.Print 25 D)Debug.Print 25 2以下语句的输出结果是（在立即窗口中）a=27 (为回车，下同)b=65 Print a;b A)27 65 B)27 65 C)27 65 D)27 65(表示空格，下同)3以下语句的输出结果是（在立即窗口中）a=Beijing b=ShangHai Print a;b A)Beijing ShangHaiB)Beijing ShangHaiC)BeijingShangHai D)Beijing ShangH
37、ai 4语句 Print 5*55/5 的输出结果是A)5 B)25 C)0 D)1 5设 a、b、c 为整型变量，其值分别为1、2、3，以下程序段的输出结果是a=b:b=c:c=a Print a;b;c A)1 2 3 B)2 3 1 C)3 2 1 D)2 3 2 6语句 Print Sgn(-62)+Int(-62)+Int(62)的输出结果是A)-36 B)1 C)-1 D)-72 7以下语句的输出结果是a=Sqr(3)Print Format(a,$#.#)A)$1.732 B)$1.732 C)$1732 D)$0001.732 8以下程序段的输出结果是a=Sqr(3)b=Sqr
38、(2)c=ab Print c A)1 B)0 C)False D)True 9以下语句的输出结果是Print Format(32548.5,000,000.00)A)32548.5 B)32,548.5 C)032,548.50 D)32,548.50 10执行以下程序段后，变量c$的值为a$=Visual Basic Programing b$=Quick c$=b$&UCase(Mid$(a$,7,6)&Right$(a$,11)A)Visual Basic Programing B)Quick Basic Programing C)QUICK Basic Programing D)Qu
39、ick BASIC Programing 11表达式456*7/8 Mod 9的值是A)4 B)5 C)6 D)7 12 InputBox 函数返回值的类型为A)数值B)字符串C)变体D)数值或字符串（视输入的数据而定）13在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click()a=InputBox(Enter the First integer)b=InputBox(Enter the Second integer)Print b+a End Sub 程序运行后，单击命令按钮，先后在输入对话框中分别输入456 和 123，则输出结果是A)579
40、B)123 C)456 D)123456 14在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Dim a As Integer,b As Integer a=InputBox(Enter the First integer)b=InputBox(Enter the Second integer)Print b+a End Sub 程序运行后，单击命令按钮，先后在输入对话框中分别输入456 和 123，则输出结果是A)579 B)123 C)456 D)123456 15执行下面的语句后，所产生的信息框的标题是a=MsgBox(AAAA,BB
41、BB,5)A)BBBB B)空C)AAAAD)出错，不能产生信息框答案：1.C 2.D 3.C 4.B 5.D 6.C 7.B 8.D 9.C 10.D 11.B 12.B 13.d 14.A15.A 2.填空题1.语句 Print 25+32=;25+32的输出结果是 _。2.以下语句的输出结果是_。s$=China s$=Beijing Print s$3.以下语句的输出结果是_。a%=3.14156 Print a%4.设 a=Sqr(2)*Sqr(3)，下列语句的输出结果分别是_、_、_、_。Print Fomat$(a,000.00)Print Fomat$(a,#.#0)Print
42、 Fomat$(a,00.00E+00)Print Fomat$(a,-#.#)5.阅读程序：Sub Form_Click()a=10:b=15:c=20:d=25 Print a;Spc(5);b;Spc(7);c Print a;Space$(8);b;Space$(5);c Print c;Spc(3);+;Spc(3);d;Print Spc(3);=;Spc(3);c+d End Sub 6以下程序段的输出结果是x=8 Print x+1;x+2;x+3 6.以下程序段的功能是x=8.6 y=Int(x+0.5)Print y 答案：1253257 2Beijing 33 4002.
43、45 2.449 24.49E-01-2.4490 5 10152010152020+25=456 9 10 11 7对变量x 四舍五入后取整第 6章选择结构一、选择题18已知一个人出生的年、月、日分别存放在变量y0、m0、d0 中，当前日期的年、月、日分别存放在变量y1、m1、d1 中，这个人的实足年龄存放在变量age中。则以下可以正确计算实足年龄的程序段式Aage=y1-y0 B age=y1-y0 If m1 m0 Then If m1 m0 Or d1 d0 Then age=age-1 age=age-1 ElseIf d1 d0 Then End If age=age-1 End
44、If Cage=y1-y0 D age=y1-y0 If m1 m0 Then If m1 m0 Then age=age-1 age=age-1 End If End If If m1=m0 And d1 d0 Then If d1 3,长城,)_&IIf(a 8,故宫,)_&IIf(a 7,颐和园,)Text1.Text=t End Sub 程序运行后，单击命令按钮，则在文本框中显示的内容是A旅游景点：长城故宫B旅游景点：长城颐和园C旅游景点：颐和园D旅游景点：故宫20假定 x 的值为 5，则在执行以下语句时，其输出结果为“Result”的 Select Case语句是ASelect Ca
45、se x BSelect Case x Case 10 To 1 Case Is 5,Is 5,1,3 To 10 Case 1,3,Is 5 Print Result Print Result End Select End Select 21设 a=6，则执行x=Iif(a5,-1,0)后，x 的值为A5 B6 C0 D-1 22设有函数r 1 x=0 则下列能正确计算该函数值的语句是AIf x=0 Then r=2 End If BIf x=0)Then r=2 else r=1 End If CPrint(IIf(x 0,1,2)D r=IIf(x 0 y=x+1 Case Is=0 y
46、=x+2 Case Else y=x+3 End Select Label1.Caption=x Label2.Caption=y End Sub 程序运行后，单击窗体，标签Label1 和 Label2 中显示的内容分别是A-5 和-2 B-5 和-4 C-5 和-3 D-5 和-5 24设置复选框或单选按钮标题对齐方式的属性是A Align B Alignment CSorted DValue 二、填空题1.以下程序段所对应的函数表达式是。x=InputBox(Enter an Integer)x=CInt(x)Select Case x Case Is=0 y=0 Case Is=10
47、y=5+2*x Case Is 15 y=0 End Select 三、编程题1 编写一个“选择旅游地区”程序，旅客可以在窗体上选择自己想要去旅游的地区。假定共有三个地区，包括新加坡、马来西亚和泰国，每个旅客可以选择其中的一个、两个和三个地区，然后在文本框中显示所选择的旅游地区。2 给定三角形的三条边长，计算三角形的面积。编写程序，首先判断给出的三条边能否构成三角形，如可以构成，则计算并输出该三角形的面积，否则要求重新输入。当输入-1时结束程序。3 从键盘上输入一个学生的学号和考试成绩，然后输出该学生的学号、成绩，并根据成绩按下面的规定输出对该学生的评语：成绩90 100 7089 6069
48、0 59 评语优秀良好及格不及格答案：1.C 2.B 3.C 4.D 5.D 6.A 7.B 0 x=0 1.y=5+2x x=10 x-5 x15 第 7章循环结构一、选择题1 假定有下面的程序段：For i=1 To 3 For j=1 To i For k=j To 3 Print i=;i;j=;j;k=;k Next k Next j Next i 这是一个三重循环程序，在这个程序中，外层、中层和内层循环的循环次数是A3、6 和 14 B3、8 和 16 C3、4 和 12 D3、9 和 18 2 假定有以下当循环：While Not 条件循环体Wend 则执行循环体的“条件”是AT
49、rue B1 CFalse D-1 3.阅读下面的程序：Private Sub Form_Click()Dim m,n As Integer m=InputBox(请输入M 的值)m=Val(m)m1=m n=InputBox(请输入N 的值)n=Val(n)n1=n Do While n 0 remin=m Mod n m=n n=remin Loop Print m1,n1,m End Sub 程序运行后，单击窗体，在输入对话框中分别输入16 和 24，在程序在窗体上的输出结果为A16 24 4 B16 24 8 C24 16 6 D 24 16 8 4.阅读下面的程序：Private S
50、ub Form_Click()Dim Check,Counter Check=True Counter=0 Do Do While Counter 4 x=x*y y=y+1 Loop Print x A1 B4 C8 D20 8.执行下面的程序段后，x 的值为x=5 For i=1 To 20 Step 2 x=x+i 5 Next i A21 B22 C23 D24 9.在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click()For i=1 To 4 x=4 For j=1 To 3 x=3 For k=1 To 2 x=x+6 Next k