VB练习题(填空+选择)

《VB》练习题

一、填空题

1、可以通过菜单中的命令退出Visual Basic,也可用快捷键。

2、快捷键CTRL+O的功能相当于执行菜单中的

命令；或者相当于单击工具栏上的按钮。

3、工程文件的扩展名为，窗体文件的扩展名为。

4、属性窗口分为4个部分，这4个部分分别是、、、。

5、一个控件在窗体上的位置由和属性决定，其大小由和属性决定。

6、为了选择多个控件，可以按住键，然后单击每个控件。

7、在用Visual Basic 开发应用程序时，一般需要、、3步。

8、在Visual Basic 中，字符串常量要用括起来，日期/时间型常量要用括起来。

9、为了使文本框同时具有水平和垂直滚动条，应先把

属性设置为True,然后再把属性设置为3。

10、为了使标签覆盖背景，应把属性设置为1。

11、为了使标签中的内容居中显示,应把属性设置为2。

12、若要把C盘根目录下的图形文件ab.jpg装入图片框Picture1中，应使用的语句是：

13、属性决定了标签内显示的内容。

14、假定在图片框Picture1中装入了一个图形文件，为了清除该图形（注意：清除图形，而不是删除图片框），应使用的语句是：15、当拖动滚动条中的滚动块时，将触发滚动条的事件。

16、为了使标签能自动调整大小以显示全部文本内容，应把标签的

属性设置为True

17、为了能自动放大或缩小图像框中的图形以与图像框的大小相适应，必须把该图像框的属性设置为

18、窗体、图片框或图像框中的图形通过对象的

属性设置。

19、计时器事件之间的间隔通过属性设置。

20、有时候需要暂时关闭计时器，可以通过设置属性来实现。

21、可以同时删除字符串前导和尾随空格的函数是。

22、当某一按钮的属性设置为False 时，该按钮不可见。

23、属性用于设置或返回文本框中的文本。

24、要使文本框中的文本以多行显示，应将其属性设置为true.

25、若要使文本框具有水平滚动条，应将其属性的值设为1。

26、要使标签透明，可将其backstyle属性的值设为

27、滚动条的属性表示滚动框在滚动条中的当前位置。

28、滚动条的属性表示当滚动框位于水平滚动条最右端或垂直滚动条最下端时的值。

29、图片框的属性决定了图片框控件是否能够根据装载的图片的大小自动调整尺寸。

30、图像框的属性决定了图像控件与被装载的图片如何调整尺寸以互相适应。

31、滚动条的属性表示当滚动框位于水平滚动条最

左端或垂直滚动条最上端时的值。

32、函数Cint(-2.6)的值是

33、函数Int(-2.6)的值是

34、函数Fix(-2.6)的值是

35、在使用形状控件时，若要绘制椭圆，应将其属性设置为2。

36、当选项按钮处于被选中状态时，其属性的值为true.

37、当复选框处于选中状态时，其value属性值为

38、要产生1-100之间的随机整数，可使用公式

39、当程序运行时,要求窗体中的文本框呈现空白,则在设计时,把此文本框的属性设置成空白.

40、滚动条的属性指单击滚动条中滚动框前面或后面的部位时，value 增加或减小的增量值；属性指单击滚动条两端的箭头时，value 增加或减小的增量值。

41、#3/7/98#是______类型的常量；23.56是______类型的常量；true 是______类型的常量；"false"是______类型的常量。

42、X能被7整除，用Visual Basic的表达式表示为______________________

43、Visual Basic表达式x^2+k/(1+a*（x-b))对应的数学式为______。

44、Visual Basic 的窗体和控件是具有自己的_________、_________和方法的对象。

45、当窗体成为活动窗口时，触发事件。

46、声明一个长度为10个字符的字符串变量mstr，应使用_____________语句。

47、用户单击某窗口( 窗体名为Form1 )时，会显示一行信息：“欢迎光临!”，应在该窗体的________________事件过程中编写程序代码。请写出相应的事件过程名以及该过程内的程序代码_____________________________________。

48、在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程：

Private Sub Form_Click()

Text1．Text="VB程序设计”

End Sub

Private Sub Text1_Change()

Picture1．Print “VBprogramming”

End Sub

程序运行后，单击窗体，则在文本框中显示的内容是____，而在图片框中显示的内容是____。

49、要产生10-20之间的随机整数，可使用公式

50、分析下面程序并填空:

private sub form_click（）

m=val(inputbox(“输入数据：”))

select case m

case 1，3，4

print “我们”

case 5 to 10

print “你们”

case is>15

print “他们”

case else

print “我们大家”

end select

end sub

运行程序，当输入数据为1时，输出，当输入数据为

2时，输出，当输入数据为5时，输出,当输入数

据为8时，输出,当输入数据为18时，输出。

51、要将小写字母转换为大写字母，可使用____________函数

52、Visual Basic是一种面向__________的可视化程序设计语言，采取了__________的编程机制。

53、在VB中工程文件的扩展名是____________，窗体文件的扩展名是____________，标准模块文件的扩展名是____________。

54、设置控件背景颜色的属性名称是______________________。

55、所有控件都具有的共同属性是__________________属性。

56、一般情况下，控件有两个属性项的缺省值是相同的，这两个属性项是______________和______________。

57、VB中的每个对象（控件）都有一组特征，这组特征称为__________，我们通过修改它可以控制对象的外观和操作。

58、通常情况下，VB中一个工程主要包括如下四个文件：窗体文件、工程文件、类模块文件和_____________文件，后者的扩展名为.Bas，通常由Basic语言编写，是一个可共用的子程序。

59、一般可以使用__________关键字声明常量。

60、变量的声明分为两种方法：__________和____________。

61、在代码模块中加入Option Explicit的目的是_____________________。

62、在VB中，我们用一个简单的______语句就能实现退出程序。

63、从字符串中任意位置截取字符的函数是__________。

64、表达式10 Mod 6 \ 4的值为______。

65、表达式chr(Asc("a") + 5)的值为_________。

66、表达式Mid("UniversityOfPetroleum", 8, 4) 的值为_________。

67、要将大写字母转换为小写字母，可使用____________函数。

68、对象是的实例化。

69、逻辑常量为True或__________。

70、使用了__________________的声明后，当程序中使用未经声明的变量时，程序运行时会报错。

71、滚动条控件有水平滚动条和_________________滚动条.

72、文本框中所显示的内容是它的_________________属性的值.

73、设置计时器控件只能触发_________________事件.

74、由VB预先设置好的、能够被对象识别的动作称为

75、VB中,变量的声明可分为两种方法:隐式声明和

76、在VB中,若要使一个文本框(Text)中的内容在超过文本框的宽度时能够自动换行显示,应当将这个文本框的属性的值设置为True.

77、在VB中,若要改变一个窗体的标题,应在属性窗口中改变这个窗体的属性的值.

78、要使一个按钮无效,则可把它的Enable属性设为

79、写出用随机函数产生一个100至200之间整数的VB表达式

80、定时器控件的Interval属性值是指时间间隔,单位为毫秒;当每隔此间隔的时间,定时器会触发一次事件.

81、Visual Basic为添加到窗体上的第一个图片框提供的默认对象名为，第一个图像框提供的默认对象名为

