二级Visual+Basic语言程序设计模拟98

合集下载

1998年全国计算机等级考试4月二级BASIC,C语言,FOXBASE试题答案

void fun (int *q)
void fun (q)int q[];
void fun (int q[M])
(13) 15 6354
(14) 16 p++或++p或p=p+1或p+=1或p=1+p
17 w[i-1]或*(w+i-1)
(15) 18 pc,pb 或pb,pc
9> (9) 12345
10> (10) 6 4 7 3 5 6 4 7 9 8 8 9
11> (11) 16
12> (12) S=1:N=32或者N=32:S=1
13> (13) 17
14> (14) A=196
15> (15) IF M>=80 AND E>=80 THEN PRINT NO,NM$,M,E
void fun (int q[])
void fun (int q[M])
或
void fun (q)int *q;
void fun (q)int q[];
void fun (q)int q[M];
说明:以上两组答案中
(A)三个答案可以任意次序.(B)标识符q 可以用以字母或下划线开头以字母、数字和下划线组成的名字代替.(C)两种风格可以混用,例如:
一.选择题((1)-(4)共40题,每题1分;(41)-(50)共10题,每题2分)
(1)C (2)D (3)A (4)D (5)D
(6)C (7)B (8)A (9)C (10)A
(11)B (12)C (13)A (14)B (15)A
(16)C (17)D (18)C (19)D (20)C

计算机等级考试二级VisualBasic语言程序设计模拟题2题-无答案(660)34

计算机等级考试二级Visual Basic语言程序设计模拟题2020年(4)(总分100,考试时间120分钟)基本操作题1. 1.在窗体上画1个标题为“文字属性”、名称为FrameI的框架控件，在框架中画一个名称为Checkl的复选框数组，含2个数组元素。

按下标的前后顺序，其标题分别是“粗体”和“斜体”，并设置适当属性，使得“粗体”被选中，界面如图所示。

存盘时，工程文件名为sjtl．vbp，窗体文件名为sjt1．frm。

2. 2.在窗体上画一个名称为CD1的通用对话框，并设置属性使得在打开文件对话框时，其标题为“文件操作”，默认路径为C盘根目录；再画2个命令按钮，名称分别为Commandl、Command2，标题分别为“读文件”、“选择颜色”。

请编写适当的事件过程，使得程序运行时，单击“读文件”按钮后，可以利用CDI弹出打开文件对话框，单击“选择颜色”按钮，可以弹出颜色对话框。

设计模式下的窗体外观如图所示。

存盘时，工程文件名为sjt2．vbp，窗体文件名为sjt2．frm。

注意：要求程序中不得使用变量，每个事件过程中只能写一条语句。

简单应用题3. 3.在考生目录下有一个工程文件sjt3．vbp。

窗体上有一个名称为List1的空列表框。

程序运行时，单击Commandl按钮，则从键盘输入10个任意字符串，并按字典顺序添加到Listl 中成为它的列表项。

给出的程序不完整。

要求：去掉程序中的注释符，把程序中的?改为正确的内容。

注意：不能修改程序的其他部分和控件属性。

最后把修改后的文件按原文件名存盘。

4. 4.考生文件夹下有一个工程文件sjt4．vbp，窗体左端中有一个小的实心圆。

程序运行时，单击窗体，圆将沿着正弦曲线的轨迹向右运动，运动一个正弦周期后。

再沿着原来的轨迹退回到原来的位置。

然后再沿正弦曲线的轨迹向右运动，如此周而复始。

给出的程序不完整。

要求：去掉程序中的注释符，把程序中的?改为正确的内容。

注意：考生不得修改窗体文件中已经存在的控件和程序。

二级Visual+Basic语言程序设计模拟95 (1)

[模拟] 二级Visual Basic语言程序设计模拟95单项选择题第1题：在窗体上画一个名称为Textl的文本框，然后画．3个单选按钮，并用这3个单选按钮建立一个名为option1的控件数组，程序运行后，如果单击某个单选按钮，则文本框中的字体根据所选择的单选按钮切换，如图1所示。

