A-A+

设在窗体上有一个文本框 然后编写如下的事件过程: Private Sub Text1_Key

2022-08-05 23:38:15 问答库 阅读 173 次

问题详情

设在窗体上有一个文本框,然后编写如下的事件过程: Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Intcger) Const Alt=4 Const Key_f2=&H71 altdown%=(Shift And Alt) > 0 f2down% And f2down% Then If altdown% And f2down% Then Text ="abl" End If Ead Sub 程序运行后,清除文本框中原有内容,如果按Shift+F2键,则在文本框中显示的是
A.Alt+F2
B.abl
C.随机出儿个数
D.不发生变化请帮忙给出正确答案和分析,谢谢!

参考答案

正确答案:D
解析:此题是有关KeyDown事件的题目,KeyDown是当一个键被按下时所产生的事件,而KeyUp是松开被按的键时产生的事件,如果要判断是否按下了某个转换键,可以用逻辑运算符And。例如:先定义了下面3个符号常量:ConstShift=1.ConstCtrl;2,ConstAlt=4;然后用下面的语句判断是否按下Shift,Ctrl,Alt键。如果ShiftAndShift>0,则按下了Shift键;如果ShiftAndCtrl>0,则按下了Ctrl键;如果ShiftAndAlt>0,则按下了Alt键;这里的Shift时KeyDown的第二个参数;此事件过程中的If后的条件语句如果为真,则是按下了Alt+F2,而本题目中是按下了Shift+F2,所以不执行Then语句,即在文本框中的内容不发生变化。

考点:窗体,过程