05年4月 2

发布 2020-04-11 16:56:28 阅读 4318

(11)a) (12)b) (13)b) (14)c)(15)d)

11)在窗体(名称为 form1)上画一个名称为 text1 的文本框和一个名称为 command1 的命令按钮,然后编写一个事件过程。程序运行后,如果在文本框中输入一个字符,则。

把命令按钮的标题设置为“计算机等级考试”。下列能实现上述操作的事件过程是。

a)private sub text1_change( )

计算机等级考试"

end sub

b)private sub command1_click( )

caption="计算机等级考试"

end sub

c)private sub form1_click( )

计算机等级考试"

end sub

d)private sub command1_click( )

计算机等级考试"

end sub

12)设 a=5,b=4,c=3,d=2,下列表达式的值是( )

3>2*b or a=c and b<>c or c>d

a)1 b)true

c)false d)2

13)设 a="microsoftvisualbasic",则下列使变量 b 的值为“visualbasic”的语句是( )

a)b=left(a,10) b)b=mid(a,10)

c)b=right(a,10) d)b=mid(a,11,10)

14)有下列的窗体事件过程:

private sub form_click( )

a$="microsoftvisual basic"

b$=right(a$,5)

c$=mid(a$,1,9)

msgbox a$,34,b$,c$,5

end sub

程序运行后,单击窗体,则在弹出的信息框的标题栏中显示的信息是( )

a)microsoft visual b)microsoft

c)basic d)5

15)设 a="a",b="b",c="c",d="d",执行语句 x=iif((ad),"a","b")后,x 的值为( )

a)a b)b

c)b d)a

16)c)(17)d) (18)a) (19)b) (20)d)

16)为了使命令按钮(名称为 command1)右移 200,应使用的语句是( )

a)b) 200c)d)

17)在窗体上画一个文本框,然后编写下列事件过程:

private sub form_click( )

x=inputbox("请输入一个整数")

print x+

end sub

程序运行时,在文本框中输入 456,然后单击窗体,在输入对话框中输入 123,单击。

确定”按钮后,在窗体上显示的内容为( )

a)123 b)456

c)579 d)123456

18)在窗体上画一个文本框和一个计时器控件,名称分别为 text1 和 timer1,在属性窗口中把计时器的 interval 属性设置为 1000、enabled 属性设置为 false。程序运行后,如。

果单击命令按钮,则每隔一秒钟在文本框中显示一次当前的时间。下列是实现上述操。

作的程序。private sub command1_click( )

timer1.__

end sub

private sub timer1_timer( )

end sub

在___处应填入的内容是( )

a)enabled=true b)enabled=false

c)visible=true d)visible=false

19)在**框 picture1 中装入了一个图形,为了清除该图形(不删除**框),应采用的。

正确方法是( )

a)选择**框,然后按 del 键。

b)执行语句 “)

c)执行语句 “

d)选择**框,在属性窗口中选择 picture 属性条,然后按回车键。

20)在窗体上画一个名称为 list1 的列表框,一个名称为 labe11 的标签,列表框中显示。

若干个项目。当单击列表框中的某个项目时,在标签中显示被选中项目的名称。下列。

能正确实现上述操作的程序是( )

a)private sub list1_click( )

end sub

b)private sub list1_click( )

end sub

c)private sub list1_click( )

end sub

d)private sub list1_click( )

end sub

21)a) (22)b)(23)c) (24)d)(25)b)

21)在窗体上画一个命令按钮,其名称为 command1,然后编写下列事件过程:

private sub command1_click( )

dim i as integer, x as integer

for i= 1 to 6

if i=1 then x=i

if i<=4 then

x=x+1else

x=x+2end if

next i

print x

end sub

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

a)9 b)6

c)12 d)15

22)在窗体上画一个名称为 command1 的命令按钮,然后编写下列事件过程:

private sub command1_click( )

c="abcd"

for n=1 to 4

print___

nextend sub

程序运行后,单击命令按钮,要求在窗体上显示下列内容:dcd

bcdabcd

则在___处应填入的内容为( )

a)left(c,n) b)right(c,n)