请选择适合空白处的语句____。

Private Sub Option 1——Click(Index As Integer)Select CaseCase 0：a=“宋体”Case 1：a：“黑体”Case 2：a=“楷体GB2312”End SelectText1____=aEnd SubA.Option TextB.Index TextC.Index．FontD.Option Font参考答案：C本题考查控件数组。

Optionl数组中每个元素的名字为Optionl，依靠不同的Index属性来区分不同的控件。

变量a表示选择不同按钮后的不同字体，字体名属性为Font属性集的默认属性(FontName)，这里可以直接使用Font属性。

第2题：窗体上有一个名称为Command1的命令按钮，一个名称为Text1的文本框。

编写如下程序：Private Sub Command1＿Click()Dim X As Integerx=Val(InputBox(“输入数据”))Text1=Str(x+fun(X)+fun(X))End SubPrivate Function fun(ByRef n As Integer)If n Mod 3=0 Thenn＝n+nElsen＝n*nEnd Iffun=nEnd Function对于上述程序，以下叙述中错误的是( )。

A.语句fun=n有错，因为n是整型，fun没有定义类型B.运行程序，输入值为5时，文本框中显示655C.运行程序,输入值为6时，文本框中显示42D.ByRef表示参数按址传递参考答案：A过程fun的功能是将传入的值运算后返回，当传入数值为3的整数倍时返回该值的2倍，否则返回该值的平方。

国家二级VB机试(上机操作)模拟试卷89(题后含答案及解析)

国家二级VB机试（上机操作）模拟试卷89(题后含答案及解析) 全部题型 2. 基本操作题 3. 简单应用题 4. 综合应用题基本操作题1．请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。

(1)在名称为Forml的窗体上建立一个名称为Commandl的命令按钮数组，含三个命令按钮，它们的Index属性分别为0、1、2，标题依次为“是”、“否”、“取消”，每个按钮的高、宽均为300、800。

窗体的标题为“按钮窗口”。

运行后的窗体如3-63所示。

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

(2)在名称为Forml的窗体上画一个名称为Shal的形状控件，然后建立一个菜单，标题为“形状”，名称为shape0，该菜单有两个子菜单，其标题分别为“正方形”和“圆形”，其名称分别为shape1和shape2，如图3．64所示，然后编写适当的程序。

程序运行后，如果选择“正方形”菜单项，则形状控件显示为正方形；如果选择“圆形”菜单项，则窗体上的形状控件显示为圆形。

注意：程序中不能使用变量，每个事件过程中只能写一条语句。

保存时必须存放在考生文件夹下，工程文件名为Sit2．vbp，窗体文件名为sit2．frm。

正确答案：第1小题【操作步骤】步骤1：新建一个“标准EXE”工程，如表4．36在窗体中用“复制”和“粘贴”画出控件数组并设置属性。

步骤2：按要求将文件保存至考生文件夹中。

第2小题【操作步骤】步骤1：新建一个“标准EXE”工程，在窗体Forml中画一个名为Shal的形状控件。

步骤2：选择【工具】→【菜单编辑器】命令，打开菜单设计器，如表4．37所示，设置建立菜单项。

步骤3：打开代码编辑窗口，编写菜单命令的单击事件过程。

参考代码：Private Sub Shapel Click( ) Me．Shal．Shape=1End SubPrivate Sub Shape2 C1ick( ) Forml．Shal=3End Sub步骤4：按要求将文件保存至考生文件夹中。

1998年9月全国计算机等级考试二级笔试试题基础知识与BASIC程序设计_0

