VB题练习题，麻烦各位大神帮帮忙

8 下面程序运行后的结果是（4）

a=Array(1,2,3,4,5)

print a(a(2))

11 下面程序有错的一行（redim a%(1 to 4),i%）

redim a%(1 to 4),i%

for i=1 to 4 step 16 '第A行

a(i)=2i ’第B行

next i ‘第C行

if a(2) then print a(2) '第D行

14 下面程序运行后的输出结果是（）

dim a(3,3),i%,j%

for i=1 to 3

for j=1 to 3

if i+j=4 or i=j then a(i,j)=0 else a(i,j)=1

print a(i,j);

next j

print

next i

0 1 0

1 0 1

0 1 0

16 下面程序运行后的结果（105）

dim a,f%,i%

a=Array(1,"3","5",7)

f=1

for i=LBound(a) to UBound(a)

f=fa(i)

next i

print f

17 下面程序的功能是将一维数组中的6个数逆序存放并输出。完成填空。

dim a, i%,j%,t%

a=array(1,2,3,4,5,6)

i=0:j=5

Do While(_)

t=a(_)

a(_)=a(_)

a(_)=(_)

i=i+1

(_)

loop

for i=0 to 5

print a(i);

next i

Dim a, i%, j%, t%

a = Array(1, 2, 3, 4, 5, 6)

i = 0: j = 5

Do While (i < 3)

t = a(i)

a(i) = a(j)

a(j) = t

i = i + 1

j = j - 1

Loop

For i = 0 To 5

Print a(i);

Next i

Private Sub Command1_Click(Index As Integer)

Dim a As Integer

  Randomize

a = Rnd 3

'0代表剪刀  1代表石头  2代表布

Select Case a

Case 0

  If Index = 2 Then Text1Text = "你输了"

  If Index = 0 Then Text1Text = "平手"

  If Index = 1 Then Text1Text = "你赢了"

Case 1

  If Index = 0 Then Text1Text = "你输了"

  If Index = 1 Then Text1Text = "平手"

  If Index = 2 Then Text1Text = "你赢了"

Case 2

  If Index = 1 Then Text1Text = "你输了"

  If Index = 2 Then Text1Text = "平手"

  If Index = 0 Then Text1Text = "你赢了"

End Select

Command1(0)Enabled = False

Command1(1)Enabled = False

Command1(2)Enabled = False

End Sub

Private Sub Command2_Click()

Text1Text = ""

Command1(0)Enabled = True

Command1(1)Enabled = True

Command1(2)Enabled = True

End Sub

Private Sub Command3_Click()

End

End Sub

题号:1 题型:单选题

内容:

下列选项中不正确的是

选项:

c、当用 Show方法显示窗体时，必定会发生Load事件

题号:2 题型:单选题

内容:

当目录列表框的Dir1Path属性的改变，将会触发下列哪一个事件

选项:

c、Dir1_Change事件

题号:3 题型:单选题

内容:

计时器控件的Interval属性可以设定Timer 事件触发的时间间隔，其时间间隔以下列哪一个为单位

选项:

a、毫秒

题号:4 题型:单选题

内容:

对象的边框类型由下列哪个属性设置

选项:

c、BorderStyle

题号:5

内容:如下运算中运算优先级最高的是：

图形:

选项:

d、^

题号:6 题型:单选题

内容:

在使用MsgBox输出时，如果按钮位置是空（默认参数），则相当于使用了参数

选项:

b、VbOkOnly

题号:7 题型:单选题

内容:

当文本框的ScrollBars属性设置了非零值，却没有效果，原因是

选项:

b、文本框的MultiLine属性为False

题号:8 题型:单选题

内容:

CLS可清除窗体或图形框中下列哪一个的内容

选项:

c、程序运行时产生的图形和文字

题号:9 题型:单选题

内容:

要使某控件在运行时不可显示，应对下列哪个属性进行设置

选项:

b、Visible

题号:10 题型:单选题

内容:

用来设置粗体字的属性是

选项:

c、FondBold

题号:11 题型:是非题 本题分数:5

内容:

当数组作为函数过程的参数时，既能以传值方式传递，也能以传址方式传递

选项:

1、 错

--------------------------------------------------------------------------------

题号:12 题型:是非题

内容:

复选框的Value属性为True时，复选框被选中

选项:

2、 对

题号:13 题型:是非题

内容:

窗体、框架、框、图像框都是容器对象

选项:

1、 错

题号:14 题型:是非题

内容:

在属性窗口中可以修改对象的属性

选项:

2、 对

题号:15 题型:是非题

内容:

类是对象的具体化

选项:

2、 对

题号:16 题型:是非题

内容:

文本框控件的MaxLength属性值为0时，在文本框中不可以输入任何字符

选项:

2、 对

题号:17 题型:是非题

内容:

若设置文本框的PasswordChar属性值为某个字符，则用户无论输入何种字符，在文本框中，全部显示为该字符

选项:

2、 对

题号:18 题型:是非题

内容:

程序流程图是唯一一种描述程序执行过程的图形

选项:

1、 错

题号:19 题型:是非题

内容:

If和End If必须成对使用，有一个If就必须有一个End If与之相对应

选项:

1、 错

题号:20 题型:是非题

内容:

VB中建立窗体菜单可以选择“工具”菜单的“菜单编辑器”命令来完成

选项:

2、 对

以上就是关于VB题练习题，麻烦各位大神帮帮忙全部的内容，包括:VB题练习题，麻烦各位大神帮帮忙、vb编程题、VB程序设计 题目等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！