2. 计算机
  3. 在窗体上画一个名称为Text1的文本框，然后编写如下事件过程： Private Sub Form_Load() Text1.Text = "" End Sub Private Sub Text1_KeyDown(KeyCode As Integer

在窗体上画一个名称为Text1的文本框，然后编写如下事件过程： Private Sub Form_Load() Text1.Text = "" End Sub Private Sub Text1_KeyDown(KeyCode As Integer

admin2018-09-19  32
问题 在窗体上画一个名称为Text1的文本框，然后编写如下事件过程：
Private Sub Form_Load()
    Text1.Text = ""
End Sub
Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
    Const Alt = 4
    Const Key_F2 = &H71　　　　　　　　’＆H71是F2键的键码
    AltD = (Shift And Alt) > 0
    F2D = (KeyCode = Key_F2)
    If AltD And F2D Then
        Text1.Text = "abl"
    End If
End Sub
程序运行后，如果按Shift+F2键，则文本框中的内容是
选项 A、Alt+F2
B、abl
C、随机显示
D、不显示任何信息
答案D
解析 KeyDown事件的参数KeyCode表示按键的键盘码，此题为&H71；参数Shift表示在该事件发生时相应Shift、Ctrl和Alt键的状态，用一个3位的二进制数表示，只有Shift被按下时为001。按下Shift+F2键，条件KeyCode = Key_F2为False，即F2D = False，文本框不显示内容。故正确答案为选项D。
转载请注明原文地址:https://kaotiyun.com/show/mnFp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)