1998年9月全国计算机等级考试二级笔试试题基础知识与BASIC程序设计(21)在BASIC状态下要列出磁盘上的文件目录的命令是..joxue.A) CATALOG JoxueJoxue的B) DIR JoxueJoxueJoxue C) FILES JoxueJoxueJoxueJoxue的D) LIST..joxue.(22)下列语句中语法正确的是..joxue.A) X=5 JoxueJoxue的B) LET a=3,b=7 的的C) A B=2 JoxueJoxueJoxueJoxue的D) A=B 2 (23)常量1.7653e-06的类型是a) 整型JoxueJoxue b) 实型JoxueJoxue c) 字符型JoxueJoxueJoxue的d) 双精度(24)在basic语言中,y=5+SIN(3*X+1)是什么表达式a) 算术表达式JoxueJoxue b) 关系表达式Joxue的c) 逻辑表达式JoxueJoxueJoxue的d) 字符表达式(25)语句10 dim aa(3,4,5)中定义的数组有多少个元素a)12 JoxueJoxue的b) 60 JoxueJoxue c) 120 JoxueJoxueJoxue的d) 345 (26)表达式int(4*rnd+1)*(int(4*rnd-1))值的范围是a) [0,8] JoxueJoxue的b) [-1,8] JoxueJoxue c) [-3,8] JoxueJoxueJoxue 的d) [-4,8] (27)下面程序运行后输出的结果是10 x=-17.8 20 print sgn(x)*int(abs(x)) 30 end a)-18 JoxueJoxue的b)-17 JoxueJoxue c)17 JoxueJoxueJoxueJoxue d)18 (28)下面语句语法正确的是a) 10 a=1 b=2 c=3 JoxueJoxueJoxueJoxue的b) 10a=1,B=2,C=3 c) 10 a=1;B=2;C=3 JoxueJoxueJoxueJoxue的d) 10 a=1:B=2:C=3 (29)下列表达式中不正确的是a) a+bb+c c) a(-3+2) JoxueJoxueJoxueJoxue d) a-b=C (30)表达式1.5+3\2 2 OR 7 MOD 3 4 and not 1的运算结果为a) -1 JoxueJoxue的b) 0 JoxueJoxue的c) 1 JoxueJoxueJoxueJoxue d) 其他(31)下面程序运行后输出的结果是JoxueJoxue的10 x=3:Y=5 JoxueJoxue的20 print x=3;Y=5 JoxueJoxue的30 end a) 3 5 JoxueJoxue b) -1 -1 JoxueJoxue c) x=3 y=5 JoxueJoxueJoxueJoxued) 出错信息(32)下面程序运行后输出的结果是JoxueJoxue的10 read a,b$,c,d$ JoxueJoxue的20 print a+c;b$+d$ JoxueJoxue的30 webstripperattrwaswebstripperlinkwas=/reeducate/com_ grade/test/two/5 7,8,9,10 JoxueJoxue的40 end a)16 18 JoxueJoxue b)16 810 JoxueJoxue的c)16 90 JoxueJoxueJoxue 的的d)其他(33)下面程序运行后输出的结果是JoxueJoxue的10 def fnx(l,m,n)=(M*L+8)\N JoxueJoxue的20 a=3:B=4:C=5 JoxueJoxue的30 print fnx(b,a,c) JoxueJoxue的40 end a)4 JoxueJoxue 的b)5 JoxueJoxue的c)7 JoxueJoxueJoxue的d)9 (34)下面程序运行后输出的结果是JoxueJoxue的10 for j=1 to 10 JoxueJoxue的20 read x JoxueJoxue的30 if x 0 then a=A+ABS(X) JoxueJoxue的40 next j JoxueJoxue的50 print a JoxueJoxue的60 data1,-2,3,-4,5,-6,7,-8,9,-10 JoxueJoxue的70end a)-30 JoxueJoxue的的b)-25 JoxueJoxue 的c)25 JoxueJoxueJoxue的的d)30 (35)下面程序运行后输出的结果是JoxueJoxue的10 a$="CHINA" JoxueJoxue的20 b$=STRING$(3,A$) JoxueJoxue的30 print b$ JoxueJoxue的40 end a)aaa 的JoxueJoxue的的b)ccc JoxueJoxue c)chi JoxueJoxueJoxue的d)ina (36)若a=3,B=6,下面程序运行后输出的结果是JoxueJoxue的10 input "a,b=";A,B" JoxueJoxue的20 c=A*B+5 JoxueJoxue的30 print tab(b);c JoxueJoxue的40 enda)23 JoxueJoxueJoxueJoxue的b)tab(6) 23 JoxueJoxue的c)1823 JoxueJoxueJoxue d)6 23 (37)下面程序运行后输出的结果是JoxueJoxue的10 x=13:Y=15 JoxueJoxue的20 a=X-Y JoxueJoxue的30 if x =Y THEN A=A+Y ELSE A=A-Y..joxue.JoxueJoxue的40 PRINT A..joxue.JoxueJoxue的50 END..joxue.A)-2 JoxueJoxueJoxue B)2 JoxueJoxue的C)13 JoxueJoxueJoxue的D)-17..joxue.(38)下面程序运行后输出的结果是..joxue.JoxueJoxue的10 READ A,B,C,D..joxue.JoxueJoxue的20 RESTORE..joxue.JoxueJoxue的30 READ E,F,G..joxue.JoxueJoxue的40 DATA 1,3,4,6,7,8..joxue.JoxueJoxue的50 DATA 10,11,12..joxue.JoxueJoxue的60 PRINT C;D;E;F;G..joxue.JoxueJoxue的70 END..joxue.A)4 6 1 3 4 JoxueJoxueJoxueJoxueJoxue的B)4 6 7 810..joxue.C)7 8 10 11 12 JoxueJoxueJoxueJoxueJoxue的D)4 6 10 1112..joxue.(39)下面程序运行后输出的结果是..joxue.JoxueJoxue的10 K=0..joxue.JoxueJoxue的20 WHILE K 70 JoxueJoxue的30 k=K+2 JoxueJoxue的40 k=K*K+K JoxueJoxue的50 a=A+K JoxueJoxue的60 wend JoxueJoxue的70 print a JoxueJoxue的80 end a) 64 JoxueJoxue的b) 72 JoxueJoxueJoxue c) 78 JoxueJoxueJoxue的d) 148 (40)下面程序运行后输出的结果是JoxueJoxue的10 def fny(x)=X*X-3*X+1 JoxueJoxue的20 for j=1 to 5 JoxueJoxue的30 s=S+FNY(J) JoxueJoxue的40 next j JoxueJoxue的50 print s JoxueJoxue的60 end a)164 Joxue的b)183 JoxueJoxueJoxue c)185 JoxueJoxue的d)出错信息JoxueJoxueJoxueJoxueJoxueJoxue的..joxue.(41)下面程序运行后输出的结果是..joxue.JoxueJoxue的10 FOR K=10 6 STEP -1..joxue.JoxueJoxue的20 READ A(K)..joxue.JoxueJoxue的30 NEXT K..joxue.JoxueJoxue的40 DATA 1,3,5,7,9..joxue.JoxueJoxue的50 FOR J=3 TO 7..joxue.JoxueJoxue的60 PRINT A(10);..joxue.JoxueJoxue的70 NEXT J..joxue.JoxueJoxue的80 END..joxue.A)1 3 5 7 9 JoxueJoxueJoxueJoxueJoxue B)9 7 5 3 1..joxue.C)0 0 0 9 7 JoxueJoxueJoxueJoxueJoxue D)1 1 1 1 1..joxue.(42)下面程序运行后输出的结果是..joxue.JoxueJoxue的10 FOR J=3 TO 6..joxue.JoxueJoxue的20 GOSUB 100..joxue.JoxueJoxue的30 SUM=SUM+K..joxue.JoxueJoxue的40 NEXT J..joxue.JoxueJoxue的50 PRINT SUM..joxue.JoxueJoxue的60 END..joxue.JoxueJoxue的100 K=1..joxue.JoxueJoxue的110 FOR A=1 TO J..joxue.JoxueJoxue的120 K=K*A..joxue.JoxueJoxue的130 NEXT A..joxue.JoxueJoxue的140 RETURN..joxue.A)870 Joxue B)130 JoxueJoxueJoxue C)720 JoxueJoxueJoxue D)721..joxue.(43)-(45)下面程序是打印出100个在-600到600间不同的随机整数,并找出第几个最小者,但程序不完整，请补充Joxue之...joxue.JoxueJoxue的10 DIM B(100)..joxue.JoxueJoxue的20 FOR J=1 TO 100..joxue.JoxueJoxue的30 X=RND:IF X .5 THEN Y=1 ELSE Y=-1..joxue.JoxueJoxue的40 B(J)=Y*INT(RND*601):P=0:K=1..joxue.JoxueJoxue的50 WHILE P=0 AND K =j-1 JoxueJoxue的60 if b(j)=B(K) then 【43】JoxueJoxue的70 k=K+1 JoxueJoxue 的80 wend:if p=1 then goto 30 JoxueJoxue的85 print b(j); JoxueJoxue的90 next j : print JoxueJoxue的100 p=1 : min=【44】JoxueJoxue的110 for n=2 to 100 JoxueJoxue的120 if b(n)=1 and p=0 JoxueJoxue的60 if n ARR(J) THEN P=1 ELSE ARR(【46】)=ARR(J):J=J-1..joxue.JoxueJoxue的70 WEND..joxue.JoxueJoxue的80 ARR(【47】)=N..joxue.JoxueJoxue的90 FOR K=1 TO 13:PRINT ARR(K);:NEXT K:PRINT..joxue.JoxueJoxue的100 DATA 8,25,46,61,89,96,113,132,147,199,201,267..joxue.JoxueJoxue的110 END..joxue.JoxueJoxue的【46】A)1 B)12 C)J-1 D)J+1..joxue.JoxueJoxue的【47】A)1 B)12 C)J-1 D)J+1..joxue.(48)-(49)下面程序是用自定义函数计算,但程序不完整，请补充之。

