题目内容

程序执行结果S的值是【】。 Private Sub Command1_Click() i=0 Do i=i+1 s=i+s Loop Until i＞=4 Print s End Sub

查看答案

搜索结果不匹配？点我反馈

更多问题

轻型越野型客车累计行驶达到()应当报废。

A. 45万公里
B. 40万公里
C. 30万公里
D. 35万公里

下列语句的输出结果是【】。 Print Format$(6656，"000,000.00．")

有如下的程序片段，该程序片段的执行完后，共执行循环______次。 Private Sub command1_ Click() total =0 Counter = 1 do Print Counter total = total + Counter Print total, "111" Counter = Counter + 1 if total ＞= 10 then exit do End if Loop while Counter ＜= 10 End Sub

在窗体上建立—个名称为Text1的文本框，用来接收一个整数。当form1_ Click事件发生时，将在窗体上显示输入整数的各位数字和。 Private Function fun(m As Integer) As Integer Dim k As Integer, n As Integer do n =【】 k=k+ n m= m\10 Loop until m = 0 fun = k End Function Private Sub form_ Click() Dim n As Integer n = Val(Text1. Text) Print【】 End Sub