End

设有如下程序a =( ):For i = 1 To 3:Select Case i:Case 1，3:a = a + 1:Case 2，4:a = a + 2:End Select:Next i程序运行后，a的值为6，则a的初始值为（   ）。

已知程序如下：Private Sub p() Static s As Integer Dim i As Integer For i = 1 To 10 Step 2   s = s + i Next i Print s;End SubPrivate Sub Command1_Click() Call pEnd Sub试问：当三次单击命令按钮后，输出为[______]。

一个窗体单击事件过程如下： Private Sub Form_Click()  Dim a As Integer, b As Integer, c As Integer  a = 6 : b = 15  c = a * b  If a > b Then     a = a - b  Else     b = b - a  End If  Print a, b, c / bEnd Sub试问：当单击窗体后，输出为___________。

一个窗体单击事件过程如下： Private Sub Form_Click()  X = Val(Text1.Text):Y = Val(Text2.Text)  If X = 0 Or Y = 0 Then Print "不在任何象限内": Exit Sub  If X > 0 And Y > 0 Then Print "IN A"  If X > 0 And Y < 0 Then Print "IN D"  If X < 0 And Y > 0 Then Print "IN B"  If X < 0 And Y < 0 Then Print "IN C"End Sub

Private Sub Form_Click() 窗体上单击后，显示结果为：a=85Select case aCase  Is> =60   I=“及格”Case  Is> =70   I=“中“Case  Is> =80   I=“良”Case  else   I=“优”End SelectPrint IEnd Sub

Private Sub Form_Click() 单击窗体，窗体上将会打印出：For i = 1 To 5  Print Tab(8 - i); String(i, Format(i));Next i   End Sub

By the end of last month, he ________ one of the best children in the class

She _____ her intention of becoming a famous actress in the end.

She _____ her intention of becoming a famous actress in the end.

设有如下程序a =( ):For i = 1 To 3:Select Case i:Case 1，3:a = a + 1:Case 2，4:a = a + 2:End Select:Next i程序运行后，a的值为6，则a的初始值为（   ）。