c)mid(c,n,1) d)mid(c,n,n)

23)执行下列程序段后,x 的值为( )

dim x as integer, i as integer

x=0for i= 20 to 1 step-2

x=x+i\5

next i

a)16 b)17

c)18 d)19

24)在 visual basic 工程中,可以作为“启动对象”的程序是( )

a)任何窗体或标准模块。

b)任何窗体或过程。

c)sub main 过程或其他任何模块。

d)sub main 过程或任何窗体。

25)建立一个名为 command1 的命令按钮数组,则下列说法中错误的是( )

a)数组中每个命令按钮的名称(name 属性)均为 command1

b)数组中每个命令按钮的标题(caption 属性)都一样。

c)数组中所有命令按钮可以使用同一个事件过程。

d)用名称 command1(下标)可以访问数组中的每个命令按钮。

26)c) (27)d) (28)b) (29)b) (30)a)

26)把窗体的 keypreview 属性设置为 true,然后编写下列事件过程:

private sub form_keypress(keyascii as integer)

dim ch as string

ch=chr(keyascii)

keyascii=asc(ucase(ch))

print chr(keyascii+2)

end sub

程序运行后,按键盘上的“a”键,则在窗体上显示的内容是( )

a)a b)b

c)c d)d

27)在窗体上画一个命令按钮和一个文本框,名称分别为 command1 和 text1,然后编写。

下列事件过程:

private sub command1_click( )

a=inputbox("请输入日期 (1~31) "

t="旅游景点:"_

iif(a>0 and a<=10, "长城",”

iif(a>10 and a<=20, "故宫",”

iif(a>20 and a<=31, "颐和园",”

end sub

程序运行后,如果从键盘上输入 16,则在文本框中显示的内容是( )

a)旅游景点:长城故宫 b)旅游景点:长城颐和园。

c)旅游景点:颐和园 d)旅游景点:故宫。

28)在窗体上画一个名称为 label1 的标签,然后编写下列事件过程:

private sub form_click( )

dim arr(10,10)as integer

dim i as integer, j as integer

for i=2 to 4

for j=2 to 4

arr(i,j)=j*j

next j

next i

label1. caption=str(arr(2,2)+arr(3,3))

end sub

程序运行后,单击窗体,在标签中显示的内容是( )

a)12 b)13c)14 d)15

29)在窗体上画一个名称为 command1 的命令按钮,然后编写下列通用过程和命令按钮。

的事件过程:

private function fun(byval m as integer)

if m mod 2=0 then

fun=2else

fun=1end if

end function

private sub command1_click( )

dim i as integer,s as integer

s=0for i = 1 to 5

s=s+fun(i)

nextprint s

end sub

程序运行后,单击命令按钮,在窗体上显示的是( )

a)6 b)7

c)8 d)9

30)阅读程序:

option base 1

dim arr( )as integer

private sub form_click( )

dim i as integer, j as integer

redim arr(3,2)

for i = 1 to 3

for j = 1 to 2

05年4月

二级 visual basic 语言程序设计试卷第 3 页 共 10 页 a b 200c d 17 在窗体上画一个文本框,然后编写下列事件过程 private sub form click x inputbox 请输入一个整数 print x end sub 程序运行时,在文本框中输入 456,然...

05年4月全

一 填空题 每空1分,共10分 1.新生儿发烧的常见原因有保暖过度 感染和等。2.儿童体格发育的指标包括体格发育形态指标和指标。3.儿童两眼向前平视时,两眼珠位置不匀称,称为。4.免疫系统包括免疫器官 免疫活性细胞和三个部分。5.细菌 病毒主要经呼吸道 消化道 和等侵入新生儿体内,引起疾病。6.儿童...

读盘观感 05年2月 5月

2005 2 3 今天上午看盘让我有了许多感想 一是昨天晚上已经对 做了认真的分析,因此在开盘后 时就可以大胆介入 尤其是在垂直 时更是如此 再者我已经感到昨天的涨幅较大,今天可能是涨也涨不高,就是个 市 心里就有数了 今天一定不要追高 二是有许多 原先的形态并不好,但是两根大阳线一拉上来就立刻变好...