单项选择题

在窗体上画一个命令按钮，然后编写如下程序：
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；"bc"；b
End Sub
程序运行后，单击命令按钮，输出结果是： ______。

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

单项选择题
在窗体上画一个文本框，一个命令按钮和一个标签，其名称分别为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
单项选择题
以下程序段运行的结果是： ______。 Dim a(-1 To 5)As Boolean Dim flag As Boolean flag=False Dim i As Integer Dim j As Integer Do Until flag=True For i=-1 To 5 j=j+1 If a(i)=False Then a(i)=True Exit For End If If i=5 Then flag=True End If Next Loop Print j
A．20
B．7
C．35
D．8
相关试题