[填空题]在窗体上画一个命令按钮和一个标签，其名称分别为Commandl和Label1，然后编写如下事件过程：
Private Sub Command1_Click（　）
Counter=0
For i=1 T0 4
For j=6 T0 1 Step -2
Counter=Counter+1
Next j
Next i
Label1.Caption=Str(Counter)
End Sub
程序运行后，单击命令按钮，标签中显示的内容是______。

更多"在窗体上画一个命令按钮和一个标签，其名称分别为Commandl和Lab"的相关试题:

[填空题]在窗体上画一个命令按钮和一个标签，其名称分别为Commandl和Label1，然后编写如下事件过程： Private Sub Command1_Click（　） Counter=0 For i=1 T0 4 For j=6 T0 1 Step -2 Counter=Counter+1 Next j Next i Label1.Caption=Str(Counter) End Sub 程序运行后，单击命令按钮，标签中显示的内容是______。

查看答案

[单项选择]在窗体上画一个命令按钮和一个通用对话框，其名称分别为Command1和CommonDialogl，然后编写如下代码； Private SubCommand1_Click（　） CommonDialogl.Filter=" All Files |*.*|(*.exe)|*.exe|(*.doc) [*.doc|(*.bmp)|*.bmp" CommonDialogl.FileName=" " CommonDialogl.Flags=vbOFNFileMustExist CommonDialogl.FilterIndex=3 CommonDialogl.DialogTitle="OpenFile(*.doc) " CommonDialogl.Action=1 If CommonDialogl.FileName=" "Then MsgBox "No file selected"，37，"Checking" Else End If End Sub 程序运行后，单击命令按钮，将显示一个对话框，该对话框的标题是 ______。
A. 空字符
B. OpenFile(*.do
C. 打开文件
D. 保存文件

查看答案

[单项选择]在窗体上画一个命令按钮和一个标签，其名称分别为Commandl和Labell，然后编写如下事件过程： Private Sub Commandl_Click（　） Counter=0 Fori=1T04 Forj=6 To 1 Step-2 Counter=Counter+1 Nextj Nexti Labell.Caption=Str(Counter) End Sub 程序运行后，单击命令按钮，标签中显示的内容是( )。
A. 11
B. 12
C. 16
D. 20

查看答案

[单项选择]在窗体上画一个命令按钮，其名称分别为 Command1，然后编写如下事件过程：
Private Sub Command1_Click( )
　　a = 0
　　For m = 1 To 10
　　　　a = a + 1
　　　　b = 0
　　　　For j = 1 To 10
　　　　　　a = a + 1
　　　　　　b = b + 2
　　　　Next j
　　Next m
　　Print a， b
End Sub
程序运行时，单击命令按钮Command1后，窗体上显示的结果为________。
A. 10　20
B. 20　110
C. 110　20
D. 200　110

查看答案

[填空题]在窗体上画一个命令按钮和一个标签，其名称分别为Command1和Label1，编写事件过程如下：
Private Sub Command1_Click（　）
Counter=0
For i=1 To 4
For j=6 To 1 Step-2
Counter=Counter+1
Next j
Label1.Caption=Str(Counter)
End Sub
程序运行后，单击命令按钮，标签中显示的内容是______。

查看答案

[单项选择]

在窗体上画一个命令按钮和一个标签，其名称分别为Command1和Labell，然后编写如下事件过程： Private Sub Command1_Click（　）
Counter＝0
For i=1 To 4
For j＝6 To 1 Step -2
Counter=Counter+1
Next j
Next i
Labell.Captidn=Str(Counter)
End Sub
程序运行后，单击命令按钮，标签中显示的内容是（）。

A. 11
B. 12
C. 16
D. 20

查看答案

[单项选择]在窗体上画一个命令按钮和一个标签，其名称分别为Command1和Label1，然后编写如下代码：
Sub s(x As Integer, y As Integer)
Static z As Integer
y=x*x+z
z=y
End Sub
Private Sub Command1 Click（　）
Dim i As Integer, z As Integer
m=0
z=0
For i=1 To 3
S i, Z
m=m+z
Next i
Labell. Caption=Str(m)
End Sub
程序运行后，单击命令按钮，在标签中显示的内容是( )。
A. 50
B. 20
C. 14
D. 7

查看答案

[单项选择]在窗体上画一个命令按钮和一个标签，其名称分别为Command1和Labe11，然后编写如下事件过程：
Private Sub Command1_Click( )
Counter=0
For i=1 To 4
For j=8 To 1 Step-2
Counter=Counter+1
Next j
Next i
Labe11.Caption=Str(Counter)
End Sub
程序运行后，单击命令按钮，标签中显示的内容是______。
A. 11
B. 12
C. 16
D. 20

查看答案

[单项选择]在窗体上画一个命令按钮和一个文本框，其名称分别为Commandl和Text1，把文本框的 Text属性设置为空白，然后编写如下事件过程：
Private Sub Commandl_click（　）
a=InputBox("Enter an integer")
b=InputBox("Enter an integer")
Text1.Text=b+a
End Sub
程序运行后，单击命令按钮，如果在输入对话框中分别输入8和10，则文本框中显示内容是( )。
A. 108
B. 18
C. 810
D. 出错

查看答案

[单项选择]在窗体上画一个命令按钮和一个标签，其名称分别为 Command1 和 La-bel1，然后编写如下事件过程：
Private Sub Command1_Click( )
　　Counter = 0
　　For i = 1 To 4
　　　　For j = 8 To 1 Step -2
　　　　　　Counter = Counter + 1
　　　　Next j
　　Next i
　　Label1.Caption = Str(Counter)
End Sub
程序运行后，单击命令按钮，标签中显示的内容是________。
A. 11
B. 12
C. 16
D. 20

查看答案

[单项选择]在窗体上画一个命令按钮和一个标签，其名称分别为Command1和Label1，然后编写如下事件过程：
Private Sub Command1_Click（　）
Counter=0
For i=1 To 4
For j=6 To 1 Step -2
Counter=Counter+1
Next j
Next i
Label1.Caption=Str(Counter)
End Sub
程序运行后，单击命令按钮，标签中显示的内容是
A. 11
B. 12
C. 16
D. 20

查看答案

[填空题]在窗体上画一个命令按钮和一个文本框，其名称分别为Command1和Text1，然后编写如下代码：
Dim SaveAll As String
Private Sub Command1_Click（　）
Text1.Text=Left(UCase(SaveAll),4)
End Sub
Private Sub Text1_KeyPress(KeyAscii As Integer)
SaveAll=SaveAll+Chr(KeyAscii)
End Sub
程序运行后，在文本框中输入abcdefg，单击命令按钮，则文本框中显示的内容是______。

查看答案

我来回答:

提交