执行下列程序后，鼠标单击窗体，输出结果为

A．DownUpCliek

B．CliekDownUp

C．DownCliekUp

D．UpDownClick

[单选题]执行下列程序后，鼠标单击窗体，输出结果为 。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_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_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_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_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

[单选题]执行下列程序后，鼠标单击窗体，输出结果为（　　 ）。A.Down Up ClickB.Click Down UpC.Down Click UpD.Up

[单选题]执行下面这段程序后，单击命令按钮，窗体中输出结果是 ______。 Private Sub Command1_Click() a=1 : b=4 : c = 9 : d = 5 If a ＜ b Then If c＜d Then x=True Else If a＜c Then x=False Else x=True End If End If End If Print Val(x) End SubA．TrueB．FalseC．0D．1

[单选题]执行下面的程序，单击命令按钮后，窗体中的输出结果是 ______。 Private Sub Cotomand1_Click() Ch$="Welcome Home!" a=Len(ch$) For i= 1 To a b$ = Mid(ch$， i 1) If b$ = "m" Then m = m + 1 Next 1 Print m End SubA．2B．3C．1D．0

[单选题]有以下程序段：运行程序段后单击窗体，则输出结果为（ ）。A．21B．13C．8D．25

[单选题]有下列程序段，单击命令按钮执行程序后，输出结果为( )。 Option Base 1 Private Sub Command1_Cliek() Dim x x=Array(23, -5, 17, 38, -31, 46, 11, 8, 5, -4) s1=0 s2=0 Fork=1 To 10 If (x(k)＞0) Then s1=s1+x(k) Else s2=s2+x(k) End If Next k Y=s1/Abs(s2) Print Y End SubA．148B．40C．-40D．