Private Sub Form_Click() 单击窗体,窗体上将会打印出:For i = 1 To 5 Print Tab(8 - i); String(i, Format(i));Next i 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 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 x(3,5) For i=1 to 3 For j=1 to 5x(i,j)=x(i-1,j-1)+i+jnext j,iPrint x(3,4)End Sub
设有如下程序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的初始值为( )。