更多"在窗体上画一个命令按钮和一个标签,其名称分别为Command1和Lab"的相关试题:
[单项选择]在窗体上画一个文本框,一个命令按钮和一个标签,其名称分别为Text1、Command1和Label1,文本框的Text1属性设置为空白,然后编写如下事件过程:
Private Sub Command1_Click( )
x=Int(Val(Text1.Text)+0.5)
Label1.Caption=Str(x)
End Sub
程序运行后,在文本框中输入28.653,单击命令按钮,标签中显示的内容是: ______。
A. 27
B. 28
C. 29
D. 30
[单项选择]
在窗体上画一个命令按钮和两个标签,其名称分别为Command1、Label1和Label2,然后编写如下事件过程;
Private Sub Command1_Click( )
a=0
For i=1 To 10
a=a+1
b=0
For j=1 To 10
a=a+1
b=b+2
Next j
Next i
Label1.Caption=Str(a)
Label2.Caption=Str(b)
End Sub
程序运行后,单击命令按钮,在标签Label1和Label2中显示的内容分别是()。
A. 10和20
B. 20和110
C. 200和110
D. 110和20
[单项选择]在窗体上画一个文本框、一个标签和一个命令按钮,其名称分别为Text1、Label1和Command1,然后编写如下两个事件过程:
Private Sub Command1_Click( )
strText=InputBox("请输入")
Text1. Text=strText
End Sub
Private Sub Text1_Change( )
Label1. Caption=Right(Trim(Text1. Text), 3)
End Sub
程序运行后,单击命令按钮,如果在输入对话框中输入abcdef,则在标签中显示的内容是______。
A. 空
B. abcdef
C. abc
D. def
[填空题]在窗体上画一个命令按钮和一个标签,其名称分别为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和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和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
Labell.Caption=Str(Counter)
End Sub
程序运行后,单击命令按钮,标签中显示的内容是_______。