有如下程序:Private Sub Command1_Click()Dim a As SingleDim b As Singlea=2: b=4Call CS (a, B.End SubSub CS (x As Single, y As Single)t=xx=t \ yy=t Mod yEnd Sub程序运行后,单击命令按钮,a和b的值分别为( )。A.0 0B.1 1C.0 2D.1 2

有如下程序:

Private Sub Command1_Click()

Dim a As Single

Dim b As Single

a=2: b=4

Call CS (a, B.

End Sub

Sub CS (x As Single, y As Single)

t=x

x=t \ y

y=t Mod y

End Sub

程序运行后,单击命令按钮,a和b的值分别为( )。

A.0 0

B.1 1

C.0 2

D.1 2


相关考题:

在窗体上画1个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()a=0For i=1 To 2For j=1 To 4If j Mod 20 Thena=a-1End Ifa=a+1Next jNext iPrint aEnd Sub程序运行后,单击命令按钮,输出结果是( )。A.0B.2C.3D.4

在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1_Click()For i=1 To 4x=4For j=1 To 2x=x+6NextNextPrint xEnd Sub程序运行后,单击命令按钮,输出结果是A.12B.13C.16D.17

有如下程序,执行程序后单击Button1按钮,窗体上显示的是什么()Private Sub Command1_Click()Dim a Dim b As Integera = 5 / 2b = 5 / 2Print a, bEnd Sub A、2 2B、 2 2.5C、 2.5 2D、 2.5 2.5

运行下列程序,最后在窗体中输出【 】。Private Sub command1_Click()a=65 : b = 17a = a Mod b ^ 2a = a \ 4Print aEnd Sub

设有如下程序: Private Sub Command1_Click() Dim sum As Double,x As Double sum=0 n=0 For i=1 To 5 x=n/i n=n+1 sum=sum+x Next End Sub 该程序通过For循环计算一个表达式的值,这个表达式是 ______。A.1+1/2+2/3/4+4/5B.1+1/2+2/3+3/4C.1/2+2/3+3/4+4/5D.1+1/2+1/3+1/4+1/5

有如下程序: Private Sub Commandl_Click() Dim a As Single Dim b As Single a=2:b=4 Call CS(a,b)End Sub Sub CS(x As Single,y As Single) t=X x=t\y y=t Mod y End Sub 程序运行后,单击命令按钮,a和b的值分别为A.0 0B.1 1C.0 2D.1 2

编写如下程序: Private Sub Command1_Click() x="abcd" y="1234" For i=1 To 4 z=z+Mid(x,i,1)+Left(y,1) Next i Print z End Sub 程序运行后,单击命令按钮,则窗体上显示的内容是A.abcd1234B.a1b2c3d4C.a1b1c1d1D.1234abcd

在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() For i=1 To 4 X=4 For j=1 To 2 X=x+6 Next Next Print x End Sub 程序运行后,单击命令按钮,输出结果是A.12B.13C.16D.17

有如下程序: Private Sub Command1_Click( ) a$="A WORKER IS OVER THERE" x=Len(a $) For i=1 To x-1 b$=Mid $(a $,i,2) If b $="ER"Then s=s+1 Next i Pdnt s End Sub 程序运行后的输出结果是A.1B.2C.3D.4