单项选择题

编写如下两个事件过程：
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”键，则程序输出的结果是

A．A
A
B．a
A
C．A
a
D．a
a
<上一题 目录 下一题>
热门 试题

单项选择题
函数过程Fun1的功能是：如果参数b为奇数，则返回值为1, 否则返回值为0。 Function Fun1 (b As Integer) if ______ Then Fun1 =0 Else Fun1 = 1 End If End Function 使该功能完整，应在空行处填入以下哪条语句
A．b Mod 2＜＞0
B．b Mod 2 =0
C．b/2 = 1
D．b\2 =0
单项选择题
下面程序段，运行后的结果是 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(
A．
相关试题