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

有如下事件过程。 Private Sub Form_KeyDown(KeyCode As Integer,Shift As Integer) If(Button And 3)=3 Then Print "OK" End If End Sub 程序运行后,为了在窗体上输出“OK”,应当按下的鼠标键是

A.左键

B.右键

C.同时按下左键和右键

D.按什么都不显示


相关考题:

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

把窗体的KeyPreView属性设置为True,并编写如下两个事件过程:Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)Print KeyCodeEnd SubPrivate Sub Form_KeyPress(KeyAscii As Integer)Print KeyAsciiEnd Sub程序运行后,如果按下B键,则在窗体上输出的数值是 【12】 和 【13】 。

编写如下两个事件过程:Private Sub Form_KeyDown(KeyCode As Integer,Shift As Integer)Print Chr(KeyCode)End SubPrivate Sub Form_KeyPress(KeyAscii As Integer)Print Chr(KeyAscii)End Sub在一般情况下(即不按住"Shift"键和锁定大写键时)运行程序,如果按“A”键,则程序输出的结果是A.AAB.AaC.AaD.aa

对窗体编写如下事件过程: Private Sub Form_ MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single) If Button =2 Then Print “AAAAA” End If End Sub Private Sub Form_ MouseUp (Button As Integer,Shift As Integer,X As Single,Y As Single) Print “BBBBB” End Sub 程序运行后,如果单击鼠标右键,则输出结果为______ 。A.AAAAA BBBBBB.BBBBBC.AAAAAD.BBBBB AAAAA

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

假定已经在菜单编辑器中建立了窗体的弹出式菜单,其顶级菜单项的名称为a1,其“可见”属性为False。程序运行后,单击鼠标左键或右键都能弹出菜单的事件过程是A.Private Sub Form_MouseDown(Button As Integer,_ Shift As Integer,X As Single,Y As Single) If Button=1 And Button=2 Then PopupMenu a1 End If End SubB.Private Sub Form_MouseDown(Button As Integer,_ Shift As Integer,X As Single,Y As Single) PopupMenu a1 End SubC.Private Sub Form_MousoDown(Button As Integer,_ Shift As Integer,X As Single,Y As Single) If Button=1 Then PopupMenu a1 End If End SubD.Private Sub Form_MouseDown(Button As Integer,_ Shift As Integer,X As Single,Y As Single) If Buaon=2 Then PopupMenu a1 End If End Sub

( 25 )要求当鼠标在图片框 P1 中移动时,立即在图片框中显示鼠标的位置坐标。下面能正确实现上述功能的事件过程是A )Private Sub P1_MouseMove ( Button AS Integer,Shift As Integer,X As Single,Y As Single )Print X,YEnd SubB )Private Sub P1_MouseDown ( Button AS Integer,Shift As Integer,X As Single,Y As Single )Picture.Print X,YEnd SubC )Private Sub P1_MouseMove ( Button AS Integer,Shift As Integer,X As Single,Y As Single )P1.Print X,YE n d S u bD )Private Sub Form_MouseMove ( Button AS Integer,Shift As Integer,X As Single,Y As Single )P1.Print X,YEnd Sub

编写如下两个事件过程: Private Sub Form_KeyDown(KeyCode As Integer,Shift As Integer) Print Chr(KeyCode) End Sub Private Sub Form_KeyPress(KeyAscii As Integer) Print Chr(KeyAscii) End Sub 在一般情况下(即不按住“Shift”键和锁定大写键时)运行程序,如果按“A”键,则程序输出的结果是A. A AB.a AC. A aD.a a

编写如下事件过程:Private Sub Form_keyDown(KeyCode As Integer,Shift As Integer)Print Chr(KeyCode)End SubPrivate Sub Form_Keypress(KeyAscii As Integer)Print Chr(KeyAscii)End Sub在一般情况下(即不按住Shift键和锁定大写键时) 运行程序,若按"T"键,则程序输出的结果是A.T TB.t TC.T TD.t t

