35. 在窗体中有一个文本框Text1,编写事件代码如下: Private Sub Form_Click() X=val(Inputbox("输入x的值")) Y=1 If X<>0 Then Y=2 Text1.Value=Y End Sub 打开窗体运行后,在输入框中输入整数12,文本框Text1中输出的结果是______。
36. 窗体中有命令按钮run34,对应的事件代码如下: Private Sub run34_Enter() Dim num As Integer, a As Integer, b As Integer, i As Integer For i=1 To 10 nun=InputBox("请输入数据:", "输入") If Int(num/2)=num/2 Then a=a+1 Else b=b+1 End If Next i MsgBox("运行结果:a=" & Str(a) & ",b=" & Str(b)) End Sub 运行以上事件过程,所完成的功能是______。
38. 在窗体中有一个命令按钮Command1和一个文本框Text1,编写事件代码如下: Private Sub Command1_Click() For i=1 To 4 X=3 For j=1 To 3 For k=1 To 2 x=x+3 Next k Next j Next i Text1.value=Str(x) End Sub 打开窗体运行后,单击命令按钮,文本框Text1输出的结果是______。
39. 窗体中有命令按钮Command1,事件过程如下:______。 Public Function f(x As Integer)As Integer Dim y As Integer x=20 y=2 f=x*y End Function Private Sub Command1_Click() Dim y As Integer Static x As Integer x=10 y=5 y=f(x) Debug.Print x; y End Sub 运行程序,单击命令按钮,则窗口中显示的内容是______。