二级VISUAL+BASIC机试-89

二级VISUAL BASIC机试-89(总分：100.00，做题时间：90分钟)一、1 基本操作题(总题数：2，分数：30.00)1.在名称为Form1的窗体上建立一个名称为Command1，标题为“输出”的命令按钮，再建立一个名称为Text1的文本框，字体为四号常规黑体，编写适当的事件过程，要求程序运行后，如果单击“输出”命令按钮，则在文本框在上显示“模拟考试”，如下图左图所示。

程序中不能使用任何变量，直接显示字符串。

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

（分数：15.00）__________________________________________________________________________________________正确答案：(根据题意，新建“标准EXE”工程，将一个Text控件和一个Command控件添加到窗体上。

Text 的名称为Text1，Text属性为空，Font属性为四号、常规、黑体，Command的名称为Command1，Caption 属性为“输出”。

双击Command1命令按钮，编写如下代码：Private Sub Command1_Click()Text1.Text="模拟考试"End Sub按钮运行程序，并按要求保存。

)解析：2.在名称为Form1的窗体上画一个标签，名称为Label1，边框属性为1；再画一个命令按钮，名称为Command1，标题为“最右端”，运行界面如下图右图所示。

请编写适当的事件过程，使运行界面在运行时，单击“最右端”按钮．则标签水平移动到窗体的最右端。