82、图片框或图像框内可以显示扩展名为、、

、、的图片。

83、一个工程可以包括多种类型的文件,其中,扩展名为.vbp的文件表示文件.

84、一个工程可以包括多种类型的文件,其中,扩展名为.frm的文件表示文件.

85、表达式："12" + "20"的结果为___________。

86、表示x是5的倍数或是9的倍数的逻辑表达式为_______。

87、要显示当前机器内的日期，函数为________。

88、要对文本框中已有的内容进行编辑，按下键盘上的按键，就是不

起作用，原因是设置了______ 属性为True 。

89、下面程序运行后输出的结果是__________。

x = Int(Rnd) + 3

If x ^ 2 > 8 Then y = x ^ 2 + 1

If x ^ 2 = 9 Then y = x ^ 2 - 2

If x ^ 2 < 8 Then y = x ^ 3

print y

90、计时器控件能有规律的以一定时间间隔触发_________ 事件，并执行该事件过程中的程序代码。

91、复选框控件其value属性的可取值是

92、若要设置当鼠标在命令按钮上停留时，在该命令按钮下面的黄色小方框中显示的提示文本，应在属性中去设置。

93、在VB中，注释符为，分行符为，

并行符为。

94、计时器控件在是可见的，在是不可见的。它在后台每隔一定时间间隔触发相应事件。

95、某一事件过程如下：

Private Sub cmd1_Click()

Form1.Caption=”VB示例”

End Sub

则响应该过程的对象名是，事件名是。

96、PictureBox控件可通过设置其属性为True使之可自动调整大小；而Image控件可通过设置其属性为True，使其加载的图片能自动调整大小以适应Image。

97、当复选框处于选中状态时，其属性的值为1。

二、选择题

1、A为True,B为False, 则“A and B”和“A Or B”的值分别是（）。

A、True,True

B、True False C 、False,True D 、False,False

2、数学关系3〈= x〈10表示成正确的VB表达式为（）A、3〈=x〈10 B、3〈=xANDx〈10

C、x〉=3 OR x〈10

D、3〈=x AND

3、下面正确的赋值语句是（）

A、x+y=30

B、y= *r*r

C、y=x+30

D、3y=x

4、为了给三个变量赋初值1，下面正确的赋值语句是（）

A、x=1：y=1：z=1

B、x=1，y=1，z=1

C、x=y=z=1

D、xyz=1

5、语句If x=1 Then y=1,下列说法正确的是（）。

A、x=1和y=1 均为赋值语句

B、x=1和y=1均为关系表达式

C、x=1为关系表达式，y=1为赋值语句

D、x=1为赋值语句，y=1为关系表达

6、在代码窗口内将Form1的“Caption”属性设置为“时钟”,正确的书写形式是( )

A 、Form.C aption“时钟” B、Form.Caption=“时钟”

C、Caption=“时钟”

D、Fopm.Caption( “时钟”)

7、下列操作不能打开代码窗口的是( )

A、选中对象,单击鼠标右键,在弹出的快捷菜单中选择“查看代码”命令

B、选中对象,双击鼠标左键

C、按F7键

D、按F4键

8、窗体初始化程序应写在( )事件中.

A、Load

B、Unload

C、Activate

D、GotFocus

9、在一个语句内写多条语句时,每个语句之间分隔符号是( )

A ，

B ：

C 、

D ；

10、下面是合法的变量名为( )

A、x_yz

B、123abc

C、integer D 、X-Y

11、下面合法的字符串常数为( )

A 、ABC $ B、“ABC” C 、…ABC' D、ABC

12、Integer类型的变量可存的最大整数为（）

A、256

B、32768

C、32767

D、65536

13、下列变量名写法错误的是（）

A、abc

B、abc123

C、abc_123

D、123abc

14、在VB中，下列（）函数是求绝对值的。

A、INT(X)

B、ABS(X)

C、SQR(X)

D、GN(X)

15、在VB中，设置控件的大小，可改变下列（）属性。

A、Height 与width

B、Height 与Top

C、Left 与Top

D、Left 与Width

16、以下是一段VB程序：

a=1

b=a+1

c=a+b

它的基本结构属于（）

A、顺序结构

B、选择结构

C、循环结构

D、树型结构

17、下列程序段运行后，变量Value的值是（）

x=20

if x>=10 then

Value=5*x

Else

Value=4*x

End if

A、100

B、80

C、90

D、70

18、在VB中，设置控件的位置，可改变下列（）属性。

A、Height 与width B. Height 与Top

C. Left 与Top

D. Left 与Width

19、以下是一段VB程序：

if I=1 then

x=x+1

else

x=x*2 end if

它的基本结构是（）

A、顺序结构 B. 选择结构 C.循环结构 D.树型结构

20、分析下列程序

private sub form_click( )

s=11\3+11 mod 3

print s

end sub

当单击窗体时s的值是（）

A、3

B、4

C、5

D、6

21、下列程序段运行后，a的值为（）

a=10

if a>=10 then

a=a+1

else

a=a-1

end if

A、8

B、9

C、10

D、11

22、表达式Abs(-3.6)*sqr(100)的值是（）

A、360 B. –360 C. –36 D. 36

23、在VB中显示和编辑程序代码时，采用（）

A、工程资源管理器窗口 B.窗体设计器窗口

C. 代码编辑窗口

D. 属性窗口

24、下列语句中定义了一个实型变量的是（）

A、Dim end as Integer

B、Dim sum as single

C、Dim name as string

D、其它三项都不对

25、下列（）函数返回系统的当前时间。

A、time( ) B. Date( ) C. Day( ) D. Year( )

26、能够改变复选框中背景颜色的属性是（）

A、Backcolor B. Font C. Fontcolor D. Value

27、下列程序段运行后，m值为（）

a=2: b=1: c=5

if a

if c

A、1

B、2

C、5

D、题是错误，无答案

28、判断x是否在区间（a, b]上，逻辑表达式是（）。A. ax And x<=b

29、数学式子（2a+b）/(4ab)在VB中的正确写法是（）

Ａ．(2*a+b)/(4*a*b) B. (2*a+b)/(4ab)

C. (2*a+b)/4*a*b

D. (2a+b)/(4ab)

30、在VB中，表达式21 mod 4的结果是（）

A、15

B、1

C、25

D、5

31、设a=2,b=3,在VB中，表达式a>b or b>=3的值是（）

A、false

B、true

C、-1

D、1

32、数学式子2a(7+b)在VB中的正确写法是（）

A、2*a*7+b

B、2a*(7+b)

C、2*a*(7+b)

D、2*a(7+b)

33、当文本框的scrollbars 属性设置了非零值, 却没有效果, 原因是______

a. 文本框中没有内容

b. 文本框的multiline 属性为false

c. 文本框的multiline 属性为true

d. 文本框的locked 属性为true

34、表达式5 Mod 3+3\5*2的值是________。

（A) 0 （B) 2 （C) 4 （D) 6

35、设x=4,y=8,z=7，以下表达式x>z Or z

36、、\、/、Mod、*、四个算术运算符中，优先级最低的是________。（A）\ （B）/ （C）Mod （D）*

37、表达式(7\3+1)*(18\5-1)的值是________。

