更多"在窗体上画一个通用对话框图，其Name属性为Cont,瑞画一个命令按钮"的相关试题:
[单项选择]在窗体上画一个通用对话框图，其Name属性为Cont,瑞画一个命令按钮，Name属性为Command1，然后编写如下事件过程：
Privute Sub Command1_Click( )
Cont．FileName=" "
Cont．Flags=vbOFNFileMustExist
Cont．Filter="All Files| * . *"
Cont．FilterIndes_3
Cont．DialogTitle="Open File"
Cont．Action=1
If Cont．FileName=" " Then
MsgBox "No file selected"
Else
Open Cont．FileName For Input As #1
Do While Not EOF(1)
Input #1. b$
Print b$
Loop
End If
End Sub
以下各选项，对上述事件过程描述错误的是( )。
A. ++i;
B. D--；
C. c++；
D. --f；
[单项选择]在窗体上画一个通用对话框，其Name属性为Cont，再画一个命令按钮，Name属性为Command1，然后编写如下事件过程：
Private Sub Command1 Click（ ）
Cont.FileName=" "
Cont.Flags=vbOFNFileMustExist
Cont.Filter="All Filesl|*．*"
Cont.FilterIndex=3
Cont.DialogTitle="Open File"
Cont.Action=1
If Cont.FileName=" " Then
MsgBox "No file selected"
Else
Open Cont.FileName For Input As # 1
Do While Not EOF(1)
Input # 1,b$
Print b$
Loop
End If
End Sub
以下各选项，对上述事件过程描述错误的是( )
A. 该事件过程用来建立一个Open对话框，可以在这个对话框中选择要打开的文件
B. 选择后单击“打开”按钮，所选择的文件名即作为对话框的FileName属性值
C. Open对话框不仅用来选择一个文件，还可以打开、显示文件
D. 过程中的“Cont.Action=1”用来建立Open对话框，它与Cont.ShowOpen等价
[填空题]在窗体上画一个命令按钮(其Name属性为Commandl)，然后编写如下代码：
Private Sub Commandl_Click（ ）
DimM(10)As Integer
Fork=1 To 10
M(k)=12-k
Nextk
x=6
PrintM(2+M(x))
End Sub
程序运行后，单击命令按钮，输出结果是______。
[单项选择]在窗体上画一个命令按钮（其NAME属性为Command1），然后编写如下代码:
Option Base 1
Private Sub Command1_Click（ ）
Dim a
s = 0
a = Array(1,2,3,4)；j = 1
For i = 4 To 1 Step -1
s = s + a(i) * j
j = j * 10
Next i
Print s
End Sub
运行上面的程序，单击命令按钮，其输出结果是（ ）。
A. 4321
B. 1234
C. 34
D. 12
[单项选择]在窗体上画一个命令按钮(其Name属性为Command1)，然后编写如下代码： Option Base 1 Private Sub Command1_Click（ ） Dim a(4, 4) For i = 1 To 4 For j = 1 To 4 a(i, j) = (i-1) * 3 + j Next j Next i For i = 3 To 4 For j = 3 To 4 Print a(j, i); Next j Next i End Sub 程序运行后，单击命令按钮，其输出结果为 ______。
A. 6 9 7 10
B. 7 10 8 11
C. 8 11 9 12
D. 9 12 10 13
[填空题]在窗体上画一个命令按钮(其Name属性为Commandl)，然后编写如下代码：
Private Sub Commandl_Click（ ）
Dima(5)
Fori=0 To 4
A(i)=i+1
t=i+1
If t=3 Then
Print a(i)
A(t-1)=a(i-2)
Else
A(t)=a(i)
End If
Ifi=3 Thena(i+1)=a(t-4)
A(4)=1
Printa(i)
NextI
End Sub
程序运行后，单击命令按钮，输出结果是上______。
[单项选择]在窗体上画一个命令按钮(其Name属性为Command1)，然后编写如下代码：
Private Sub Command1_Click( )
Dim a(5,5)
For i=1 To 3
For j=1 To 4
a(i,j)=i*j
Next
Next
For n=1 To2
For m = 1 To3
Print a(m,n);
Next
Next
End Sub
程序运行后，单击命令按钮，输出结果是
A. 2 4 6 1 2 3
B. 1 2 3 2 4 6
C. 1 2 3 4 5 6
D. 6 5 4 3 2 1
[单项选择]在窗体上画一个命令按钮(其Name属性为Command1)，然后编写如下代码：
Private Sub Command1_Click（ ）
Dim Arr1(10)As Integer，arr2(10)As Integer
n=3
For i=1 To 5
Arr1(i)=i
arr2(n)=2*n+i
Next i
Print arr2(n)；Arr1(n)
End Sub
程序运行后，单击命令按钮，输出结果是 ______。
A. 11 3
B. 3 11
C. 13 3
D. 3 13
[单项选择]在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码：
Option Base 1
Private Sub Command1_Click( )
Dim a
s=0:j =1
a = Array(1,2,3,4)
For i=4 To 1 Step -1
s =s +a(i) *j
j=j * 10
Next
Print s
End Sub
运行上面的程序并单击命令按钮，其输出结果是
A. 4221
B. 1234
C. 34
D. 12