程序中不得使用任何变量。

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

（分数：15.00）__________________________________________________________________________________________正确答案：(根据题意，新建“标准EXE”工程，将一个Label1控件和一个Command控件添加到窗体上。

国家二级VB机试(Visual Basic程序设计基础)模拟试卷1(题后含答案及解析)

国家二级VB机试（Visual Basic程序设计基础）模拟试卷1(题后含答案及解析)题型有：1. 选择题选择题1．下面为单精度实型(即单精度浮点型)变量的是A．x$B．x&C．x!D．x#正确答案：C解析：$：字符串型，&：长整型，!：单精度实型，#：双精度实型。

知识模块：Visual Basic程序设计基础2．双精度浮点数的类型说明符为A．％B．#C．&D．@正确答案：B解析：％：整型，#：双精度实型，&：长整型，@：货币型。

知识模块：Visual Basic程序设计基础3．下列符号常量的声明中不合法的是A．Const a AsSingle=3．5B．Const a AsDouble=5+8C．Const a As Integer=“25”D．Const a=“OK”正确答案：C解析：定义符号常量的一般格式：Const常量名[As数据类型]=表达式，“常量名”参数就是给常量命名。

“数据类型”表示常量的数据类型，一般可以省略，这时由后面的“表达式”参数来指明常量的数据类型。

表达式可以是数值型常量、字符型常量、布尔型常量和日期型常量。

知识模块：Visual Basic程序设计基础4．为把圆周率的近似值3．14159存放在变量pi中，应该把变量pi定义为A．Dim pi As IntegerB．Dim pi(7)As IntegerC．Dim pi As SingleD．Dim pi As Long正确答案：C解析：单精度Single或双精度Double型的变量能够保存浮点型小数，整型Integer和长整型Long的变量只能保存整型数据。

本题中圆周率为3．14159，小数，可定义一个single或Double型变量来保存。

故选C。

知识模块：Visual Basic 程序设计基础5．对于语句Dim Var1 ，Var2 As Integer，下列说法中正确的是A．Var1#和Vat2都被定义为整型变量B．Var1被定义为双精度型变量。

2017年全国资格考试计算机等级考试二级VisualBasic语言程序设计笔试试题模拟真题

2017年全国资格考试计算机等级考试二级VisualBasic语言程序设计笔试试题模拟真题计算机等级考试二级Visual Basic语言程序设计笔试试卷一、选择题((1)一(20)每小题2分，(21)一(30)每小题3分，共30题，70分)下列各题A)、B)、C)、D)四个选项中，只有一个选项是正确的，请将正确选项涂在答题卡的相应位置上，答在试卷上不得分。

