最新版精选2019VisualBasic程序设计期末测试题库200题(含答案)

2019年Visual Basic 程序设计期末测试复习题200题

[含答案]

一、选择题

1．在程序中使用日期型数据时，必须用符号____将日期型数据括起来。

a) @

b) $

c) %

d) # 答案：D

2．以下哪个是合法的变量名_______。

a) Len

b) Test@qw

c) 6cost_1

d) count2s 答案：D

3．下列程序运行后，变量s的值为______。

J=0:s=0

For I=1 To 4

j=j+I

s=s+j

Next I

a) 20

b) 10

c) 5

d) 15 答案：A

4．下列程序段的执行结果是_____。

N=10

For k=n To 1 Step-1

x=Sqr(k)

x=x-2

Next k

Print x-2

a) -3

b) -1

c) 1

d) 1.16 答案：A

5．可以通过_____来删除列表框中的选择项。

a) Enable属性

b) RemoveItem方法

c) AddItem方法

d) Text属性 答案：B

6．写列选项中，合法的变量是______。

a) c%aaa

b) sum_3

c) Else

d) 5persons 答案：B

7．下面的运算符中，哪个是关系运算符______。

a) Not

b) mod

c) <>

d) & 答案：C

8．整型变量占用的字节数为______。

a) 2个字节

b) 3个字节

c) 4个字节

d) 5个字节 答案：A

9．8.6787E+8写成普通的十进制数是_______。

a) 86787000

b) 867870000

c) 8678700

d) 8678700000 答案：B

10．下列数据中哪一个是布尔常量_______。

a) 123

b) not

c) TRUE

d) xyz 答案：C

11．下列数据类型不可能占8个字节的是_____数据类型。

a) Date

b) Long

c) Double

d) Currency 答案：B

12．下列控件不能改变大小的有_______。

a) TextBox

b) Label

c) Timer

d) PictureBox 答案：C

13．若要将窗体隐藏起来，则实现的方法为_______。

a) Unload

b) Show

c) WindowsState

d) Hide 答案：D

14．若要使标签的大小自动适应所显示的文本，可通过设置______属性的值来实现。

a) AutoSize

b) Alignment

c) Enabled

d) Visble 答案：A

15．以下不属于Visual Basic系统的文件类型是

a) .frm

b) .cls

c) .bat

d) .vbp 答案：C

16．要想改变一个窗体的标题内容，则应该设置______属性的值。

a) Name

b) Fontname

c) Caption

d) Text 答案：C

17．以下选项中，是Visual Basic控件的是_____。

a) 文本框

b) Print

c) Click

d) Debug 答案：A

18．假设变量BOOLVAR是一个布尔型变量，则下面正确的赋值语句是?

a) BOOLVAR=‘TRUE’

b) BOOLVAR=.TRUE

c) BOOLVAR=#TRUE#

d) BOOLVAR=False

答案：D

19．下面的运算符中，哪个是算术运算符_______。

a) Mod

b) =

c) Eqv

d) Xor 答案：A

20．在Visual Basic中按文件的访问方式不同，可以将文件分为_______。

a) 顺序文件、随机文件和二进制文件

b) 文本文件和数据文件

c) 数据文件和可执行文件

d) ASCII文件和二进制文件 答案：A

21．在Visual Basic中，要设置菜单项的快捷访问键，应使用哪个符号：______。

a) &

b) *

c) $

d) @ 答案：A

22．在Visual Basic设计界面中不能隐藏的窗口是______。

a) 工程窗口

b) 属性窗口

c) 立即窗口

d) 窗体窗口 答案：A

23．运行VB程序的快捷键为_______。

a) F4

b) F5

c) F6

d) F7 答案：B

24．以下程序输出的结果为______。

X=1

y=4

Do Until y>4

x=x*y

y=y+1

Loop

Print x

a) 4

b) 8

c) 12

d) 16 答案：A

25．用于获得字符串S从第4各字符开始的4个字符的函数是______。

