A.AAAAA BBBBB
B.BBBBB
C.AAAAA
D.BBBBB AAAAA
[单选题]编写如下事件过程: 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. 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) 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. Click() Dim Char As String,i As Integer Const ch$="#" msg$= "Enter a String:" char=InputBox$(msg$) n=Len(Char) For i=1 To n If Mid$(char,i,1)=ch$ Then Exit For End If Next i Print i - 1 End Sub 其中InputBox函数的功能是弹出一个输入对话
[单选题]编写如下事件过程: Private Sub Form. Mouse Down(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键和鼠标左键
[单选题]对窗体编写如下事件过程: 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” E
[单选题]对窗体编写如下事件过程:Private Sub Form_MouseDown(Button As Integer,Shift As Integer,X As Single Y As Single)If Button=2ThenPrint"AAAAA"EndIfEndSubPrivate Sub Form_MouseUp(Button As Integer,Shift As Integer,X As Single,Y As Single)Print"BBBBB&quo
[单选题]对窗体编写如下事件过程: 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"
[单选题]对窗体编写如下事件过程: 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 "BBBB
[单选题]( 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