(1)以下不能在“工程资源管理器”窗口中列出的文件类型是A)．bas B)．res C)．fnn D)．ocx(2)以下关于窗体的描述中，错误的是A)执行UnloadFoMl语句后，窗体Fonnl消失，但仍在内存中B)窗体的Ioad事件在加载窗体时发生C)当窗体的Enabled属性为False时，通过鼠标和键盘对窗体的操作都被禁止D)窗体的Height、width属性用于设置窗体的高和宽(3)下列可作为Visual Basic变量名的是A)A#A B)4A C)?xY D)constA(4)设有如下的记录类型Type StudentnumberAs stringname As Stringage As IntegerEnd Type则正确引用该记录类型变量的代码是A) Student．name=”张红” B) Dim As Students．name＝”张红”C) Dim s As Type Student D) Dim s As TypeS．name=”张红” s.Dame＝”张红”(5)函数String(n，“str”)的功能是A)把数值型数据转换为字符串B)返回由n个字符组成的字符串C)从字符串中取出n个字符D)从字符串中第n个字符的位置开始取子字符串(6)将数学表达式Cos2(a+b)+5e2写成Visual Basic的表达式，其正确的形式是A)Cos(a+b)A2十5*exp(2) B)Cos^2(a+b)+5*exp(2)C)Cos(a+b)^2十5*ln(2) D)Cos^2(a+b)+5*ln(2)(7)在窗体上画一个命令按钮，名称为Commandl。

1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。

[模拟] 二级Visual Basic语言程序设计模拟98单项选择题第1题：下面控件中，没有Caption属性的是____。

A.复选框B.单选按钮C.组合框D.框架参考答案：CCaption属性是设置或返回控件的标题。

组合框没有Caption属性。

故选C。

第2题：下列操作说明中，错误的是______。

A.在具有焦点的对象上进行一次按下字母键操作，会引发KeyPress事件B.可以通过MousePointer属性设置鼠标光标的形状C.不可以在属性窗口设置MousePointer属性D.可以在程序代码中设置MousePointer属性参考答案：C可以在属性窗口中给MousePointer属性设置属性值。

故C选项错误。

[知识点] [选项个数]4 [试题编号] [分数] [题目类型] [难度]第3题：在数据库设计中，将E-R图转换成关系数据模型的过程属于( )。

A.需求分析阶段B.概念设计阶段C.逻辑设计阶段D.物理设计阶段参考答案：C数据库的逻辑设计主要工作是将E-R图转换成指定的RDBMS中的关系模式。

