问题
-
执行以下程序段Dim i As Integer,X As Integerx=0For i=20 To 1 Step -2 x=x+i5NextPrint x后,x
-
(27)设有如下程序Private Sub Command 1_Click()x=10:Y=0For i=1 To SDox=x-2y=y+2Loop Until y>
-
(10)假设有下列程序段: For i=1 To 3 For j=5 To 1 Step -1 Print i*j Next j Next i则语句Print
-
设有如下程序:Private Sub Commandl Click()Dimsum As Double x As D0ublesum=0n=0For i=1 To 5x
-
有下列程序段:For i=1 To 4 x=4 For J=1 To 3 x=3 For k=1 To 2 x=x+6 Next k
-
设有如下程序 Private Sub Command1 Click( ) x=10:Y=0 For i=l To 5 Do x=x-2 y=y+2 Loop Un