教育学习网
 | 网站首页 | 最新动态 | 考试频道 | 教师专区 | 留学移民 | 英语学习 | 教育论文 | 常用文书 | 教案例文 | 毕业论文 | 资料下载 | 
eduxue.com baidu
栏目更新推荐  
·全国计算机等级考试一级上机WORD题
·全国计算机等级考试一级上机Excel题
·全国计算机等级考试一级上机PowerP
·03年4 等级考试一级笔试试卷
·2003年4月全国计算机等级考试二级v
·2002年全国计算机等级考试三级笔试
·2002年全国计算机等级考试三级笔试
·2002年全国计算机等级考试三级笔试
赞助广告  
 
 教育学习网 > 考试频道 > 计算机类考试 > 计算机等级考试 > 历年真题 > 文章正文
2002年全国计算机等级考试三级笔试样题(Visual Basic语言程序设计)
www.eduxue.com 来源:不详 更新时间:2005-3-29 【字体:
推荐文章:99年4月全国计算机二级QBASIC笔试
推荐文章简介:
一、选择题((1)-(40)题每题1分,(41)-(50)题每题2分,共60分)下列各题A、B、C、D四个选项中,只有一个选项是正确的,请将正确选项涂写在答题卡相应位置上,答在试卷上不得分。(1)微型计算机的性能主要

(考试时间90分钟,满分100分

一、选择题
(1)—(35)题每题2分,共70分。
下列各题A)、B)、C)、D)四个先项中,只有一个选择是正确的,请将正确选项涂写在答题卡相应位置上,答在试卷上不得分。

(1) 下列不能打开属性窗口的操作是   。

A) 执行“视图”菜单中的“属性窗口”命令

B) 按F4键

C) 按CTRL+T

D) 单击工具栏上的“属性窗口”按钮   。

(2) 下列可以打开立即窗口的操作是     。

A) CTRL+D   B) CTRL+E    C) CTRL+F   D) CTRL+G

(3) INPUTBOX函数反回值的类型为   。

A) 数值            B) 字符串

C) 变体            D) 数值或字符串(视输入的数据而定)

(4) 可以同时删除字符串前导和尾部空白的函数是   。

A) LTRIM    B) RTRIM    C) TRIM    D) MID

(5) 表达式4+5 \ 6 * 7 / 8 MOD 9 的值是

A) 4      B) 5      C) 6      D) 7

(6) 如果在立即窗口中执行以下操作:

A=8            (是回车键,下同)

B=9 

PRINT A>B 

则输出结果是   。

A) -1      B) 0      C) FALSE    D) TRUE

(7) 以下语句的输出结果是     。

PRINT FORMAT $(32548.5,“000,000.00”)

A) 32548.5 B) 32,548.5   C) 032,548.50  D) 32,548.50

(8) 执行以下程序段后,变量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) QUICK BASIC PROGRAMING

(9)  为了在按下回车键时执行某个命令按钮的事件过程,需要把该命令按钮的一个属性设置为TRUE,这个属性是    。

A) VALUE   B) DEFAULT   C) CANCEL   D) ENABLED

(10)      为了把焦点移到某个指定的控件,所使用的方法是

A) SETFOCUS   B) VISIBLE   C) REFRESH   D) GETFOCUS

(11)      设A=6,则执行 X=IIF(A>5,-1,0)后,X 的值为     。

A) 5   B) 6      C) 0      D) -1

(12)      执行下面的程序段后,X 的值为      。

X=5

FOR I=1 TO 20 STEP 2

X=X+I\5

NEXT I

A) 21      B) 22     C) 23     D) 24

(13)      在窗体上画一个命令按钮,然后编写如下事件过程:

PRIVATE SUB COMMAND1_CLICK()

FOR I=1 TO 4

X=4

FOR J =1 TO 3

X=3

OR K=1 TO 2

X=X+6

NEXT K

NEXT J

NEXT I

PRINT X

END SUB

程序运行后,单击命令按钮,输出结果是   。

A) 7     B) 15     C) 157     D) 538

(14)      在窗体上画一个命令按钮,然后编写如下事件过程:
PREVATE SUB COMMAND1_CLICK()

X=0

DO UNTIL X=-1

A = INPUTBOX(“请输入A的值”)

A = VAL(A)

B = INPUTBOX(“请输入B的值”)

B = VAL(B)

X = INPUTBOX(“请输入X的值”)

X = VAL(X)

A = A+B+X

LOOP