（A）8.67 （B）7.8 （C）6 （D）6.67

38、下列日期型常量表达正确的是________。

(A)”2/1/02”(B)2/1/02 (C)#2/1/02# (D){2/1/02}

39、设A=”12345678”，则表达式Val(Left(A,4)+Mid(A,4,2))的值为________。

（A）123456 （B）123445 （C）8 （D）6

40、函数Len(Str(Val(“123.4”)))的值为________。

（A）11 （B）5 （C）6 （D）8

41、下列表达式计算的结果不是”1234”的是________。

（A）”12”+”34”（B）”12”&”34”（C）12+34 （D）12&34

42、以下关系表达式中，其值为False的是__________。

(A) ”ABC”>”AbC”(B) “the”<>”they”

(C) “VISUAL”=UCase(“Visual”) (D) “Integer”>”Int”

43、语句Print IIf(2,3,4)的输出结果为()

(A) 0 (B) 2 (C) 3 (D) 4

44、表达式Abs(-5)+Len(“ABCDE”)的值为( )

A. -5ABCDE

B. 0

C. 5ABCDE

D. 10

45、把数值型转换为字符型需要使用的函数是（）

A. Str

B. Val

C. Chr

D. Asc

46、"x"是小于80的非负数，用VB表达式表示正确的是（)

A. 0<=x<80

B. 0<=x Or x<80

C. 0<=x And x<80

D. 0≤x<80

47、以下可以作为Visual Basic变量名的是（）

A. SIN

B. COS(X)

C. X(-1)

D. COL

48、.VB提供了结构化程序设计的三种基本结构是（）

A. 递归结构、选择结构、循环结构

B. 选择结构、过程结构、顺序结构

C. 选择结构、循环结构、顺序结构

D. 过程结构、转向结构、递归结构

49、表达式10+10Mod3*3的值为（）。

A、11

B、2

C、13

D、6

50、数学式子Sin25?写成VB表达式是（）。

A、Sin25

B、Sin（25）

C、SIN（25?）

D、Sin（25*3.14/180）

51、在窗体上添加一个列表框，然后编写如下两个事件过程：Private sub Form_click( )

List1.removeitem 3

List1.removeitem 0 List1.removeitem 1

End sub

Private sub Form_load( )

List1.additem “上海”

List1.additem “天津”

List1.additem “北京”

List1.additem “深州”

End sub

运行上面的程序，然后单击窗体，列表框中所显示的内容为（）

A 上海

B 北京

C 深州

D 天津

52、下列逻辑表达式中，能正确表示条件“x、y都是奇数”的是（）

A x mod 2=1 or y mod 2=1

B x mod 2=0 or y mod 2=0

C x mod 2=1 and y mod 2=1

D x mod 2=0 and y mod 2=0

53、函数string(5，66)的值为（）

A “BBBBB”

B “bbbbb”

C “55555”

D “AAAAA”

54、表达式Ucase(“Basic”)+Lcase(“Basic”)的值为（）

A “BASICbasic”

B “basicBASIC”

C “BASICBASIC”

D “basicbasic”

55、一只黑色的台球被打进袋内，则“黑色”、“台球”、和“打”依次是下面的哪一项（）

A 对象属性事件

B 属性对象事件

C 对象属性方法D属性对象方法

56、下列表达式中，能正确表示“x等于0或大于9”的是

_________________

（A）x=0 And x>9 （B）x=0 Or x>9 （C）x>9 , x=0 （D）x=0 Or >9

57.VB语句Print 9*9\9/9的输出结果是_________________

（A）81 （B）1 （C）9 （D）0

58. 设有如下语句：

Str1=InputBox ("输入"，" "，"练习")

从键盘上输人字符串“示例”后，Str1的值是（）。

A．“输入” B．“” C．“练习”D．“示例”

59.表达式Len(Str(2000 - 1999)) - 9 \ 5的正确结果是______ （A）0 （B）1 （C）2 （D）3

60、在窗体上画一个命令按钮，然后编写如下事件过程：

Private Sub Command1_Click()

a = InputBox("请输入一个整数")

b = InputBox("请输入一个整数")

Print a + b

End Sub

程序运行后，单击命令按钮，在输入对话框中分别输入12和34，输出结果为______

（A）a+b （B）1234 （C）46 （D）系统报错

61、以下不属于Visual Basic 6.0工作模式的是（）

A. 设计模式

B. 运行模式

C. 编译模式

D. 中断模式

62、在程序代码中设置属性的方法如下（）

A. 属性=值

B. 对象属性=值

C. 对象.属性=值

D. 属性.对象=值

63、下列选项中哪个是算术运算符（）

A. =

B. &

C. Mod

D. And

64、下面哪种对象没有caption 属性（）

A form

B textbox

C commandbutton

D label

65、复选框的value属性的可取值是（）

A、true 和false

B、0和1

C、1 、2 、3

D、0 、1 、2

66、以下各项中，在图像框中不能显示的图形文件是（）

A) .gif文件B) .jpg文件C) .psd文件D) .bmp文件

67、设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 68、下列哪组语句可以将变量a、b 的值互换（）

A a=b:b=a

B t=a:a=b:b=t

C t=b:a=b:b=t

D a=t:t=b:b=a

69、函数asc(“Bxyz”)的值是（）

A 64

B 65

C 66

D 67

70、函数len(“10个字符串”)的值是（）

A 2

B 3

C 6

D 8

71、在窗体中添加一个命令按钮，名称为command1,两个文本框名称为text1、text2,然后编写如下程序：

Private sub command1_click()

a=text1.text

b=text2.text

C=Lcase(a)

D=Ucase(b)

Print C;D

End sub

程序运行后，在文本框text1、text2 中分别输入Basic和Visual,结果是（）

A. BasicVisual

B. BASICvisual

C.basicVISUAL

D.BASICVISUAL

72、a=10：b=8：c=6

d = a>b or b

e = a>b and b

执行以上语句后d,e的值分别是（）

A true true

B false true

C true false

D false false

73、滚动条的（）属性表示滚动框在滚动条中的当前位置。

A value

B max

C min

D largechange

74、表达式 4+5\6*7/8 mod 9 的值是（）

A 4

B 5

C 6

D 7

大学VB考试题库

大学VB考试题库 一、单项选择题 1、与传统的程序设计语言相比,Visual Basic最突出的特点是（）。 A、结构化程序设计 B、程序开发环境 C、事件驱动编程机制 D、程序调试技术 2、赋值语句：a=123& MID("123456",3,2)执行后，a变量中的值是（）。 A、"12334" B、123 C、12334 D、157 3、保存一个工程至少应保存两个文件，这两个文件分别是（B）。 A、文本文件和工程文件 B、窗体文件和工程文件 C、窗体文件和标准模块文件 D、类模块文件和工程文件 4、以下能在窗体Form1的标题栏中显示"VisualBasic窗体"的语句是（C）。 A、https://www.wendangku.net/doc/a27193838.html,="VisualBasic窗体" B、Form1.Title="VisualBasic窗体" C、Form1.Caption="VisualBasic窗体" D、Form1.Text="VisualBasic窗体" 5、为了装入一个VisualBasic应用程序，应当（D） A、只装入窗体文件（.frm） B、只装入工程文件（.vbp） C、分别装入工程文件和标准模块文件（.bas） D、分别装入工程文件、窗体文件和标准模块文件 6、赋给一个数组的数据类型一定要（A）。 A、相同 B、不相同 C、两可 D、都不对 7、下面正确的赋值语句是（C）。 A、x+y=30 B、y=π*r*r C、y=x+30 D、3y=x 8、VisualBasic 6.0集成环境的主窗口中不包括（C）。

