单项选择题

在窗体上画一个命令按钮，然后编写如下程序： Sub S1(ByVal x As Integer,ByVal y As Integer) Dim t As Integer t=x x=y y=t End Sub Private Sub Command1_Click() Dim a As Integer,b As Integer a=10 b=30 S1 a,b Print"a="; a; "b="; b End Sub 程序运行后，单击命令按钮，输出结果是______。

A．a=30 b=10
B．a=30 b=30
C．a=10 b=30
D．a=10 b=10
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体上画两个标签和一个命令按钮，其名称分别为Label1、Label2和Command1，然后编写如下程序： Private Sub func(L As Label,ByVal a As Integer) L.Caption= 1234 a=a*a End Sub Private Sub Form_Load() Label1.Caption= ABCD Label2.Caption=10 End Sub Private Sub Command1_Click() a=Val(Label2.Caption) Call func(Label1,A) Label2.Caption=a End Sub 程序运行后，单击命令按钮，在两个标签Label1和Label2中显示的内容分别是______。
A．ABCD和10
B．1234和100
C．ABCD和100
D．1234和10
单项选择题
D
相关试题