网友您好, 请在下方输入框内输入要搜索的题目:

题目内容 (请给出正确答案)

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

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(ButtonAs Integer,Shift As Integer,X As Single,Y As Single)

Print "Up"

End Sub

A.DownUpClick

B.ClickDownUp

C.DownClickUp

D.UpDownCliek


参考答案

更多 “ 执行下列程序后,鼠标单击窗体,输出结果为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, 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

考题 ( 18 )在程序运行时,下面的叙述中正确的是A )用鼠标右键单击窗体中无控件的部分,会执行窗体的 Form_Load 事件过程B )用鼠标左键单击窗体的标题栏,会执行窗体的 Form_Click 事件过程C )只装入而不显示窗体,也会执行窗体的 Form_Load 事件过程D )装入窗体后,每次显示该窗体时,都会执行窗体的 Form_Click 事件过程

考题 在窗体的单击事件中有如下程序: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.单击窗体时窗体的图片删除

考题 在程序运行时,下面的叙述中正确的是A.用鼠标右键单击窗体中无控件的部分,会执行窗体的Form. L0ad事件过程B.用鼠标左键单击窗体的标题栏,会执行窗体的Form_Click事件过程C.只装入而不显示窗体,也会执行窗体的Form. Load事件过程D.装入窗体后,每次显示该窗体时,都会执行窗体的Form_Click事件过程

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

考题 执行下列程序后,鼠标单击窗体,输出结果为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