题目内容
（请给出正确答案）
有一个窗体Form1，要求该窗体只能运行30s，时间一到则窗体将自动关闭。程序空白处应填写( )。
Private Sub Form_Load()
Me.TimerInterval=1000
i=0
End Sub
Private Sub Form_Timer()
______
If i=30 Then
DoCmd.CloSe
End If
End Sub
A．i=i+1 B．i=i-1
C．i=i+30 D．i=i-30
简答题官方参考答案
（由简答题聘请的专业题库老师提供的解答）
更多“有一个窗体Form1，要求该窗体只能运行30s，时间一到则窗体将自动关闭。程序空白处应填写（)。 Private Sub Fo”相关的问题
A、Form1.Show Form2.Hide
B、Form1.UnLoad Form2.Show
C、Form1.Hide Form2.Show
D、Form1.Clear Form2.Show
Public Sub p()
Dim i As Integer
i=3
Call s(i)
If i＞4 Then i=i^ 2
MsgBox i
End Sub
Public Sub S(ByVal P As Integer)
P=P*2
End Sub
A．3 B．4 C．5 D．6
Dim x As Integer, a As Integer, b As Integer, i As Integer
For i=1 T0 10
x=InputBox("请输入一个整数：")
If Int(x/2)=x/2 Then
a=a+1
Else
b=b+1
End If
Next i
MsgBox"a="&a&chr(13) &"b="&b
A．对输入的10个数求累加和
B．对输入的10个数分别统计奇数和偶数的累加和
C．对输入的10个数分别统计奇数和偶数的个数，其中奇数的个数保存在变量a中
D．对输入的10个数分别统计奇数和偶数的个数，其中偶数的个数保存在变量a中
警告：系统检测到您的账号存在安全风险
为了保护您的账号安全，请在“简答题”公众号进行验证，点击“官网服务”-“账号验证”后输入验证码“”完成验证，验证成功后方可继续查看答案！