PRINT A

END SUB

程序运行后,单击命令按钮,依次在输入对话框中输入5、4、3、2、1、-1,则输出结果为      。

A) 2    B) 3     C) 14     D) 15

(15)在窗体(NAME属性为FORM1)上画两个文本框(其NAME属性分别为TEXT1和TEXT2)和一个命令按钮(NAME 属性为COMMAND1),然后编写如下两个事件过程:

PRIVATE SUB COMMAND1_CLICK()

A=TEXT1.TEXT+TEXT2.TEXT

PRINT A

END SUB

 

PRIVATE SUB FORMM_LOAD()

TEXT1 TEXT=""

TEXT2 TEXT=""

END SUB

程序运行后,在第一个文本框(TEXT1)和第二个文本框(TEXT2)中分别输入123和321,然后单击命令按钮,则输出结果为    。

A) 444     B) 321123   C) 123321   D) 132231

(16)阅读下面的程序段:

FOR I=1 TO 3

FOR J=1 TO I

FOR K=J TO 3

A=A+1

NEXT K

NEXT J

NEXT I

执行上面的三重循环后,A 的值为   。

A) 3    B) 9     C) 14     D) 21

(17)在窗体上画一个文本框(其中NAME属性为TEXT1),然后编写如下事件过程:

PRIVATE SUB FORM_LOAD()

TTEXT1.TEXT="">

TEXT1.SETFOCUS

FOR I=1 TO 10

SUM=SUM+I

NEXT I

TEXT1.TEXT=SUM

END SUB

上述程序的运行结果是   。

A) 在文本框TEXT1中输出55

B) 在文本框TEXT1中输出0

C) 出错

D) 在文本框TEXT1中输出不定值

(18)在窗体上画两个文本框(其NAME 属性分别为TEXT1和TEXT2)和一个命令按钮(其NAME属性为COMMAND1),然后编写如下事件过程:

PRIVATE SUB COMMAND1_CLICK()

X=0

DO WHILE X<50

X=(X+2)*(X+3)

N=N+1

LOOP

TEXT1.TEXT=STR(N)

TEXT2.TEXT=STR(X)

END SUB

程序运行后,单击命令按钮,在两个文本框中显示的值分别为

A) 1和0    B) 2和72    C) 3和50   D) 4和168

(19)用下面语句定义的数组的元素个数是      。

DIM A (- 3 TO 5 ) AS INTEGER

A) 6    B) 7     C) 8     D) 9

(20)以下程序的输出结果是

OPTION BASE 1

PRIVATE SUB COMMAND1_CLICK()

DIM A(10),P(3) AS INTEGER

K=5

FOR I=1 TO 10

A(I)=I

NEXT I

FOR I=1 TO 3

P(I)=A(I*I)

NEXT I
FOR I=1 TO 3

K=K+P(I)*2

NEXT I

PRINT K

END SUB

A) 33     B) 28     C) 35     D) 37

(21)在窗体上面画一个命令按钮,然后编写如下事件过程:

OPTION BASE 1

PRIVATE SUB COMMANDL_CLICK()

DIM A

A = ARRAY(1,2,3,4)

J = 1

FOR I = 4 TO STEP -1

S = S + A(I)*J

J =J*10

NEXT I

PRINT S

END SUB

运行上面的程序,单击命令按钮,其输出结果是   。

A) 4321    B) 12     C) 34     D) 1234

(22)在窗体上面一个命令按钮(其NAME属性为COMMANDL),然后编写如下代码:

OPTION BASE 1

PRIVATE SUB COMMANDL_CLICK( )

DIM A(4,4)

FOR I =1 TO 4

FOR J =1 TO 4

A(I,J) = (I-1)*3+J

NEXT J

NEXT I

FOR I =3 TO 4

FOR J =3 TO 4

PRINT A(J,I);

NEXT J

PRINT

NEXT I

END SUB

程序运行后,单击命令按钮,其输出结果为   。

A) 6 9     B) 7 10    C) 8 11    D) 9 12

7 10      8 11     9 12     10 13

(23)假定有如下的SUB过程:

SUB S(X AS SINGLE,Y AS SINGLE)

T = X

X =T/Y

Y =T MOD Y

END SUB

在窗体上画一个命令按钮,然后编写如下事件过程:

PRIVATE SUB COMMANDL_CLICK ( )

DIM A AS SINGLE

DIM B AS SINGLE

A =5

B =4

S A,B

PRINT A,B

