单项选择题

设在窗体上有个文本框，然后编写如下的事件过程： Private Sub Text1_KeyDown(KeyCode As Integer，Shift As Integer) 　Const Alt=4 　Const Key_F2=&H71 　altdown%=(Shift And Alt)＞0 　f2down%=(KeyCode=Key_F2) 　If altdown% And f2down% Then 　　Text1.Text="BBBBB" 　End If End Sub 上述程序运行后，如果按[Shift+F2]，则在文本框中显示的是

A．Alt+F2
B．BBBBB
C．随机出几个数
D．文本框内容无变化
<上一题 目录 下一题>
热门 试题

单项选择题
执行下列程序后，鼠标单击窗体，输出结果为 Private Sub Form_Click() Print Click ： End Sub Private Sub Form_MouseDown(Button As Integer，Shift_As Integer，X As Single，Y As Single) Print Donw End Sub Private Sub Form_MouseUp(Button As Integer，Shift_As Integer，X As Single，Y As Single) Print Up End Sub
A．DownUpClick
B．CfickDownUp
C．DownClickUp
D．UpDownClick
单项选择题
单击命令按钮时，下列程序的执行结果是 Private Sub Command1_Click() Dim a As Integer，b As Integer，c As Integer a=3:b=4:c=5 Print SecProc(c,b,a) End Sub Function FirProc(x As Integer，y As Integer，z As Integer) FirProc=2*x+y+3*z End Function Function SecProc(x As Integer，y As Integer，z As Integer) SecProc=FirProc(z,x,y)+x End Function
A．20
B．22
C．28
D．30
相关试题