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

75．下列程序段的执行结果为______。 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

76．ControlBox属性只适用于窗体，当窗体的______属性设置为0-None时， 则ControlBox属性不起作用。 a) Borderstyle b) Autoredraw c) Windowstate d) Enabled 答案：A

77．删除字符串前导和尾随空格的函数是______。 a) Ltrim() b) Rtrim() c) Trim()

d) Lcase() 答案：C

78．不能作为容器的对象是_____。 a) 窗体 b) 框架 c) 图片框

d) 图像框 答案：D

79．表达式2*3^2+2*8/4+3^2的值为_____。 a) 64 b) 31 c) 49

d) 22 答案：B

80．如有数组声明语句Dim a(2,-3 to 2,4)，则数组a包含元素的个数是_____。

a) 40 b) 75 c) 12

d) 90 答案：D

81．若x是一个正实数，对x的第3位小数四舍五入的表达式_____。 a) 0.01*Int(x+0.005)

b) 0.01*Int(100*(x+0.005)) c) 0.01*Int(100*(x+0.05)) d) 0.01*Int(x+0.05) 答案：B

82．通用对话框中能打开“颜色对话框”的方法是______。 a) ShowOpen b) ShowColor c) ShowSave

d) ShowPrinter 答案：B

83．如果要改变窗体的标题,需要设置窗体对象的________属性。 a) Name b) Caption c) BackColor

d) BorderStyle 答案：B

84．如果有数组声明 Dim a(10) As Integer，则该数组共有______个元素。 a) 10 b) 11 c) 9

d) 不确定 答案：B

85．下列程序段的执行结果为___。 X=5 y=-20

if not x>0 then x=y-3 else y=x+3

print x-y;y-x end if a) -3 3 b) 5 -8 c) 3 -3

d) 25 -25 答案：A

86．Inputbox()函数的返回值类型为_____。 a) 数值型 b) 字符型 c) 逻辑型

d) 变体型 答案：B

87．下列程序的执行结果为_____。 Dim S As Integer,n As Integer S=0:n=1

Do While n<=100 S=S+n n=n+1 Loop Print S a) 5050 b) 2500 c) 3000

d) 4000 答案：A

88．设执行以下程序段时依次输入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

89．菜单控件只包括一个事件，即 （1) ，当用鼠标单击或键盘选中后按“回车”键 时触发该事件，除分隔条以外的所有菜单控件都能识别该事件。C A、GotFocus B、Load C、Click D、KeyDown

90．滚动条控件(如图所示)的Max属性所设置的是 （2) 。

A、滚动框处于最右位置时，一个滚动条位置的Value属性最大设置值 B、 单击滚动条和滚动箭头之间的区域时，滚动条中滚动块的最大移动量 C、单击滚动条的箭头区域时，滚动条中滚动块的最大移动量 D、滚动条控件无该属性

91．编写如下事件过程：

Private Sub Form_MouseDown(Button As Integer ,Shift As Integer,X As Single,Y As Single) If Shift=6 And Button=2 Then Print \ End If End Sub

程序运行后，为了在窗体上输出\，应在窗体上执行以下_______操作。 a) 同时按下 Shift 键和鼠标左键 b) 同时按下 Shift 键和鼠标右键 c) 同时按下Ctrl、Alt 键和鼠标左键

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

92．当变量x=2,y=5时，以下程序的输出结果为____。 Do until y>5 x=x*y y=y+1 loop print x a) 2 b) 5 c) 10

d) 20 答案：C

93．如下有一段不完整的程序段，如果要求该程序执行3次循环，则应在程序中的括号里输入______。 X=1 do

x=x+3 print x

loop until(___) a) x>=8 b) x<=8 c) x>=7

d) x<=7 答案：A

94．没有Caption属性的控件是_____。