单项选择题

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
x=5 : y=2
Call sub1((x)，y)
Print x;y
End Sub
Private Sub sub1(m，n)
t=m : m=n : n=t
End Sub
程序运行后，单击命令按钮，则窗体上显示的内容是（）

A．2 5
B．5 4
C．1 4
D．5 5

<上一题 目录 下一题>
热门 试题

单项选择题
阅读如下程序： Private Sub Form_Click() Dim num As Integer，digit As Integer num=InputBox( 输入数据 ) Do While num ＜＞ 0 digit=num Mod 10 num=num 10 Print digit； Loop End Sub 程序运行后，如果从键盘上输入12345，则输出的结果为（）

A．1 3 7 5 9
B．5 4 3 2 1
C．2 4 6 8 10
D．1 2 3 4 5
单项选择题
在窗体上画一个名称为Command1的命令按钮和一个名称为List1的列表框。如下图所示程序的功能是：单击命令按钮后，程序用“筛选法”求出1-100之间的全部素数。并将素数在列表框中显示出来。根据题意，填空处应选择 Option Base 1 Dim a(100)As Integer Private Sub Command1_Click() n = 100 For i = 2 To Sqr(n) For j = i + 1 To n If j Mod i = 0 And a(j)＜＞ 0 Then a(j)= 0 Next j Next i For i = 1 To n If a(i)＜＞ 0# Then Next i End Sub Private Sub Form_Load () For i = 1 To 100 a (i)=i Next i End Sub

A．List1.Text=Str（a（i))+ vbCrLf
B．List1.Text=Str（a（i))+ vbCrLf
C．List1.AddItem a（i)
D．List1.AddItem=a（i)
相关试题