网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
执行下列程序后，鼠标单击窗体，输出结果为 。
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_Click（）Print "Click";End SubPrivate Sub Form_MouseDown（Button As Integer, Shift _As Integer, X As Single, Y As Single）Print "Donw"End SubPrivate Sub Form_MouseUp（Button As Integer, Shift _As Integer, X As Single, Y As Single）Print " Up"End Sub（ ）。A．DownUpClickB．ClickDownUpC．DownClickUpD．UpDownClick ” 相关考题
考题
在窗体的单击事件中有如下程序:privatesubform_click()forj=1to15a=a+jnextjPrintaendsub程序运行后单击鼠标左键，输出的结果是( )A.1B.15C.90D.120
考题
下面对程序段运行结果叙述正确的是( )PrivateSubForm_Click()Caption="鼠标单击鼠标单击Picture=LoadPicture(App.Path+\window.jpg)Print欢迎使用VBEndSubPrivateSubForm_DblClick()Caption=鼠标双击Picture=LoadPicture()Print结束使用VBEndSubA.单击窗体时窗体的标题为鼠标单击，窗体上显示结束使用VBB.双击窗体时窗体的标题为鼠标双击，窗体上显示结束使用VBC.双击窗体时窗体的图片还在D.单击窗体时窗体的图片删除
考题
（ 8 ）有如下程序：Private Sub Form_Click （）n=10i=0Doi=i+nn=n-2Loop While n2Print iEnd Sub程序运行后，单击窗体，输出结果为 【 10 】 。
考题
执行下列程序后，鼠标单击窗体，输出结果为Private Sub Form_Click()Print "Click"；End SubPrivate Sub Form_MouseDown(Button As Integer，Shift As Integer，X As Single，Y As Single)Print "Donw"End SubPrivate Sub Form_MouseUp(ButtonAs Integer，Shift As Integer，X As Single，Y As Single)Print "Up"End SubA．DownUpClickB．ClickDownUpC．DownClickUpD．UpDownCliek
考题
执行下列程序后,鼠标单击窗体,输出结果为Private Sub Form_Click()Print "Click";End SubPrivate Sub Form_mouseDown(Button As Integer,ShiftAs Integer, X As Single, Y As Single)Print "Donw"End SubPrivate Sub Form_MouseUp(ButtonAsInteger,ShiftAs Integer, X As Single, Y As Single)Print "Up"End SubA．DownUpClickB．ClickDownUpC．DownClickUpD．UpDownClick
考题
执行下列程序后，鼠标单击窗体，输出结果为 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 SubA．DownUpClickB．CfickDownUpC．DownClickUpD．UpDownClick
考题
执行下列程序后，鼠标单击窗体，输出结果为。 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 SubA．DownUpClickB．ClickDownUpC．DownClickUpD．UpDownClick
考题
运行下列程序，单击窗体后显示结果为（）。 Private Sub Form_Click（) Dim k As Integer For k = 1 To 2 Print "3" + k; "3" k; Spc（3); Next End SubA．31 31 4 31B．31 31 32 32C．4 31 5 32D．32 32 5 32
热门标签
最新试卷