要求当鼠标在图片框P1中移动时,立即在图片框中显示鼠标的位置坐标。下面能正确实现上述功能的事件过程是A.Private Sub P1_MouseMove(Button As Integer,Shift As Integer,x As Single,Y As Single) Print X,Y End SubB.Private Sub P1_M0useDown(Button As Integer,Shift As Integer,X As Single,Y As Single) Picture.Print X,Y End SubC.Private Sub P1_MouscMove(Button As integer,Shift As Integer,X As Single,Y As Single) P1.Print X.Y End SubD.Private Sub Form_MouseMove(Button As Integer,Shift As Integer,x As Single,Y As Single) P1.Print X.Y End Sub

下面程序是由鼠标事件在窗体上画图,如果按下鼠标可以画图,双击窗体则可以清除所画图形。补充完整下面的程序。首先在窗体层定义如下变量:Dim PaintStart As Boolean编写如下事件过程:Private Sub Form_Load()DrawWidth=2ForeColor=vbGreenEnd SubPrivate Sub Form_MouseDown(Button As Integer,Shift As Integer,X AS Single,Y AS Single)PaintStart=TrueEnd SubPrivate Sub Form_MouseMove(Button As Integer,Shift As Integer,X As Single,Y As Single)If PaintStart ThenPSet(X,Y)End IfEnd SubPrivate Sub Form_MouseUp(Button As Integer,Shift As Integer,X As Single,Y As Single)End SubPrivate Sub Form_DblClick()ClsEnd Sub

设已经在菜单编辑器中设计了窗体的快捷菜单,其顶级菜单为Bt,取消其“可见”属性,运行时,在以下事件过程中,可以使快捷菜单相应鼠标右键菜单的是A.Private Sub Form_MouseDown(Button As Integer, Shift As Integer,_ X As Single, Y As Single) If Button=2 Then PopupMenu Bt, 2 End SubB.Private Sub Form_MouseDown(Button As Integer, Shift As Integer, _ X As Single, Y As Single) PopupMenu Bt End SuhC.Private Sub Form. MouseDown(Button As Integer, Shift As Integer, _ X As Single, Y As Single) PopupMenu Bt,0 End SubD.Private Sub Form_MouseDown(Button As Integer, Shift As Integer, _ X As Single, Y As Single) If (Button=vbLeftButton) Or ( Button=vbRightButton) Then PopupMenu Bt End Sub

编写如下事件过程: 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(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. 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 AB. A BC. A CD. A D

编写如下事件过程: Private Sub Form_KeyDown (KeyCode As Integer,Shift As Integer) Print Chr(KeyCode) End Sub Private Sub Form_Key Press (KeyAscii As Integer) Print Chr (Key Ascii) End Sub 在一般情况下(即不按住Shift键和锁定大写键时)运行程序,若按“T”键,则程序输出的结果是A.T TB.t TC.T TD.t t

编写如下事件过程: Private Sub Form. KeyDown (KeyCode As Integer, Shift As Integer) Print Chr (KeyCode) End Sub Private Sub Form_KeyPress( KeyAscii As Integer) Print Chr(KeyAscii) End Sub 在一般情况下(即不按住Shift键和锁定大写键时)运行程序,若按“T”键,则程序输出的结果是A.T TB.t TC.T tD.t t

对窗体编写如下事件过程: Private Sub Form_ Mouse Down(Button As Integer,Shift As Integer,X AS Single,Y As Single) If Button=2 Then Print "AAAAA" End if End Sub Private Sub Form. _ MouseUp(Button As Integer,Shift As Integer,X As Single,Y As Single) Print "BBBBB" End Sub 程序运行后,如果单击鼠标右键,则输出结果为 ______。A.AAAAA BBBBBB.BBBBB AAAAAC.AAAAAD.BBBBB

编写以下两个事件过程,在一般情况下(即不按住Shift键和锁定大写),运行程序,如果按A键,则程序的输出是 ______。 Private Sub Form_KeyDown(KeyCode As Integer,Shift As Integer) Print Chr(KeyCode) End Sub Private SubForm_KeyPress(KeyAscii As Integer) Print KeyAscii End SubA.A 65B.a 65C.A 97D. a 97

在窗体上画1个文本框,其名称为Text1,然后编写如下过程:Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer)Print Chr(KeyCode)End SubPrivate Sub Text1_Key Up(KeyCode As Integer,Shift As Integer)Print Chr(KeyCode+2)End Sub程序运行后,把焦点移到文本框中,此时如果敲击“A”A.B.C.D.

