-
执行以下程序段Dim i As Integer,X As Integerx=0For i=20 To 1 Step -2 x=x+i5NextPrint x后,x
-
运行下列程序:Private Sub Form_Click()Dim y As Integer, x As IntegerDo Until x > 20x
-
(27)有下列两个过程: Sub S1(ByVal x As Integer,ByVal y As Integer) Dim t As Integer t=x x=y
-
设有如下通用过程:Public Function f(x As Integer)Dim y As Integerx=20y=2f=x*yEnd Function在
-
设有如下声明:Dim X As Integer如果Sgn(X)的值为-1 则X的值是()。A.整数B.大于0的整数C.等于0的整
-
执行以下程序段 Dim x As Integer i As Integer x=0 For i=20 To 1 Step-2 x=x
-
执行语句Dim X Y As Integer后( )