END SUB

程序运行后,单击命令按钮,输出结果为   。

A) 5 4     B) 1 1     C) 1.25 4   D) 1.25 1

(24)阅读程序:

FUNCTION F(A AS INTEGER)

B = 0

STATIC C

B = B+1

C = C+1

F = A+B+C

END FUNCTION

 

PRIVATE SUB COMMANDL_CLICK ()

DIM A AS INTEGER

A =2

FOR I =1 TO 3

PRINT F(A)

NEXT I

END SUB

运行上面的程序,单击命令按钮,输出结果为   。

A) 4    B) 4     C) 4     D) 4

4     5       6      7

4     6       8      9

(25)阅读程序:

SUB SUBP(B() AS INTEGER)

FOR I =1 TO 4

B(I)=2*I

NEXT I

END SUB

 

PRIVATE SUB COMMANDL_CLICK()

DIM A(1 TO 4)AS INTEGER

A (1)=5

A (2)=6

A (3)=7

A (4)=8

SUBP A ()
FOR I =1 TO 4

PRINT A(I)

NEXT I

END SUB

运行上面的程序,单击命令按钮,输出结果为   。

A)2    B)5     C)10    D)出错

4     6       12

6     7       14

8     8       16

(26)下列不能打开菜单编辑器的操作是   。

A)按CTRL+E

B)单击工具栏中的“菜单编辑器”按钮

C)执行“工具”菜单中的“菜单编辑器”命令

D)按SHIFT + ALT + M

(27)假定有一个菜单项,名为MENUITEM,为了在运行时使该菜单项失效(变灰),应使用的语句为   。

A) MENUITEM. ENABLED=FALSE

B) MENUITEM. ENABLED=TRUE

C) MENUITEM. VISIBLE=TRUE

D) MENULTEM. VISIBLE=FALSE

(28)在程序运行期间,如果拖动滚动条上的滚动块,则触发的滚动条事件是   。

A) MOVE     B) CHANGE   C) SCROLL   D) GETFOCUS

(29)假定窗体上有一个标签,名为LABELL,为了使该标签透明并且没有边框,则正确的属性设置为   。

A) LABEL1. BACKSTYLE=0

LABEL1.BORDERSTYLE=0

B) LABEL1.BACKSTYLE=1

LABEL1.BORDERSTYLE=1

C) LABEL1.BACKSTYLE=TRUE

LABEL1.BORDERSTYLE=TRUE

D) LABEL1.BACKSTYLE=FALSE

LABEL1.BORDERSTYLE=FALSE

(30)在窗体上画一个列表框和一个文本框,然后编写如下两个事件过程:

PRIVATE SUB FORM_LOAD ()

LIST1.ADDITEM"357"

LIST1.ADDITEM"246"

LIST1.ADDITEM"123"

LISTL.ADDITEM"456"

TEXT1.TEXT=""

END SUB

 

PRIVATE SUB LIST1_ DBLCLICK ( )

A =LIST1.TEXT

PRINT A+TEXT1.TEXT

END SUB

程序运行后,在文本框中输入“789”(见图1),然后双击列表框中的"456",则输出结果为  。

A) 1245     B) 456789   C) 789456   D) 0

(31)为了暂时关闭计时器,应把该计时器的某个属性设置为FALSE ,这个属性是  。

A) VISIBLE   B) TIMER    C) ENABLED   D) INTERVAL

(32)为了把一个记录型变量的内容写入文件中指定的位置,所使用的语句的格式为  。

A)GET文件号,记录号,变量名

B)GET文件号,变量名,记录号

C)PUT文件号,变量名,记录号

D)PUT文件号,记录号,变量名

(33)对窗体编写如下事件过程:

PRIVATE SUB FORM _MOUSEDOWN(BUTTON AS INTEGER, _

SHIFT AS INTEGER, X AS SINGLE Y AS SINGLE)

IF BUTTON =2 THEN

PRINT "AAAAA"

END IF

END SUB

 

[1] [2] 下一页

  • 上一篇文章:

  • 下一篇文章:
  • 百度相关搜索: 历年真题
     
    关于〖2002年全国计算机等级考试三级笔试样题(Visual Basic语言程序设计)〗的最新评论:
    | 设为首页 | 加入收藏 | 联系站长 | 友情链接 | 版权申明 | 网站地图
    教育学习中心主办 苏ICP备05003810号
    Copyright© 2003-2008 www.EduXue.com All rights reserved.