网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
运行以下程序段后，输出结果为【 】。
For I=1 To 3
Cis
Print"I=",I;
Next
参考答案
更多 “ 运行以下程序段后，输出结果为【 】。For I=1 To 3CisPrint"I=",I;Next ” 相关考题
考题
下面程序段的运行结果是【 】。Option Base 1Private Sub swap(a()As InteSer)For I=1 to 10\2t=a(i)a(i)=a(10-1+1)a(10-1+1)=tNext1End SubPrivate Sub Form_Click()Dim x(10)As IntegerFor I=1 to 10x(i)=I*2Next1Swap x()For1=1 to 10Print x (i)Next IEnd Sub
考题
设有如下程序：Private Sub Form_Click()Dim i As Integer，x As String,Y As Stringx=”ABCDEFG”For i=4 To 1 Step-1y=Mid(x，i，i)+yNext iPrint yEnd Sub程序运行后，单击窗体，输出结果为A．ABCCDEDEFGB．AABBCDEFGC．ABCDEFGD．AABBCCDDEEFFGG
考题
有如下程序：Option Base 1Private Sub Form_Click()Dim arr,SumSum=0For i=1 To 10If arr(i)/3=arr(i)\3 ThenEnd IfNext iEnd Sub程序运行后，单击窗体，消息框的输出结果为( )。
考题
运行以下程序段后，输出结果为【 】。For I=1 To 3ClsPrint "I=",I；Next@答案@I=3@解析@本题考查Cls语句的功能。Cis语句的功能是清除窗体或其他对象上的所有输出，因此，本题在运行中虽然对I=1和I=2有输出，但都被清除，最后只剩下I=3时的输出值。
考题
设有如下程序： 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.ABCCDEDEFGB.AABBCDEFGC.ABCDEFGD.AABBCCDDEEFFGG
考题
以下程序段运行后消息框的输出结果为______。s＝"Access"Dim str As StringFor i＝1 To Len(s)str＝UCase(Mid(S,I,I))+strNext iMsgBox str
考题
以下程序运行后，Text1的输出结果是___________ 。 Dim a%（5), i% For i = 0 To 5 a（i) = 2 * i + 1 Text1.Text = a（i) Next iA．程序出错B．1 3 5 7 9 11C．11D．9E．1
考题
下列程序段的输出结果为（）。 Dim A（5) For i=1 to 5 A（i)=i*i Next i Print A（i)A．55B．0C．18D．下标越界出错信息
热门标签
最新试卷
