单项选择题

在窗体上画两个标签和一个命令按钮，其名称分别为Labe11、Labe12和Command1，然后编写如下程序：
Private Sub func(L As Labe1, ByVal a As Integer)
L.Caption="1234"
a=a*a
End Sub
Private Sub Form_Load()
Labe11.Caption="ABCD"
Labe12.Caption=10
End Sub
Private Sub Command1_Click()
a=Val(Labe12.Caption)
Call func(Labe11,

A．
Labe12.Caption=a
End Sub
程序运行后，单击命令按钮，在两个标签Labe11和Labe12中显示的内容分别是______。A) ABCD 和 10
B．1234 和 100
C．ABCD 和 100
D．1234 和 10

<上一题目录下一题>

热门试题

单项选择题

在窗体上画一个命令按钮(其名称为Command1)，然后编写如下事件过程： Private Shb Command1_Chck() Dim a(5,5) As Integer Dim i As Integer, j As Integer For i=1 To 3 For j=1 To 3 a(i,j)=(i-1) * 3+j Print a(i,j) Next j Print Next i End Sub 程序运行后，单击命令按钮，在窗体上的输出结果是______。

A．1 4 7
2 5 8
3 6 9
B．1 2 3
4 5 6
7 8 9
C．1 2 3 4 5 6 7 8 9
D．没有输出

单项选择题

窗体上画一个文本框(其名称为Text1)和一个标签(其名称为Labe11)。要求程序运行后，如果在文本框中输入字符，则立即在标签中显示相同的内容。以下可以实现上述操作的事件过程是______。

A．Private Sub Text1_Change()
Labe11.Caption=Text1.Text
End Sub
B．Private Sub Text1_Click()
Labe11.Caption=Text1.Text
End Sub
C．Private Sub Labe11_Change()
Labe11.Caption=Text1.Text
End Sub
D．Private Sub Labe11_Click()
Labe11.Caption=Text1.Text
End Sub

相关试题