a) Mid(S,4,4)

b) Middle(S,4,4)

c) Midstr(S,4,4)

d) MiddleStr(S,4,4) 答案：A

26．下列______语句可以将变量A、B的值互换。

a) A=B:B=A

b) A=A+B:B=A-B:A=A-B

c) A=C:C=B:C=A

d) A=(A+B)/2:B=(A-B)/2 答案：B

27．窗体能响应的事件是_______。

a) ActiveFrom

b) Drive

c) Load

d) Change 答案：C

28．单精度浮点数占用的字节数为______。

a) 2个字节

b) 3个字节

c) 4个字节

d) 8个字节 答案：C

29．对象是一个逻辑实体，它是______的集合。

a) 数据

b) 代码

c) 数据与代码

d) 属性 答案：C

30．改变驱动器列表框的Drive属性值将激活_____事件。

a) Change

b) Scroll

c) KeyDown

d) KeyUp 答案：A

31．不能触发滚动条Change事件的操作是_______。

a) 拖动滚动块

b) 单击两端箭头

c) 单击滚动块

d) 单击箭头与滚动块之间的滚动条 答案：C

32．在使用菜单编辑器设计菜单时，必须输入的项是____。

a) 标题

b) 名称

c) 索引

d) 快捷键 答案：B

33．用于获取字符串长度的函数是_______。

a) Len()

b) Length()

c) Strlen()

d) Lofo() 答案：A

34．VB应用程序的运行模式是

a) 解释运行模式

b) 编译运行模式

c) 两者都有

d) 汇编模式 答案：C

35．下列是一个循环结构的程序，循环体内的语句将执行_____次。

K=0

For I=1 to 10

For j=1 to 100

K=K+1

Next j

Next I

a) 0

b) 10

c) 100

d) 1000 答案：D

36．将任意一个正的两数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) 答案：A

37．INT（100*RND（1))产生的随机整数的闭区间是

a) [0，99]

b) [1，100]

c) [0，100]

d) [1，99] 答案：A

38．设A=”abcdefghijklm”，下面（)的函数值为”jklm”。?

a) Mid(A,10,4)

b) Ringht(A,5)

c) Ringht(A,1,4)

d) Left(A,10,4) 答案：A

39．启动Visual Basic后，系统为用户新建的工程起一个名为（)的临时名称

a) 工程1

b) 窗体1

c) 工程

d) 窗体 答案：A

40．下列哪项是窗体对象的方法而不是属性（)

a) Name

b) Print

c) Caption

d) Enabled 答案：B

41．下列叙述正确的是（ )

a) 对象是包含数据又包含对象数据进行操作的方法的物理实体

b) 对象的属性只能在属性窗口中设置

c) 不同的对象能识别不同的事件

d) 事件过程都要由用户点击对象来触发 答案：C

42．下列关于属性设置的叙述错误的是：（)

a) 一个控件具有什么属性是VB预先设计好的，用户不能改变

b) 一个控件具有什么属性是VB预先设计好的，用户可以改变

c) 一个控件的属性即可以在属性窗口中设置，也可以用程序代码设置

d) 一个控件的属性在属性窗口中设置，还可以利用程序代码为其设置新值

43．能够改变窗体边框线类型的属性是（ )

a) FontStyle

答案：A

b) BorderStyle

c) BackStyle

d) Border 答案：B

44．决定控件上文字的字体、字形、大小及效果的属性是（)

a) TEXT

b) CAPTION

c) NAME

d) FONT 答案：D

45．变量未赋值时，数值型变量的值为( )

a) 0

b) 空

c) 1

d) 0.1 答案：A

46．以下（)程序段可以实施X、Y变量值的变换

a) Y=X：X=Y

b) Z=X：Y=Z：X=Y

c) Z=X：X=Y：Y=Z

d) Z=X：W=Y：Y=Z：X=Y 答案：C

47．语句PRINT?“SGN（-26)=”；SGN（-26)的输出结果为

