单项选择题

编写如下通用过程： Sub Proc(x As Single, y As Single) t = x x = t/y y = t Mod y End Sub 在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click () Dim a As Single Dim b As Single a = 5 b = 4 Proc a, b Print a, b End Sub 程序运行后，如果单击命令按钮，则输出结果为

A．5 4
B．1.25 1
C．4 5
D．1.25 5
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体上画一个名称为 Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim a(4)As Integer, x As Integer, sum As Integer n = 4: sum = 0 a (1) = 1 For k = 0 To n - 1 For i = 1 To k + 1 x = k + 2 - i a(x)= a(x)+ a(x - 1) If x ＜ n - k Then Exit For sum = sum + a(x) Next i Next k Print sum End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是
A．5
B．6
C．8
D．11
单项选择题
在窗体上画一个命令按钮和一个标签，其名称分别为Command1和Labell，然后编写如下事件过程： Private Sub Command1_Click() Counter=0 For i=1 To 4 For j=8 To 1 Step-2 Counter=Counter+1 Next i Next i Labell.Caption=Str(Counter) End Sub 程序运行后，单击命令按钮，标签中显示的内容是
A．11
B．12
C．16
D．20
相关试题