第4题：编写如下程序：Private Sub Form_Click()Dim aa = Array(1, 2, 3, 4, 5, 6, 7, 8, 9, 10)n = InputBox("请输入一个小于10的正整数")i = UBound(a)For k = n To (i - n) / 2 + nx = a(k)a(k) = a(i)a(i) = xi = i - 1Next kFor k = 0 To UBound(a)Print a(k);Next kEnd Sub程序运行后，单击窗体，并输入4，则输出结果是 ____A.1 2 3 4 5 6 7 8 9 10B.10 9 8 7 6 5 4 3 2 1C.1 2 3 4 10 9 8 7 6 5D.1 2 3 4 5 10 9 8 7 6参考答案：C程序意思是将以从输入的数值为开始下标，以数组的最大下标为结束下标，以这两个下标的均值为中心，对调两个下标之间的数组元素值。

输入4，以下标为4的数组元素开始，以下标为9的数组元素结束，a（4）和a（9），a（5）和a （8），a（6）和a（7）对调元素值，得到数组a为(1, 2, 3, 4, 10, 9, 8, 7, 6, 5)，故选择C项。

第5题：当窗体大小改变时，要使其中的控件也按比例发生变化，应使用窗体的()。

A.AutoSize属性B.Resize事件C.AutoRedraw属性D.Stretch属性参考答案：B考查窗体的属性和事件。

窗体没有Stretch和AutoSize属性，窗体的AutoRedraw 是在窗体上画图时受到影响的属性。

如果窗体的大小发生改变，要使窗体上各种控件大小也要随之进行改变，应该编写Resize事件。

第6题：假定有如下的窗体事件过程：Private Sub Form_Click( )a$="MicrosoftVisual Basic"b$=Right(a$,5)c$=Mid(a$,1,9)MsgBox a$,34,b$,c$,5End Sub程序运行后，单击窗体，则在弹出的信息框的标题栏中显示的信息是（）。

A.Microsoft VisualB.MicrosoftC.BasicD.5参考答案：Cb$位置是Msgbox标题栏上的名称，MsgBox的格式为MsgBox(prompt[, buttons][, title][, helpfile, context])，其中显示在对话框标题栏中的是字符串表达式。

如果省略 title，则将应用程序的名称显示在标题栏中。

第7题：下列控件不支持MouseDown事件的是__________。

A.HsrcollBarmand ButtonC.PictureBoxD.TextBox参考答案：A[知识点] [选项个数]4 [试题编号] [分数] [题目类型] [难度]第8题：在窗体上面一个名称为Command1的命令按钮，并编写如下程序：Pri vate Type RecordID As IntegerNanle As String*20End TypePrivate Sub Command1＿Click()Dim MaxSize，NextChar，MyCharOpen“d：＼temp＼female．txt”For Input As#1MaxSize=LOF(1)For NextChar=MaxSize To 1 Step－1MyChar=hnput(1，#1)Next NextCharPrint EOF(1)Close#1End Sub运行程序，单击命令按钮，其输出结果为( )。

A.TrueB.假C.0D.Null参考答案：A程序中以顺序输入方式打开d：＼temp＼fe-male．txt文件。

Lof。

函数取得打开文件的长度。

EOF函数用来测试文件的结束状态。

根据文件长度值，利用Input 函数逐一取出文件中的字符，每读取一个字符，文件指针自动下移，指向下一个字符。

当执行最后一次循环时，Input函数读取了最后一个字符，文件指针再向下移动就会指向文件的结尾。

因此当EOF函数测试文件结束状态时，就会返回Trueo对于逻辑值，Print语句会直接输出“True”。

因此答案为A。

第9题：结构化程序所要求的基本结构不包括（）。

A.顺序结构B.GOTO跳转C.选择（分支）结构D.重复（循环）结构参考答案：B1966年，Boehm和Jacopini证明了程序设计语言仅仅使用顺序、选择和重复（循环）三种基本控制结构就足以表达出各种其他形式的结构化程序设计方法，因此本题答案为B）。

第10题：在结构化方法中，用数据流程图(DFD)作为描述工具的软件开发阶段是____。