把窗体的KeyPreview属性设置为True,然后编写如下过程: Private Sub Form_KeyDown(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 程序运行后,如果按“A”键,则输出结果为 ______。A.A AB.A BC.A CD.A D

对窗体编写如下事件过程: Private Sub Form. _ MouseDown(BuRon As Integer,Shift As Integer, X As Single, Y As Single) If Button=2 Then Print "AAAAA" End If End Sub Private Sub Form_MouseUp(Button As Integer,Shift As Integer,X As Single, Y As Single) Print "BBBBB" End Sub 程序运行后,如果单击鼠标右键,则输出结果为 ______。A.AAAAA BBBBBB.BBBBBC.AAAAAD.BBBBB AAAAA

假定已经在菜单编辑器中建立了窗体的弹出式菜单,其顶级菜单的名称为a1,其“可见”属性为False,则程序运行后,可以同时响应鼠标左键单击和右键单击的事件过程是 ______。A.Private Sub Form_ MouseDown (Button As Integer, _ Shift As Integer, X As Single, Y As SinglE)If Button = 1 And Button = 2 Then PopupMenu al End If End SubB.Private Sub Form_ MouseDown (Button As Integer, _ Shift As Integer, X As Single, Y As SinglE)PopupMenu a1 End SubC.Private Sub Form_ MouseDown (Button As Integer, _ Shift As Integer, X As Single, Y As SinglE)If Button = 1 Then PopupMenu a 1 End If End SubD.Private Sub Form_ MouseDown(Button As Integer, _ Shift As Integer, X As Single, Y As SinglE)If Button = 2 Then PopupMenu a 1 End If End Sub

把窗体的Key Preview属性设置为True,然后编写如下过程: Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) Print Chr(KeyCode) End Sub Private Sub Form_KeyUp(KeyVode As Integer, ShiftAs Integer) Print Chr(KeyCode+2) End Sub 程序运行后,如果按“A”键,则输出结果______。A.AB.AC.AD.A A B C D

编写了如下事件过程: Private Sub Form_KeyDown(KeyCode As Integer,Shift As lnteger) If(Button And 3)=3 Then Print“AAAA” End lf End Sub 程序运行后,为了窗体上输出“AAAA”,应按下的鼠标键是A.左B.右C.同时按下左和右D.按鼠标键没有反应

把窗体的KeyPreview属性设置为True,然后编写如下过程: Private SubForm_KeyDown(KeyCode As Integer,Shift As Integer) PrintChr (KeyCode) End Sub Private Sub Form_KeyUp(KeyCode As Integer, Shift As Integer) PrintChr(KeyCode+2) End Sub 程序运行后,如果按“A”键,则输出结果为 ______。A.A AB.A BC.A CD.A D

编写如下事件过程: 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_MouseDown(Button As Integer,Shift As Integer,X As Single Y As Single) If Button=2 ThenPrint"AAAAA"End IfEnd SubPrivate Sub Form_MouseUp(Button As Integer,Shift As Integer,X As Single,Y As Single) Print"BBBBB" End Sub程序运行后,如果单击鼠标右键,则输出结果为()AAAAAABBBBBBCAAAAA CR BBBBB(其中CR表示回车和换行)DBBBBB CR AAAAA