对窗体编写如下事件过程:  Option Base 1  Private Sub Form_KeyPress (KeyAScii AS Integer)  arr=Array(12,15,18,20,24)  m1=arr(1)  m2=1  If fKe

admin2009-01-15  37

问题 对窗体编写如下事件过程:  Option Base 1  Private Sub Form_KeyPress (KeyAScii AS Integer)  arr=Array(12,15,18,20,24)  m1=arr(1)  m2=1  If fKeyAscii=12 Then  For i=2 To 5    If arr(i)>m1 Then        m1=arr(i)        m2=i    End If   Next i  End If  Print m1  Print m2  End Sub  程序运行之后按回车键,输出结果为

选项 A、12  1
B、20  2
C、18  5
D、24  12

答案1

解析 此题考查了窗体的KeyPress事件过程;在默认情况下控件的键盘事件优先于窗体的键盘事件,在此题中只有窗体了。窗体的KeyPress事件的格式为:
  Private Sub Form _ KeyPress(KeyAscii As Integer)
  End Sub
  KeyAscii=13为回车键,所以按下回车键就执行条件语句,输出结果为12  1(竖
排)。
转载请注明原文地址:https://jikaoti.com/ti/J380FFFM
0

最新回复(0)