[单选题]

设有如下过程: Private Sub Form. KeyDpwn(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

参考答案与解析:

相关试题

有如下事件过程。 Private Sub Form_KeyDown(KeyCod

[单选题]有如下事件过程。Private Sub Form_KeyDown(KeyCode As Integer,Shift As Integer)If (Button And 3)=3 ThenPrint "OK"E.nd IfE.nd Sub程序运行后,为了在窗体上输出"OK",应当按下的鼠标键是A.左键B.右键C.同时按下左键和右键D.按什么都不显示

  • 查看答案
  • ( 32 )设有如下窗体单击事件过程:Private Sub Form. Cli

    [单选题]( 32 )设有如下窗体单击事件过程:Private Sub Form. Click ()a = 1F.or i = 1 To 3Select Case iC.ase 1 , 3a = a + 1C.ase 2, 4a = a + 2E.nd SelectNext iMsgBox aE.nd Sub打开窗体运行后,单击窗体,则消息框的输出的结果是A. ) 3B. ) 4C. ) 5D. ) 6

  • 查看答案
  • 有如下事件过程:Private Sub Form. Click()Dim n

    [单选题]有如下事件过程:Private Sub Form. Click()D.im n As Integerx=0n=InputBox(”请输入一个整数”)F.or i=1 To iF.or j=1 To ix=x+1Next jNext 1Print xE.nd sub程序运行后,单击窗体,如果在输入对话框中输入5,则在窗体上显示的内容是( )。A.13B.14C.15D.16

  • 查看答案
  • 有如下程序::Private Sub Form. Click()Dim i As

    [单选题]有如下程序:: Private Sub Form. Click() Dim i As Integer,sum As Integer sum=0 For i=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. 12B.30C.24D.18

  • 查看答案
  • 编写如下事件过程:Private Sub Form_KeyDown(KeyCod

    [单选题]编写如下事件过程:Private Sub Form_KeyDown(KeyCode As Integer,Shift As Integer)Print Chr(KeyCode)E.nd SubPrivate SubForm_KeyPress(KeyAscii As Integer)Print Chr(KeyAscii)E.nd Sub在一般情况下(即不按住“Shift”键和锁定大写键时) 运行程序,若按“T”键,则程序输出的结果是AA.T TB.t TC.T tD.t t

  • 查看答案
  • 编写如下事件过程:Private Sub Form_KeyDown(KeyCod

    [单选题]编写如下事件过程: Private Sub Form_KeyDown(KeyCode As Integer,Shift As Integer) If(Buuon And 3)=3 Then Print "AAAA" End If End Sub 程序运行后,为了在窗体上输出“AAAA”,应按下的鼠标键为 ______。A.左B.右C.同时按下左、右D.按什么键都不显示

  • 查看答案
  • 编写如下事件过程:Private Sub Form_KeyDown(KeyCod

    [单选题]编写如下事件过程: Private Sub Form_KeyDown(KeyCode As Integer,Shift As Integer) If(Button And 3)=3 Then Print "AAAA" End If End Sub 程序运行后,为了在窗体上输出“AAAA”,应按下的鼠标键为______。A.左B.右C.同时按下左、右D.按什么键都不显示

  • 查看答案
  • 编写如下事件过程:Private Sub Form_KeyDown(KeyCod

    [单选题]编写如下事件过程: Private Sub Form_KeyDown(KeyCode As Integer,Shift As Integer) If(Button And 3)=3 Then Print "AAAA" End If End Sub 程序运行后,为了在窗体上输出“AAAA”,应按下的鼠标键为 ______。A.左B.右C.同时按下左、右D.按什么键都不显示

  • 查看答案
  • 假定有如下事件过程:Private Sub Form. Click()Dim x

    [单选题]假定有如下事件过程: Private Sub Form. Click() Dim x As Integer, n As Integer x=1 n=0 Do While x<28 x=x*3 n=n+1 Loop Print x, n End Sub 程序运行后,单击窗体,输出结果是______。A.81 4B.56 3C.28 1D.243 5

  • 查看答案
  • 编写如下事件过程:Private Sub Form. MouseDown(But

    [单选题]编写如下事件过程: Private Sub Form. MouseDown(Button As Integer,Shift As Integer,X As Single, Y As Single) If Shift=6 And Button=2 Then Print "BBBB" End If End Sub 程序运行后,为了在窗体上输出“BBBB”,应执行的操作为 ______。A.同时按下Shift键和鼠标左键B.同时按下Shift键和鼠标右键C.同时按下Ctrl、Alt键和鼠标左键D.

  • 查看答案
  • 设有如下过程: Private Sub Form. KeyDpwn(KeyCod