a) SGN（-26)=26

b) SGN（-26)=-26

c) SGN（-26)=+1

d) SGN（-26)=-1 答案：D

48．下列语句中正确的是

a) +=

b) =cmdok

c) n=1234

d) a=inputbox(hello) 答案：D

49．若要使标签控件显示时，不覆盖其背景内容，应设置标签控件的（)属性

a) BACKCOLOR

b) BORDERSTYLE

c) FORECOLOR

d) BACKSTYLE 答案：D

50．叹釘哏

说法不正确的是

a) 必须是字母开头，不能是数字或其他字符

b) 不能用Visual Basic 保留字

c) 可以包含字母、数字、下划线和标点符号

d) 不能超过255个字符 答案：C

51．VB 6.0中，执行下面的四个语句时出现错误的是_____。

a) x=SGN(0)

b) x=SQR(0)

c) x=LOG(0)

d) x=SIN(0) 答案：C

52．假定Picture1和Text1分别为图片框和文本框的名称，下列不正确的语句是_______。

a) Print 25

b) 25

c) 25

d) 25 答案：C

53．表达式25.26 MOD 6.98的值是_____。

a) 1

b) 5

c) 4

d) 提示错误信息 答案：C

54．当x=-5时，下列语句y=iif(x>0,x^2+1,x-1)执行后y的值_____。

a) 0

b) 26

c) -6

d) 4 答案：C

55．如果x是一个正实数，对x的第二位小数四舍五入的表达式是_____。

a) 0.1*Int(x+0.05)

b) 0.1*Int(10*(x+0.05))

c) 0.1*Int(100*(x+0.5))

d) 0.1*Int(x+0.5) 答案：B

56．若x=5,y=6,则表达式x+y=11的值是_____。

a) x+y=11

b) 11

c) True

d) False 答案：C

57．列表框中的列表项的数目可通过以下哪个属性的值获得_____。

a) Count

b) Listcount

c) Listindex

d) Index 答案：B

58．表达式2+3*4^5-SIN（X+1)/2中最先进行的运算是?

a) 4^5

b) 3*4

c) x+1

d) SIN 答案：C

59．能够改变窗体边框线类型的属性是_____。

a) Fontstyle

b) Borderstyle

c) Backstyle

d) Border 答案：B

60．命令按钮Command1 的Caption属性为“退出（x)”，要将命令按钮的快捷键设为

Alt+x,应修改Caption属性为_________。

a) 在x前插入&

b) 在x后插入&

c) 在x前插入 #

d) 在x后插入# 答案：A

61．如果有声明Option base 1 dim arr(3,3),则该数组共有_____个元素。

a) 16

b) 9

c) 4

d) 6 答案：B

62．下列对象中没有焦点属性的是（???)

a) 命令按钮控件

b) 窗口控件

c) 文本框控件

d) 单选框控件 答案：B

63．文本框控件中将Text的内容全部显示为所定义的字符的属性项是（?? )

a) PasswordChar

b) 需要编程来实现

c) Password

d) 以上都不是 答案：A

64．下列赋值语句正确的是（?? )

a) =+?

b) =+?

c) n=n+n?

d) =+? 答案：A

65．要清除组合框Combol中的所有内容，可以使用( )语句

a)

b)

c)

d) ? 答案：B

66．将字符串“hello”添加到列表框的最后，可使用（)请语句。

a) m“hello”,unt-1

b) m“hello”,unt+1

c) m“hello”,dex

d) m“hello” 答案：D

67．在VB6.0中，12345678的类型中是______。

a) 整数型

b) 长整数型

c) 字符串型

d) 日期型 答案：B

68．15.52的结果是_____。

a) 1

b) 1.5

c) 7

d) 8 答案：D

69．用InputBox函数可帮助生成_______。

a) 消息框

b) “保存”对话框

c) 简单输入框

d) “颜色”对话框 答案：C

70．______对象不能响应Click事件。

a) 列表框

b) 图片框