A、标题栏 B、菜单栏 C、状态栏 D、工具栏 9、以下叙述中错误的是(C)。 A、Visual Basic 是事件驱动型可视化编程工具 B、Visual Basic应用程序不具有明显的开始和结束语句 C、Visual Basic工具箱中的所有控件都具有宽度（Width）和高度（Height）属性(计时器) D、Visual Basic中控件的某些属性只能在运行时设置 10、要使Print方法在Form_Load事件中起作用，要对窗体的(C)属性进行设置。 A、Backcolor B、ForeColor C、AutoRedraw D、BackStyle 11、若要使命令按钮不可操作，要对(A)属性进行设制。 A、Enabled B、Visible C、BackColor D、Caption 12、以下叙述中错误的是(B)。 A、一个工程中可以包含多个窗体文件 B、在一个窗体文件中用Private定义的通用过程能被其他窗体调用 C、在设计VB程序时，窗体、标准模块、类模块等需要分别保存为不同类型的磁盘文件。 D、一个工程默认的启动对象是Form1 13、Cls方法可以清除窗体或图片框中的(C)内容。 A、在设计阶段使用Picture设置的背景位图 B、在设计阶段放置的控件 C、在运行阶段产生的图形和文字 D、以上均可 14、设x=3,y=5,则以下表达式值为真的是 (C) A、(-3+5>x) And (y>0) B、(x<0) Eqv (y>0) C、(x>y) Or (y>0) D、x>=y And y>10 15、为了防止用户随意将光标置于控件之上，应将进行(D)设置。 A、将控件的TabIndex属性设置为0

VB新题库(填空题)

所有填空题 1、VB6.0是运行于______操作系统环境下的一个快速可视化程序开发工具，用它进行程序设计，有两个基本的特点，即______和______。 答案：1：Windows9x/NT#Windows9x/NT#Windows9x\NT#Windows9x\NT#Windows9x#Windows NT#Windows9x#WindowsNT#windows9x/NT#windows9x/NT#windows9x\NT#windows9x\NT#windows9x#windows NT#windows9x#windowsNT 2：事件驱动编程#可视化设计 3：可视化设计#事件驱动编程 等级：1难度：1 知识点：VB知识点/VB简介 2、VB是一种面向______的可视化编程语言，它采用______的编程机制。 答案：1：对象 2：事件驱动 等级：1难度：1 知识点：VB知识点/VB的编程环境 3、在VB集成开发环境中，运行应用程序的方法有两种：______或______。 答案：1：编译运行模式#解释运行模式#编译运行#解释运行 2：解释运行模式#编译运行模式#解释运行#编译运行 等级：1难度：1 知识点：VB知识点/VB简介 4、VB的对象主要分为______和______两大类。 答案：1：窗体#控件 2：控件#窗体 等级：1难度：1 知识点：VB知识点/VB的对象、属性、方法和事件 5、VB中，用来描述一个对象的状态或特征的量称之为对象的______。 答案：1：属性 等级：1难度：1 知识点：VB知识点/VB的对象、属性、方法和事件 6、在VB中，最基本的对象是______。 答案：1：窗体 等级：1难度：1 知识点：VB知识点/VB的对象、属性、方法和事件 7、一个对象响应某个事件后所执行的操作是通过一段程序代码来实现，这段程序代码称______。 答案：1：事件过程 等级：1难度：1

vb程序设计试题(含答案)

第一套试题 一、选择题（每题2分，共30分） 1.在VB环境中，工程文件的扩展名是( C ) （A）.frm （B）.bas （C）.vbp （D）.frx 2.下面4项中不属于面向对象系统三要素的是( A ) （A）变量（B）事件（C）属性（D）方法 3. \、/、Mod、*这4个算述运算符中，优先级别最低的是( C ) （A）\ （B）/ （C）Mod （D）* 4.要使Print方法在Form_Load事件中起作用，要对窗体的( C )属性进行设置（A）BackColor （B）ForeColor （C）AutoRedraw （D）Caption 5.不论何控件，共同具有的属性是( B ) （A）Text （B）Name （C）ForeColor （D）Caption 6.要使Form1窗体的标题栏显示“欢迎使用VB”，以下语句正确的是( D ) （A）Form1.Caption=“欢迎使用VB”（B）Form1.Caption=ˊ欢迎使用VBˊ（C）Form1.Caption=欢迎使用VB （D）Form1.Caption=〞欢迎使用VB〞 7.VB提供了结构化程序设计的3种基本结构，这3种基本结构是( D ) （A）递归结构，选择结构，循环结构（B）选择结构，过程结构，顺序结构 （C）过程结构，输入、输出结构，转向结构（D）选择结构，循环结构，顺序结构 8.给变量赋值a=123+MID(“123456”,3,2)，a变量中的值是( D ) （A）“12334”（B）123 （C）12334 （D）157 9.下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数，不正确的语句是( D ) （A）If sex=“男”And age＜40 And InStr(duty,“教授”)＞0 Then n=n+1 （B）If sex=“男”And age＜40 And (duty=“教授”Or duty=“副教授”) Then n=n+1 （C）If sex=“男”And age＜40 And Right(duty,2)= “教授” Then n=n+1 （D）If sex=“男”And age＜40 And duty=“教授”And duty=“副教授” Then n=n+1 10.若要清除列表框的所有内容，可用来实现的方法是( C )

VB程序填空复习题

二级VB程序设计练习 程序填空 1．下面程序按每行10个数打印出30个介于-300到300间无重复的随机整数，并显示其中的最小值。数组b(30)存放所产生的无重复的随机整数，运行结果如图所示。 Private Sub Command1_Click() Dim b(30), j As Integer, k As Integer Dim y As Integer, x As Single, min As Integer For j = 1 To 30 lb: x = Rnd If x > 0.5 Then y = 1 Else y = -1 b(j) = y * Int(Rnd*301) k = 1 Do While k

If b(j) = b(k) Then Goto lb k = k + 1 Loop Print b(j); If j Mod 10=0 Then Print Next j min = b(1) For j = 1 To 30 If b(j) < min Then min=b(j) Next j Print min End Sub 2．下面程序用于对9位的号进行校验。参数mno存放号，mjy存放产生的校验位，tag判断校验正确否，若校验正确tag置1，否则为0。产生校验位的算法为：取号右边的8位之和关于9的模作为校验值，号最左边的一位为校验位。 Public Sub foe(ByVal mno As String, mjy As Integer, Tag As Integer) Dim msum As Integer, m As String msum = 0 for j=2 to 9 m = Mid(mno, j, 1)

vb题库(选择与填空)

