在窗体上放置一个命令按钮Command1，并编写下列单击事件的程序： Option Base 1Private Sub Comman

在窗体上放置一个命令按钮Command1，并编写下列单击事件的程序：

Option Base1

Private Sub Command1_Click()

Dim c As Integer,d As Integer

d=0

c=6

X=Array(2,4,6,8,10,12)

For i=1 To 6

If X(i)＞c Then

d=d+X(i)

c=X(i)

Else

d=d-c

End If

Next i

Print d

End Sub

程序运行后，单击命令按钮，则在窗体上输出的内容为()。

A．10

B．12

C．16

D．20

在窗体上放置一个命令按钮Command1，并编写下列单击事件的程序：

Option Base 1

Pdvate Sub Command1_Click()

Dim c As Integer,d As Integer

d=0

c=6

X=Array(2,4,6,8,10,12)

For i=1 To 6

If X(i)＞c Then

d=d+X(i)

c=X(i)

Else

d=d-c

End If

Next i

Print d

End Sub

程序运行后，单击命令按钮，则在窗体上输山的结果是()。

A．10

B．12

C．16

D．20

在窗体上放置一个命令按钮Command1，并编写下列单击事件的程序： Option Base 1 Private Sub Command1_Click() Dim c As Integer,d As Integer d=0 c=6 X=Array(2,4,6,8,10,12) For i=1 To 6 If X(i)＞c Then d=d+X(i) c=X(i) Else d=d-c End If Next j Print d End Sub 程序运行后，单击命令按钮，则在窗体上输出的内容为()。

A．10

B．12

C．16

D．20

ommand1_Click() Dim c As Integer,d As Integer d=0 c=6 X=Array(2,4,6,8,10,12) For i=1 To 6 IfX(i)＞c Then d=d+X(i) c=X(i) Else d=d-c End If Next i Print d End Sub 程序运行后，单击命令按钮，则在窗体上输出的结果是 。A.10 B.12 C.16 D.20

nd1_Click() Dim c As Integer ， d As Integer d = 0 c = 6 X = Araay(2,4,6,8,10,12) For i = 1 To 6 If X（i）＞ c Then d = d + X（i） c = X（i） Else d = d - c End If Next i Print d End Sub程序运行后，单击命令按钮，则在窗体上输出的内容为A. 10 B. 12 C. 16 D. 20

在窗体上有一个名称为Command1的命令按钮，并有如下程序：程序执行时，单击命令按钮Command1三次后，窗体上显示的结果为（）。

A. 5 16

B. 5 6

C. 15 15

D. 15 6

A.空白

B.错误提示

C.绿色

D.白色

在窗体上添加一个命令按钮(名为Command1)和一个文本框(名为Text1)，并在命令按钮中编写如下事件代码：

Private Sub Command1_Click()

m＝2.17

n＝Len(Str$(m)+Space(5))

Me!Text1＝n

End Sub

打开窗体运行后，单击命令按钮，在文本框中显示()。

A．5

B．8

C．9

D．10

在窗体上面有一个命令按钮，名称为Command1，单击该命令按钮时，执行如下事件过程：

在弹出信息框的标题栏中显示的信息是（）。

A．softwareand hardware

B．software

C．hardware

D．1

在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Command1_Click() a = 12345 Print Format$(a, "000.00") End Sub 程序运行后，单击命令按钮，窗体上显示的是

A． 123.45

B．12345.00

C．12345

D．00123.45