设有如下程序段: x=2 For i=1 to 10 Step 2 x=x+i Next 运行以上程序后,x的值是______。
A.26
B.27
C.38
D.57
第1题:
设有如下程序:
Private Sub Form. Click( )
Dim i As Integer,x As String,y As String
x="ABCDEFG"
For i=4 To 1Step-1
y=Mid(X,i,i)+y
Next i
Print y
End Sub
程序运行后,单击窗体,输出结果为( )。
A.ABCCDEDEFG
B.AABBCDEFG
C.ABCDEFG
D.AABBCCDDEEFFGG
第2题:
设有如下程序段: x=2 For i=1 To 10 Step 2 x=x+i Next 运行以下程序后,x的值是( )。
A.26
B.27
C.38
D.57
第3题:
设有如下程下段: x=2 For i=1 To 10 Step 2 x=x+i Next运行以上程序后,x的值是
A.26
B.27
C.38
D.57
第4题:
设有如下程序段: x=2 For i=1 To 10 Step 2 x= x+i Next 运行以下程序后,x的值是
A.26
B.27
C.38
D.57
第5题:
设有如下程序: Private Sub Form. Click( ) Dim i As Integer,x As String,y As String x="ABCDEFG" For i=4 To 1Step-1 y=Mid(X,i,i)+y Next i Print y End Sub 程序运行后,单击窗体,输出结果为( )。
A.ABCCDEDEFG
B.AABBCDEFG
C.ABCDEFG
D.AABBCCDDEEFFGG
第6题:
设有如下程序段: x=2 For i=1 To 10 Step2 x=x+i Next 运行以上程序后,x的值是
A.26
B.27
C.38
D.57
第7题:
下面程序段运行后,变量X的值为【 】。
Dim x AS Integer
Dim I AS Integer
x=0
for I=0 to 50 step 10
X=X+I。
next I
Print X
第8题:
设有如下程序:
Private Sub Form_Click()
Dim i As Integer,x As String,Y As String
x=”ABCDEFG”
For i=4 To 1 Step-1
y=Mid(x,i,i)+y
Next i
Print y
End Sub
程序运行后,单击窗体,输出结果为
A.ABCCDEDEFG
B.AABBCDEFG
C.ABCDEFG
D.AABBCCDDEEFFGG
第9题:
设有如下程序段:
x=2
For i=1 To 10 Step 2
x=x+i
Next
运行以上程序后,x的值是( )。
A.26
B.27
C.38
D.57