一、单选题（每小题1分，共99 分） 1. 假定Picture1 和Text1 分别为图片框和文本框的名称，下列语句中不正确的是______ 。 A Picture1.Print 25 B Text1.Print 25 C Print 25 D Debug.Print 25 2. 在Visual Basic 中要将一个窗体从内存中释放，应该使用以下语句中的______ 。 A UnLoad B Stop C Close D Hide 3. 如果组合框ComBo1中已有10项数据，应使用语句______将数据"Mydata"插入到第5项。 A ComBo1.Insert "Mydata", 4 B ComBo1.Insert "Mydata", 5 C ComBo1.AddItem "Mydata", 5 D ComBo1.AddItem "Mydata", 4 4. 如果列表框List1中已有10项数据，应使用语句______将数据"Mydata"插入到列表框的第3项。 A List1.Insert "Mydata", 3 B List1.AddItem "Mydata", 2 C List1.AddItem "Mydata" ,3 D List1.Insert "Mydata", 2 5. 语句If x=1 Then y=1，下列说法正确的是____________。 A x=1和y=1为赋值语句 B x=1为赋值语句，y=1为关系表达式 C x=1为关系表达式，y=1为赋值语句 D x=1和y=1均为关系表达式 6. 删除列表框中指定的项目所使用的方法为______ 。 A Move B Clear C Remove D RemoveItem 7. 不论何控件，共同具有的属性是______________。 A ForeColor B Name C Text

VB题库程序填空

程序填空〖第1题〗『程序填空』(1分)(题号:59) '------------------------------------------------------- '【程序填空】 '------------------------------------------------------- ' 功能：输入一个数,若大于0,则显示"+"；若小于0， ' 则显示 "-"；若等于"0",则显示"零"。 '------------------------------------------------------- Private Sub Command1_Click( ) x = Val Select Case x '**********SPACE********** Case is > 0 = "+" Case Is < 0 '**********SPACE********** = "-" '**********SPACE********** Case is = = "零" End Select End Sub 答案： 1). Case Is > 0 2). = "-" 3). Case 0 或 Case Else 或 Case Is = 0 〖第2题〗『程序填空』(1分)(题号:60) '------------------------------------------------------- '【程序填空】 '------------------------------------------------------- '功能：输入任何一个英文字母x, ' 若x的值为"a","c","d-f" ,则显示x的大写字母； ' 若x的值为"m","o","p-z",则显示x的小写字母； ' 若x的值为其它的值,则显示xa（如输入的X的值是g，则显示ga）。 '------------------------------------------------------- Private Sub Command1_Click() x = '**********SPACE********** 【】 '**********SPACE********** Case 【】 = UCase(x) Case "m", "o", "p" To "z" = LCase(x) Case Else '**********SPACE********** 【】 End Select End Sub 答案： 1). Select Case x 2). "a", "c", "d" To "f" 3). = Trim(x) + "a" 或 = x + "a" 〖第3题〗『程序填空』

vb课后练习答案习题解答 (5)

第5章数组与记录 5．1 填空题 1．若要定义一个包含10个字符串元素，且下界为1的一维数组s，则数组说明语句为（）。 答案：Dim s(1 To 10) As String 2．若要定义一个元素为整型数据的二维数组a，且第一维的下标从0到5，第二维下标从-3到6，则数组说明语句为（）。 答案：Dim a(0 To 5,-3 To 6) As Integer 3．如果数组元素的下标值为实数，则VB系统会按（）进行处理。 答案：四舍五入原则 4．数组元素个数可以改变的数组称为（）；数组元素可以存放不同类型数据的数组称为（）。 答案：可调数组、可变类型数组 5．数组刷新语句用于（）。若被刷新的数组是数值数组，则把所有元素置（）；若被刷新的数组为字符串数组，则把所有元素置（）。 答案：清除指定数组内容、０、空字符串 10．控件数组是由一组类型和（）相同的控件组成，共享（）。 答案：名字、同一个事件过程 11．控件数组中的每一个控件都有唯一的下标，下标值由（）属性指定。 答案：Index 12．建立控件数组有两种方法：（）和（）。 答案：在设计阶段通过相同Name属性值来建立、在程序代码中使用Load方法 5．2 选择题 1．下列一维数组说明语句错误的是（）。 a) Dim b(100) AS Double b) Dim b(-5 To 0) AS Byte c) Dim b(-10 To –20) AS Integer d) Dim b(5 To 5) AS String 答案：c 2．若有数组说明语句为：Dim a(-3 To 8)，则数组a包含元素的个数是（）。 a) 5 b) 8 c) 11 d) 12 答案：d 3．设有数组说明语句：Dim c(1 To 10)，则下面表示数组c的元素选项中（）是错误的。 a) c(i-1) b) c(5+0.5) c) c(0) d) c(10) 答案：c 4.下列数组说明语句中正确的是（）。 a) Dim a(-1 To 5,8)AS String b) Dim a(n,n)AS Integer c) Dim a(0 To 8,5 To –1)AS Single d) Dim a(10,-10)AS Double

《VB程序设计》考试题型练习 答案

《VB 程序设计》考试题型练习 一. 填空 1. VB 中的对象具有 属性 、 事件 、和 方法 三种特性，它们是构成对象的三个基本要素。 2. VB 中的常量分为哪三种： 文字常量 、 符号常量（用户自定义常量） 系统内部常量 。 3. 变量的三要素是指： 变量的名 、 变量的数据类型 、 变量的值 。 4. VB 中日期型数据的表示格式为： #mm/dd/YYYY#或#mm-dd-YYYY# 。 5. 在VB 中，“\”是 整除 运算符；“/”是 浮点除 运算符。两个字符串可以使用连接符 &或+ 串接起来。 6. 2 22z y x z y x ++++的VB 表达式为 （x+y+z ）/sqr(x^2+y^2+z^2) 。 7. a ac b b 242-+的VB 表达式为 (b+sqr(b^2-4*a*c))/(2*a) 。 8. 计时器控件的 Interval 属性用于设置Timer 事件发生的时间间隔，为了使计时器控件Timer1每隔0.5秒触发一次Timer 事件，应将该属性设置为 500 ；为了暂时关闭计时器，应把该计时器的 Enable 属性设置为False 。 二. 单选题 1. 如果要使VB 程序运行时不能对文本框中的内容进行编辑，需将文本框的哪个属性设置为True （ D ）。 A ）MultiLine B ）Visible C ）TabStop D ）Locked 2. 表达式Right("asdf", 2)+Ucase("as" )的值为（ A ）。 A ）dfAS B ）asAS C ）dfas D ）asas 3. 执行如下语句： a ＝InputBox("Today", "Tomorrow", "Yesterday") 将显示一个输入对话框，在对话框的输入区中的默认值是（ C ）。 A) Today B) Tomorrow C) Yesterday D) Today Tomorrow Yesterday 4. 设a=3，b=5，则以下表达式值为真的是（ B ）。 A) a>=b And b>10 B) (a>b) Or (b>0) C) (a<0) Or Not (b>0) D) (-3+5>a) And (b>0)

vb6.0练习题及答案

