单项选择题

设有如下过程：
Private Sub Form_KeyDown(KeyCode As Integer,Shift As Integer)
Print Chr(KeyCode)
End Sub
Private Sub Form_KeyUp(KeyCode As Integer,Shift As Integer)
Print Chr(KeyCode+2)
End SUb
若把窗体的KeyPreview属性设置为True，程序运行后，如果按“A”键，则输出结果为( )。

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

单项选择题
在窗体上画1个命令按钮，名称为Command1，然后编写如下程序： Dim Flag As Boolean Private Sub Command1_Click() Dim intNum As Integer intNum=InputBox( 请输入： ) If Flag Then Print f(intNum) End If End Sub Function f(X as Integer)As Integer If X＜10 Then Y=X Else Y=X+10 End If f=Y End Function Private Sub Form_MouseUp(Button As integer,Shift As Integer,X as Single,Y As Single) Flag=True End Sub 运行程序，首先单击窗体，然后单击命令按钮，在输入对话框中输入5，则程序的输出结果为( )。
A．0
B．5
C．15
D．无任何输出
单项选择题
有如下程序： Private Sub Form_Click() Dim i As Integer,sum As Integer sum=0 Fori=2 To 10 If i Mod 2＜＞0 And i Mod 3=0 Then sum=sum+i End If Next i Print sum End Sub 程序运行后，单击窗体，输出结果为( )。
A．24
B．30
C．12
D．18
相关试题