编写如下两个事件过程：
Private Sub Form_KeyDown (KeyCode As Integer, Shift As Integer)
Print Cb_r(KeyCode)
End Sub
Private Sub Form_KeyPress( KeyAscii As Integer)
Print Chr(KeyAscii)
End Sub
在一般情况下(即不按住Shift键和锁定大写键时)运行程序，如果按“A”键，则程序输出的结果是

单项选择题函数过程Fun1的功能是：如果参数b为奇数，则返回值为1, 否则返回值为0。 Function Fun1 (b As Integer) if ______ Then Fun1 =0 Else Fun1 = 1 End If End Function 使该功能完整，应在空行处填入以下哪条语句

单项选择题下面程序段，运行后的结果是 Private Sub Command1_Click() Dim b%(1 To 4) ,i%, t# For i = 1 To 4 b(i) =i Next t =Tof(b() ) Print t = ; t, End Sub Function Tof(a() As Integer) Dim t#, i% t=1 For i =2 To UBound(