一、选择题 1．在设计应用程序时，可以查看到应用程序工程中的所有部分的窗口是（）。 A．窗体设计．代码C．属性D．工程资源管理器窗口>> 答案：d 2．窗体的Load事件的触发时机是（）。 A．用户单击窗体时B．窗体被加载时C．窗体显示之后D．窗口被卸载时>> 答案：ｂ 3．与传统的程序设计语言相比，Visual Basuc最突出的特点是（）。 A．结构化程序设计B．程序开发环境C．事件驱动编程机制D．程序调试技术 答案：C 4．VB6.0集成开发环境的主窗口不包括（）。 A．标题栏B．菜单栏C．状态栏D．工具栏 答案：c 5．如果对象的名称为Mytext，而且对象有一个属性Text，那么在代码中引用该属性的正确格式是（）。 A．Text.Mytext B．Mytext.text C．Mytext.（Text）D．Mytext*Text 答案：b 6．下列可以激活属性窗口的操作是（）。 A．用鼠标双击窗体的任何部位B．执行“工程”菜单中的“属性窗口”命令C．按Ctrl+F4 D．按F4键 答案：b d 7．假定已在窗体上画了多个控件，并有一个控件是活动的，为了在属性窗口中设置窗体的属性，预先应制造的操作是（）。 A．单击窗体上没有控件的地方B．单击任一个控件C．不执行任何操作D．双击窗体的标题栏 答案：a 8．如果在文本框中键入字符时，只显示某个字符，如星号（*），应设置文本框的（）属性。 A．Caption B．PasswordChar C．Text D．Char 答案：b 9．如果想让文本框中的内容在运行时不能编辑，需将文本框的（）属性设置为True。 A．Locked B．MultiLine C．TabStop D．Visible 答案：a 10．对于定时器（Timer）控件，设计其定时是否开启的属性是（）。 A．Index B．Tag C．Enabled D．Left 答案：c 11．要在窗体Form1内显示“myfrm”，使用的语句是（）。 A．Form.Caption=“myfrm”B．Form1.Caption=“myfrm”C．Form1.Print=“myfrm”D．Form.Print=“myfrm” 答案：ｂ 12．对象的性质和状态特性称为（）。 A．事件B．方法C．属性D．类 答案：c 13．下列正确的赋值语句是（）。 A．x+y=20 B．y=x+20 C．3x=y D．s=π*r*r

vb程序阅读题与填空题

VB程序阅读题与程序填空题综合练习 1、阅读下面程序，当单击窗体之后，窗体上输出的是。 Private Sub Form_Click( ) Dim i As Integer, j As Integer Dim k As Integer k=0 For i = 0 To 10 Step 3 For j = 1 To 10 If j > = 5 Then i = i +4: Exit For j = j + 1 k = k + 1 Next If i > 8 Then Exit For Next Print k End Sub 2、阅读下面的事件过程。单击窗体后，在文本框Text1和Text2中显示的内容分别 是和；若将程序中A语句与B语句的位置互换，再次执行程序，单击窗体后在Text1和Text2中显示的内容分别是和。 Private Sub Form_Click( ) Dim x As Integer, y As Integer x = 1 : y = 0 Do While x < 3 y = y + x 'A语句 x = x + 1 'B语句 Loop Text1.Text = x Text2.Text = y End Sub 3、下面程序段中，k循环共执行次，在窗体上显示的结果是。 Dim b As Integer, k As Integer b = 1 For k =1 To 5 b = b * k If b > = 15 Then Exit For Else

k = k + 1 End If Next k Print k, b 4、以下是按钮cmdl的Click事件过程，求1~100之间的所有质数。质数的个数显示在窗 体上，在划线处填上缺少的内容。 Private Sub cmdl_Click( ) Dim intNum As Integer, int1 As Integer, int2 As Integer intNum = 0 For int1 = For int2 = 2 To int1 \2 If (int1 Mod int2) = 0 Then intNum=1 End If Next If sNum = sNum + 1 End If Next Print End Sub 5、若命令按钮的名称为CmdExit，程序要求单击以上命令按钮时，程序停止运行。请在画线处中填入适当的内容。 Private Sub CmdExit_ ( ) End Sub 6、下面的事件过程判断文本框txt1中输入的数所在区间，并在文本框txt2中输出判断结果。在画线处填入正确的内容。 Private Sub Comandl_Click( ) Dim int1 As Integer int1 =val (txt1.Text) Select Case int1 Case txt2.Text = "值为0" Case txt2.Text = "值在1和10之间（包括1和10）" Case txt2.Text = "值大于10"

VB测验选择题真题精选

VB测验选择题真题精选

————————————————————————————————作者：————————————————————————————————日期：

VB考试真题精选，考前必备神器20 开通黄钻 21， a = 1: b = 2: plus S, a, b: Print S:不能使其输出结果为3的plus过程为( b )。（1分） A、Sub plus(sum, a , b ): sum = a + b: End Sub B、Sub plus(ByVal sum , a , b ): sum = a + b: End Sub C、Sub plus(sum , ByVal a, ByVal b ): sum = a + b: End Sub D、 D、Sub plus(sum , ByRef a , ByRef b ): sum = a + b: End Sub 22、通过关键字( c )声明的局部变量，在整个程序运行中一直存在。（1分） A、Dim B、Public C、Static D、Private 23、过程的作用域分为( c )。（1分） A、窗体级和局部级 B、模块级和局部级 C、窗体/模块级和全局级 D、窗体/模块级和局部级 24、在窗体的通用段声明变量时，不能使用( d )关键字。（1分） A、Dim B、Public C、Private D、Static 25、能在一个工程的所有程序中使用的变量，称为( b )。（1分） A、局部变量 B、全局变量 C、窗体级变量 D、模块级变量 27、使用Public Const语句声明一个全局的符号常量时，应该将该语句放在( b )。（1分）

VB题库-填空练习题

填空题 第1题表达式 1 and 0的值 ______________________ 答案： False 第2题把"Visual Basic程序设计"添加到列表框 lstBooks____________________________ 答案： lstBooks.AddItem "Visual Basic 程序设计" 第3题 For k=35 to 0 step 3 next k 语句的循环次数是_______________________答案：0 第4题 Val("123.55ab456")的值是多少 _____________________________ 答案：123.55 第5题每隔定时器控件的Interval属性值时间间隔,单位为毫秒,定时器会触发一次 ________________________事件 答案：Timer 第6题表达式(-3) And 8 的值为 _______________________. 答案：True 第7题 Print "x=" & (2=4) 的结果为 ________________________. 答案： x=False 第8题要使同一类型控件组成一个控件数组,必须要求_______________________. 答案： Name 相同或名称相同 第9题循环语句FOR K=1 TO 10 STEP –1控制的循环次数为___________________. 答案： 0 第10题设a=2,b=3,c=4,d=5,则NOT a<=c OR 4*c=b^2 AND b<> a+c 的值为______________. 答案： False 第11题声明定长为10个字符变量Sstr的语句为______________________. 答案： Dim Sstr as String*10 或 Sstr as String*10 第12题在VB中,若要将字符串"12345"转换成数字值应使用的类型转换函数是 ____________. 答案： VAL 或 Cint 第13题在一条Dim语句中可以声明多个变量,如Dim strVar,intVar,sngVar As Integer, 则strVar、intVar与sngVar的数据类型分别是Variant、Variant和_____________________. 答案： Integer 第14题滚动条控件主要支持两个事件,它们是scroll和____________________事件. 答案： change 第15题所有控件都具有的共同属性是 ____________________属性. 答案： name 〖第16题〗Visual Basic为添加到窗体上的第一个图片框picture提供的默认对象名为 ______. 答案： Picture1 〖第17题〗A和B同为正整数或同为负整数的VB 表达式为________________. 答案： A=INT(A)★AND★ B=INT(B)★ AND ★ A*B>0 〖第18题〗变量min@表示_______________类型的变量. 答案：货币数据变量或货币 〖第19题〗表达式 32\7 MOD 3^2 的值是____________________. 答案： 4 〖第20题〗把整型数1赋给一个逻辑型变量,则逻辑变量的值为___________________. 答案： True 〖第21题〗求x与y之积除以z的余数的VB表达式为_________________________. 答案： x*y★Mod★z 〖第22题〗以图片框Pic1的中心位置为圆心,以700为半径在Pic1上画一个圆的方法是 ______ 答案： pic1.Circle (pic1.width/2,pic1.height/2),700 〖第23题〗要使一个按钮设为默认按钮,应把此按钮的_____________属性的值设为True. 答案： Default 〖第24题〗在VB中,若要使一个文本框(Text)中的内容在超过文本框的宽度时能够自动换行显示,应当将这个文本框的______________属性的值设置为True. 答案： MultiLine 〖第25题〗设置计时器控件只能触发 ____________________事件. 答案： timer 〖第26题〗VisualBasic6.0用于开发 ____________________环境下的应用程序. 答案： WINDOWS

