[单选题]

执行下列程序后,鼠标单击窗体,输出结果为。 Private Sub Form_Click() Print“Click”; End Sub Private Sub Form_MouseDown(Button As Integer,Shift_ As Integer,X As Single,Y As Single) Print “Donw” End Sub Private Sub Form_MouseUp(Button As Integer,Shift_ As Integer,X As Single,Y As Single) Print“Up” End Sub

A.DownUpClick

B.ClickDownUp

C.DownClickUp

D.UpDownClick

参考答案与解析:

相关试题

执行下列程序后,鼠标单击窗体,输出结果为Private Sub Form_Cli

[单选题]执行下列程序后,鼠标单击窗体,输出结果为Private Sub Form_Click()Print "Click";E.nd SubPrivate Sub Form_MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single)Print "Donw"E.nd SubPrivate Sub Form_MouseUp(ButtonAs Integer,Shift As Integer,X As Single,Y A

  • 查看答案
  • 执行下列程序后,鼠标单击窗体,输出结果为 Private Sub Form_Cl

    [单选题]执行下列程序后,鼠标单击窗体,输出结果为Private Sub Form_Click()Print "Click";E.nd SubPrivate Sub Form_mouseDown(Button As Integer,ShiftA.s Integer, X As Single, Y As Single)Print "Donw"E.nd SubPrivate Sub Form_MouseUp(ButtonAsInteger,ShiftA.s Integer, X As Single,

  • 查看答案
  • 执行下列程序后,鼠标单击窗体,输出结果为Private Sub Form_Cli

    [单选题]执行下列程序后,鼠标单击窗体,输出结果为 Private Sub Form_Click() Print"Click": End Sub Private Sub Form_MouseDown(Button As Integer,Shift_As Integer,X As Single,Y As Single) Print"Donw" End Sub Private Sub Form_MouseUp(Button As Integer,Shift_As Integer,X As Single

  • 查看答案
  • 运行下列程序,单击窗体后输出的结果是( )。Private Sub Form_C

    [单选题]运行下列程序,单击窗体后输出的结果是( )。Private Sub Form_Click()D.im aD.im s As Integer, i As Integera = Array(1, 2, 3, 4, 5, 6)s = 1F.or i = 5 To 1 Step -2s = s * a(i)Next iPrint sE.nd SubA. 15B. 48C. 120D. 720

  • 查看答案
  • 程序运行后,单击窗体,屏幕显示的结果是()。Private Sub Form_C

    [单选题]程序运行后,单击窗体,屏幕显示的结果是( )。 Private Sub Form_Click() num1="乙" num2=76 Select Case numl Case"甲" If num2>=80 Then Print"德艺优秀" Else If num2>=60 Then Print"德优秀,艺普通" End If Case"乙" If num2>=80 Then Print"德艺双佳" ElselfnumA.德艺双佳B.德艺普通C.德优秀,艺普通D.德艺

  • 查看答案
  • 执行下列程序后,鼠标单击窗体,输出结果为

    [单选题]执行下列程序后,鼠标单击窗体,输出结果为A.DownUpCliekB.CliekDownUpC.DownCliekUpD.UpDownClick

  • 查看答案
  • 执行下列程序后,鼠标单击窗体,输出结果为。 PrivateSubForm_Cli

    [单选题]执行下列程序后,鼠标单击窗体,输出结果为 。Private Sub Form_Click()Print "Click";E.nd SubPrivate Sub Form_MouseDown(Button As Integer, Shift _A.s Integer, X As Single, Y As Single)Print "Donw"E.nd SubPrivate Sub Form_MouseUp(Button As Integer, Shift _A.s Integer, X A

  • 查看答案
  • 单击窗体时,下列程序段的执行结果为()。Private Sub Form_Cri

    [单选题]单击窗体时,下列程序段的执行结果为( )。 Private Sub Form_Crick() Line(200,200)-(400,400) Print"+++++++++++++++++++" Print"*******************" End SubA.在窗体上画一斜线,从斜线终点处开始打印两行符号B.在窗体上画一斜线,从斜线起点处开始打印两行符号C.在窗体上画一斜线,从窗体左上角开始打印两行符号D.从窗体左上角开始打印两行符号,从符号结束处开始画一斜线

  • 查看答案
  • 单击窗体时,下列程序代码的执行结果为______ 。 Private Sub T

    [单选题]单击窗体时,下列程序代码的执行结果为______ 。 Private Sub Test (x As Integer) x=x*2+1 If x < 6 Then Call Test(x) End If x-x*2+1 Print x; End Sub Private Sub Command1_ Click () Test 2 End SubA.23 47B.5 11C.10 22D.23 29

  • 查看答案
  • 单击窗口时,下列程序代码的执行结果为 Private Sub Form_Clic

    [单选题]单击窗口时,下列程序代码的执行结果为 Private Sub Form_Click( ) Text1 End Sub Private Sub Text(x As Integer) x=x*3+1 if x<6 Then call Text(x) End if x=x*2+1 Print x; End SubA.27 55B.11 35C.22 45D.24 51

  • 查看答案