A.可行性分析B.需求分析C.详细设计D.程序编码参考答案：B软件开发阶段包括需求分析、总体设计、详细设计、编码和测试五个阶段。

其中需求分析阶段常用的工具是数据流图和数据字典。

本题答案为B。

第11题：下列程序的执行结果为( )。

n=0j=1Do Until n 〉2n=n+1：j=j+n*(n+1)LoopPrint n；iA.0 1B.3 7C.3 21D.3 13参考答案：C本题考查循环程序的分析。

在Do Until循环中如果n小于等于2，那么把n*(n+1)的结果累加到j上。

因此程序的功能为：循环变量n从0开始到2共执行了3次，目的为计算1+1*2+2*3+3*4。

第12题：设有如下通用过程：Public Function f(x As Integer)Dim y As Integerx = 20y = 2f = x * yEnd Function在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：Private Sub Command1_Click()Static x As Integerx = 10y = 5y = f(x)Print x; yEnd Sub程序运行后，如果单击命令按钮，则在窗体上显示的内容是（）。

A.10 5B.20 40C.20 5D.10 40参考答案：B过程f中形参变量x没有指定传递方式，则默认按地址传递，会影响实参值。

而变量y在按钮事件过程和f过程中都是局部变量，因此只在本过程中起作用。

因此执行y = f(x)后，x值在过程中被改变为20，而y被赋值为过程返回值40。

因此程序窗体上会显示20和40，即选B）。

第13题：为了将“联想电脑”作为数据项添加到列表框List1的最前面，可以使用语句______。

A.List1.AddItem "联想电脑"，0B.List1.AddItem "联想电脑"，1C.List1.AddItem 0, "联想电脑"D.List1.AddItem 1, "联想电脑"参考答案：A为列表框控件添加数据的方法是AddItem，List控件的AddItem方法的语法是：AddItem(String,index)。

其中index是列表框中列表项的索引值，第一项的索引值为0。

[知识点] [选项个数]4 [试题编号] [分数] [题目类型] [难度]第14题：窗体上有一个名称为HScroll1的滚动条，程序运行后，当单击滚动条两端的箭头时，立即在窗体上显示滚动框的位置(即刻度值)。

下面能够实现上述操作的事件过程是____。

A.Private Sub HScroll1_Change() Print HScroll1.Value End SubB.Private Sub HScroll1_Change() Print HScroll1.SmallChange End SubC.Private Sub HScroll1_Scroll() Print HScroll1.Value End SubD.Private Sub HScroll1_Scroll() Print HScroll1.SmallChange End Sub 参考答案：A根据题意可知，用户的操作是单击滚动条两端的箭头，故触发的是滚动条的Change事件；在窗体上显示的是滚动框的位置，即滚动条的当前刻度值，Value 属性值可返回这个值，综合一下，故A选项正确。

第15题：以下叙述中错误的是____。

A.Print #语句和Write #语句都可以向文件中写入数据B.用Print #语句和Write #语句所建立的顺序文件格式总是一样的C.如果用Print #语句把数据输出到文件，则各数据项之间没有逗号分隔，字符串也不加双引号D.如果用Write #语句把数据输出到文件，则各数据项之间自动插入逗号，并且把字符串加上双引号参考答案：B用Print #语句和Write #语句都可以向文件写入数据，但输出到文件的数据的格式不同。

故B选项错误。

第16题：在面向对象方法中，不属于“对象”基本特点的是______。

A.一致性B.分类性C.多态性D.标识唯一性参考答案：A对象有如下一些基本特点：标识唯一性、分类性、多态性、封装性、模块独立性好。

所以选择A。

第17题：在窗体上画一个名称为Command1的命令按钮，并编写如下程序：Function Fun(x)y=0If x＜10 Theny=xElsey=y+10End IfFun=yEnd FunctionPrivate Sub Command1_Click()n=InputBox("请输入一个数")n=Val(n)P=Fun(n)Print PEnd Sub运行程序，单击命令按钮，将显示输入对话框，如果在对话框中输入100，并单击“确定”按钮，则输出结果为______。