vb练习题及答案.doc

vb 练习题及答案 【篇一：vb 习题(含答案)】 lass=txt>1 、vb 程序中，通常不会产生错误提示的是( )。（1 分） a、编译错误 b、逻辑错误 c、运行时错误 d、实时错误 2、在设计阶段，双击窗体上任一空白处，打开的窗口是( )。（1 分） a、工程资源管理器窗口 b、代码窗口 c、工具箱窗口 d、属性窗口 3、下列说法中，正确的说法是( )。（1 分） a、窗体名称和该窗体文件名必须一致 b、窗体名称和该窗体文件名 可以不相同 c、窗体名称和该窗体文件名不能使用汉字 d、窗体名称不能使用汉字、但该窗体文件名能使用汉字 4、visual basic 有完备的help 联机帮助功能，可以通过按下功能 键( )得到帮助。（ 1 分） a、f9 b 、f8 c、f1 d 、f5 5、以下( )控件可作为容器使用。（ 1 分） a、label b 、picturebox c、textbox d 、image 6、将窗体的boderstyle 属性设置为( )可使窗口不显示标题栏。（ 1 分） a、0 b 、1 c、2 d 、5 7、文本框没有( )属性（1 分） a、text b 、name c、caption d 、borderstyle 23、下列( )是不合法的常量。（ 1 分） a、100 b 、10e02 c、100.0 d 、10e0.5 24、下列对变量的定义中，定义x 为变体型变量的是( )。（1 分） a、dim x as double b 、dim x c、dim x! d 、x%=23

25、设有如下变量声明：dim testdate as date ，为变量testdate 正确赋值的表达方式是( )。（1 分） a、textdate=#1/1/2002# b 、testdate=#1/1/2002# c、textdate=date(1/1/2002) d 、 testdate=format(m/d/yy,1/1/2002) 26、在立即窗口中运行以下语句，a=beijing :b=shanghai :print a,b 对其输出结果的描述中，正确的是( )。（1 分） a、beijing 和shanghai 中间没有空格 b、beijing 和shanghai 中 间有1 个空格 c、beijing 和shanghai 中间有 6 个空格 d、beijing 和shanghai 前面有7 个空格 27、语句段a=3: b=5:t=a ：a=b: b=t 执行后( )。（1 分） a、a 值为3，b 值为3 b 、a 值为3，b 值为5 c、a 值为5，b 值为5 d 、a 值为5，b 值为3 28、下列语句中，正确的是( )。（1 分） a、if x3*y and xy then y=x^3 b 、if x3*y and xy then y=3x c、if x3*y : xy then y=x^3 d 、if x3*y and xy then y=x**3 29、下面程序段dim x%: x=5: if x then y=x+1 else y=x 运行后， y 结果是( )。（1 分） a、5 b 、6 c、1 d 、显示出错信息 30、执行语句 a = inputbox(today, tomorrow, yesterday, 5, 5) ， 将显示一个输入对话框，在对话框的输入区中显示的信息是( )。（1 分） a、today b 、tomorrow c、yesterday d 、5 31、窗体上有一个命令按钮command1, 编写如下事件过 程: private sub command1_click() :x = val(inputbox(x=)) : y = inputbox(y=) : print x + y : end sub, 单击命令按钮，先后在两个输 入对话框中输入123 和321 ，窗体显示的内容是( )。（1 分） a、444 b 、123321 c、123+321 d 、出错信息 32、执行语句msgbox aaa, 2, bbb 后，所产生的消息框的标题是 ( )。（1 分） a、aaa b 、bbb

VB--过程练习题

《Visual Basic 程序设计》寒假作业 一、选择题 1．要想在过程调用后返回两个结果，下面过程定义语句中语法正确的是_______。 A． Sub swap(By Val m，By Val n) B． Sub swap(m, By Val n) C． Sub swap(m, n) D． Sub swap(By Val m, n) 2．在过程调用中，参数的传递可以分为按值传递和_______两种方式。 A．按参数传递 B．按数值传递 C．按地址传递 D．按位置传递 3．Sub过程与Function过程最根本的区别是_______。 … A． Sub过程可以直接使用过程名调用，而Function过程不可以 B． Function过程可以有参数，而Sub过程不可以 C．两种过程参数传递方式不同 D． Sub过程的过程名不能返回值，而Function过程能通过过程名返回值 4．在参数传递过程中，使用关键字_______来修饰参数，可以使之按值传递。 A． ByVal B． ByRef C． Value D． reference 5．可以执行“工具”菜单中的_______命令来建立通用过程。 A．添加过程 B．通用过程 C．添加模块 D．添加窗体 】 6．假定已定义一个过程Public Sub Cir(a As Single, b As Single),则正确的调用语句是_______。A，2 A． Cir 3,8 B． Call Cir x, y C． Call Cir 2*x, y D． Call Cir (3,8, y) 7. 在窗体上添加一个名称为Command1的命令按钮，再添加两个名称分别为Label1、Label2的标签，然后编写如下程序代码： Private x As Integer Private Sub Command1_Click() a = 6: b = 4 Call sub1(a, b) = a ： = b End Sub Private Sub sub1(ByVal x As Integer, ByVal y As Integer) a = x * x b = y * y End Sub 程序运行后单击命令按钮，则两个标签中显示的内容分别是_______。

VB选择题库(3)