c) 窗体

d) 计时器 答案：D

71．_____控件可以使用SetFocus()方法。

a) Frame

b) Label

c) TextBox

d) Timer 答案：C

72．下列程序段的执行结果为______。

K=0

For J=1 to 2

For I = 1 to 3

K =I+1

Next I

For I = 1 to 7

K = K+1

Next I

Next J

Print K

a) 10

b) 6

c) 11

d) 16 答案：C

73．下列程序段的执行结果为_______。

M=0

For I=1 To 3

For J =5 To 1 Step-1

N = N+1

Next J,I

Print N;J;I

a) 12 0 4

b) 15 0 4

c) 12 3 1

d) 15 3 1 答案：B

74．下面四个选项，不是事件的是______。

a) Click

b) Visibale

c) Unload

d) Change 答案：B

75．下列程序共执行了________循环。

Dim intsum As Integer

Dim I As Integer

Dim j As Integer

For I=1 To 10 Step 2

For j=1 To 5 Step 2

intsum=intsum+j

Next j

Next I

a) 10

b) 20

c) 25

d) 15 答案：D

76．以下程序输出1到1000之间所有的偶数之和，请补充完该程序。

Private Sub Command_Click()

Dim x As Double

For I=0 To 1000

If ____ Then

x=x+I

End If

Next I

Print x

End Sub

a) i Mod 2 = 0

b) x Mod 2 = 0

c) I Mod 2 <> 0

d) x Mod 2 <> 0 答案：A

77．19.5 Mod 2*2的运算结果是_____。

a) 3.5

b) 1

c) 3

d) 0 答案：D

78．Cint函数返回值类型是_____。

a) 整型

b) 字符串

c) 变体

d) 双精度浮点型 答案：A

79．ControlBox属性只适用于窗体，当窗体的______属性设置为0-None时，

则ControlBox属性不起作用。

a) Borderstyle

b) Autoredraw

c) Windowstate

d) Enabled 答案：A

80．Inputbox()函数的返回值类型为_____。

a) 数值型

b) 字符型

c) 逻辑型

d) 变体型 答案：B

81．Inputbox函数的参数中，必选参数Prompt的作用是_____。

a) 输出信息

b) 定义提示信息

c) 定义隐含信息

d) 定义输入的位置 答案：B

82．Rnd函数不可能产生的值是_____。

a) 0

b) 1

c) 0.1234

d) 0.00005 答案：B

83．下列程序段运行后，输出结果是____。

B=1

Do until b>7

b=b*(b+1)

Loop

Print b

a) 7

b) 39

c) 42

d) 1 答案：C

84．下面程序段的循环结构执行后， 的输出值是_____。

程序段为：

For I=1 to 10 step 2

y=y+I

Next I

print I;

a) 25

b) 10

c) 11

d) 因为Y的初值不知道，所以不确定 答案：C

85．设执行以下程序段时依次输入1、3、5，执行结果为_____。

Dim a(4) As Integer

Dim b(4) As Integer

For K =0 To 2

a(K+1) =Val(InputBox(“请输入数据："))

b(3-K) =a(K+1)

Next K

Print b(K)

a) 1

b) 3

c) 5

d) 0 答案：A

86．编写如下事件过程：

Private Sub Form_MouseDown(Button As Integer ,Shift As Integer,X As Single,Y As Single)

If Shift=6 And Button=2 Then

Print "Hello"

End If

End Sub

程序运行后，为了在窗体上输出"Hello"，应在窗体上执行以下_______操作。

a) 同时按下 Shift 键和鼠标左键

b) 同时按下 Shift 键和鼠标右键

c) 同时按下Ctrl、Alt 键和鼠标左键

d) 同时按下 Ctrl、Alt 键和鼠标右键 答案：D

87．如下有一段不完整的程序段，如果要求该程序执行3次循环，则应在程序中的括号里

输入______。

X=1

do

x=x+3

print x

loop until(___)

a) x>=8

b) x<=8