标准模块中有如下程序代码： Public x As Integer，Y As Integer Sub TempSub() x=10：y=20 End Sub 在窗体上有1个命令按钮，并有如下事件过程： Private Sub Command1_Click() Dim x As Integer Call TempSub x=x+100：y=y+100 Print x；y End Sub 运行程序后单击命令按钮，窗体上显示的是( )。

单项选择题下面程序运行后，语句“Print i”执行的次数是( )。 Private Sub Form_Click() Dim i As Integer，j As Integer i=0 Do i=i+1 Forj=10 To 1 Step-3 i=i+j Printi Next j Loop While i<50 End Sub

单项选择题有如下函数： Function fun(a As Integer，n As Integer) As Integer Dim m As Integer While a>=n a=a-n：m=m+l Wend fun=m End Function 该函数的返回值是( )。