1.不论哪种控件，共同具有的属性是Name 2.要使某控件在运行时不可显示，应对其设置的属性是Visible 3.要是窗体在运行时不可改变窗体的大小和没有最大化、最小化按钮，需设置的属性是Borderstyle 4.当程序运行时，系统自动执行启动窗体的事件过程是Load 5.要判断在文本框中是否按下了Enter键，应在文本框的Keypress 事件中判断 6.要使标签控件显示时不覆盖其背景内容，要对其设置的属性是Backstyle 7.复选框的Value属性为0时，表示复选框未被选中 8.将数据项“语文”添加到列表框（list1）中成为第一项应使用的语句是“List1.Addltem”“语文”，“0” 9.执行下面的程序,列表框中的数据项有“1，3” Sub Form_Click() For i = 0 To 4 List1.AddItem i Next For i = 0 To 2 List1.RemoveItem i Next End Sub 10.如果列表框（list1）中没有被选定的项目，则执行List1.RemoveItem List1.ListIndex语句的结果是 D A．移去第一项 B．移去最后一项 C．移去最后加入列表的项 D．其他都不对 11.下列可以把当前目录下的图形文件Pic1.jpg装入图片框Picture1中的语句为“Picture1. Picture=Load Picture(“”Pic1.jpg””)” 12.假定在图片框Picture1中装入了一个图形，为了清除该图形（不是删除图片框）应采用的正确方法是“执行语句Picture1. Picture =Load Picture(“””’”)” 13.当组合框的Style属性值设置为2时，其为下拉式列表框 14.要使定时器无效应将Interval属性取值为0 15.假定定时器控件的Interval属性为1000，Enable属性为Ture，并且有下面的事件过程 Private Sub Timer1_Timer() Beep End Sub 计算机将发出Beep声的次数为 A.1000次 B．0次 C．1次 D．其他都不对 16.下面语句能正确地把列表框list1从1数起的第4项的内容设置为“aaaa”的是“List1.List(3)=””aaaa””” 17. 下面语句能正确地把列表框list1从1数起的第3项的内容设置为“aaaa”的是“List1.List(2)=””aaaa””” 18.在窗体上画一个文本框，为了在程序运行后隐藏该文本框，应使用的语句为Text1.Visible=False 19.在窗体上画一个文本框Text1和一个标签Label1，要求程序运行后，如果在文本框输入字符，则立即在标签中显示相同的内容，一下可以实现上述操作的事件过程的是 “Private Sub Text1_Change() Lebel1.Caption = Text1.Text

程序设计语言VB单项选择题及答案

《程序设计语言VB》单选题 1. Visual Basic是一种面向（）的程序设计语言。 A. 用户 B. 事件 C. 程序 D. 对象 2.在Visual Basic6.0中规定工程文件的扩展名是（）。 A. vbp B. for C. frm D. bas 3. Visual Basic6.0中规定窗体文件的扩展名是（）。 A. for B. frm C. vbp D. bas 4.如何使一个标签或按钮控件在运行时不可用（）。 A. 把它的Visible属性设置成False B. 把它的Visible属性设置成True C. 把它的Enabled属性设置成False D. 把它的Enabled属性设置成True 5.控件的字体可在属性窗口的（）属性中调整？ A. Font B. Color C. Text D. Caption 6.若要将某命令按钮设置为默认命令按钮。则应设置为True的属性是（）。 A. Value B. Cancel C. Default D. Enabled 7.在VB中，记录对象数据的是（）。 A. 方法 B. 事件 C. 属性 D. 语句

8.在文本框上显示文本的属性是（）。 A. Value B. Text C. Print D. Enabled 9. InputBox函数返回值的类型为（）。 A. 字符串 B. 数值 C. 变体 D. 数值或字符串（视输入的数据而定） 10.设有语句：a = InputBox("请输入数值:","输入示例", "100") 程序执行后,若从键盘上输入数值20并按回车键,则变量a的值是（）。 A. 字符串"20" B. 字符串"120" C. 默认值100 D. 数值120 11.下列控件中可用于接受用户输入文本，又可用于显示文本的是（）。 A. Label控件 B. TextBox控件 C. Timer控件 D. CommandButton控件 12.语句PRINT "25*4"的输出结果是（）。 A. 25*4 B. "100" C. 100 D. 出现错误信息 13.只能用来显示字符信息的控件是（）。 A. 文本框 B. 标签框 C. 图片框 D. 图像框 14.下列可作为Visual Basic变量名的是（）。 A. A%A B. 4A C. ?xy D. Stemp 15.下列哪个符号不能作为VB中的变量名（）。 A. timefly B. pass4

vb真题(选择题)

1、下列叙述中，错误的是( A )。（1分） A、一条语句可以分为多行书写，但要在上行末加上VBCrLf B、在同一行上书写多条语句，应在两两语句中加上:号 C、可以用Rem或'注释单行语句 D、VB程序代码不区分字母的大小写 2、下列叙述正确的是( D )。（1分） A、Visual Basic的事件是由用户定义的 B、Visual Basic程序从主窗体开始执行 C、Visual Basic程序是过程驱动的 D、保存一个Visual Basic程序，应分别保存其窗体模块、标准模块和工程文件 3、被对象所识别的动作与对象可执行的动作分别称为对象的( A )。（1分） A、方法、事件 B、事件、方法 C、事件、属性 D、过程、属性 4、下列关于VB编码规则的叙述中，正确的是( C )。（1分） A、一条语句可以分为多行书写 B、多条语句不能书写在同一行上 C、每条语句以分号;结尾 D、应用程序代码字母是区分大小写的 5、( D )不属于面向对象系统的三要素。（1分） A、事件 B、属性 C、方法 D、变量 6、下列叙述中，不正确的叙述是( C )。（1分） A、注释语句是非执行语句，仅对程序的有关内容起注释作用，客观存在不被解释和编译 B、注释语句能放在整个代码程序的最后 C、注释语句可以放在代码中的任何位置 D、代码中加入注释语句的目的是提高程序的可读性 7、下列叙述错误的是( B )。（1分） A、不允许使用行号与标号 B、单条语句可分行书写 C、同一行上可以书写多条语句 D、VB代码不区分字母的大小写 8、窗体设计器是用来设计( B )。（1分） A、应用程序的代码段 B、应用程序的界面 C、对象的属性 D、对象的事件 9、启动Visual Basic后，系统为用户新建的工程起一个名为( A )的临时名称。（1分） A、工程1 B、窗体1 C、工程 D、窗体 10、在界面设计时，双击窗体中的对象后，Visual Basic将显示的窗口是( C )。（1分） A、立即窗口 B、属性窗口 C、代码窗口 D、工程资源管理器窗口 11、VB应用程序在( A )模式下不能编辑代码和设计界面。（1分） A、运行 B、中断 C、设计 D、以上均不能 12、如果要向工具箱中加入控件的部件，可以利用“工程”菜单中的( B )命令（1分） A、引用 B、部件 C、工程属性 D、加窗体 13、如果Visual Basic环境中缺少某个窗口，一般应该从主菜单的( D )下拉菜单中寻找并打开。（1分） A、编辑 B、文件 C、调试 D、视图 14、标准控件不包括( D )控件。（1分） A、驱动器列表框 B、目录列表框 C、文件列表框 D、通用对话框 15、在设计窗体时，如果窗体上没有显示网格会感到不方便，( c )可以使网格出现。（1分） A、使用“编辑”菜单上的相关命令 B、使用“格式”菜单上的相关命令 C、使用“工具”菜单上的相关命令 D、使用“工程”菜单上的相关命令 16、在Visual Basic中，某一事件对应的程序叫( b )。（1分）