（8 ）有如下程序：Private Sub Form_Click （）n=10i=0Doi=i＋nn=n－2Loop While n&gt;2Print iEnd Su

（8 ）有如下程序：

Private Sub Form_Click （）

n=10

i=0

i=i+n

n=n-2

Loop While n>2

Print i

End Sub

程序运行后，单击窗体，输出结果为【 10 】。

您可能感兴趣的试题

设窗体上有一个名为Text1的文本框，并编写如下程序：Private Sub Form_Load（) Show Text1.Text=

答案解析
编写如下程序:Private Sub Form_Click()a$=54321:b$=abcdeFor j=1 To 5Print Mid$(a$ 6-j 1)

答案解析
( 18 )在窗体上有如右图所示的控件各控件的名称与其标题相同并有如下程序:Private Sub Form_Lo

答案解析
有如下程序:Private Sub Form_Click( )Dim i As Integer Sum As Integer Sum = 0 For i = 2 To

答案解析
在窗体上画两个文本框其名称分别为Text1和Text2 然后编写如下程序:Private Sub Form_Load()Show

答案解析
设有如下程序:Option Base 0Private Sub Form_Click( )Dim aDim i As Integera=Array(1 2 3 4 5

答案解析
设有如下程序:Private Sub Form_ Click() Dim a Dim i As Integer j As Integer a = Array(1 2 3

答案解析

（8 ）有如下程序：Private Sub Form_Click （）n=10i=0Doi=i＋nn=n－2Loop While n&amp;gt;2Print iEnd Su