你可能感兴趣的试题
用鼠标右键单击窗体中无控件的部分,会执行窗体的FormLoad事件过程 用鼠标左键单击窗体的标题栏,会执行窗体的Form_Click事件过程 只载入而不显示窗体,也会执行窗体的Form_Load事件过程 载入窗体后,每次显示该窗体时,都会执行窗体的Form_Click事件过程
Form1_MouseDown Win_MouseDown Form_MouseDown MouseD0wn_Form1
Form1_MouseDown Win_MouseDown Form MouseDown MouseDown Form1
Private Sub Form_MouseDown(Button As Integer,Shift As Integer,_X As Single,Y As Single) If Button=2 Then PopupMenu al,2 End Sub Private Sub Form_MouseDown(Button As Integer,Shift As Integer,_X As Single,Y As Single PopupMenu al,0 End Sub Private Sub Form_MouseDown(Button As Integer,Shift As Integer,_X As Single,Y As Single PopupMenu al End Sub Private Sub Form MouseDown(Button As Integer,Shift As Integer,_X As Single,Y As Single If(Button=vbLetfButton)Or(Button=vbRightButton)Then PopupMenu al End Sub
用鼠标右键单击窗体中无控件的部分,会执行窗体的Form Load事件过程 用鼠标左键单击窗体的标题栏,会执行窗体的Form Click事件过程 只装入而不显示窗体,也会执行窗体的Form Load事件过程 装入窗体后,每次显示该窗体时,都会执行窗体的Form Click事件过程
用鼠标右键单击窗体中任何无控件部分,会执行窗体的Form—Load事件过程 用鼠标左键单击窗体的标题栏,会执行窗体的Form—Click事件过程 只装入而不显示窗体,也会执行窗体的Form—Load事件过程 装入窗体后,每次显示该窗体时,都会执行窗体的Form—Click事件过程
Form_Load Form_Click Form_MouseDown Form_KeyPress
Click Load MouseDown GetFocus
Form1_MouseDown Win_MouseDown Form_MouseDown MouseDown_Form1
用鼠标右键单击窗体中任何无控件部分,会执行窗体的Form_Load事件过程 用鼠标左键单击窗体的标题栏,会执行窗体的Form_Click事件过程 只装入而不显示窗体,也会执行窗体的Form_Load事件过程 装入窗体后.每次显示该窗体时,都会执行窗体的Form_Click事件过程
Form_MouseDown Forml_MouseDown Win_MouseDown MouseDown_Form1
用鼠标右击窗体中无控件的部分,会执行窗体的Form_Load事件过程 用鼠标单击窗体的标题栏,会执行窗体的Form_Click事件过程 只装入而不显示窗体,也会执行窗体的Form_Load事件过程 装入窗体后,每次显示该窗体时,都会执行窗体的Form_Click事件过程
Private Sub Form_MouseDown(Button As Integer, Shift As Integer,_
X As Single, Y As Single)
If Button=2 Then PopupMenu Bt, 2
End Sub Private Sub Form_MouseDown(Button As Integer, Shift As Integer, _
X As Single, Y As Single)
PopupMenu Bt
End Suh Private Sub Form MouseDown(Button As Integer, Shift As Integer, _
X As Single, Y As Single)
PopupMenu Bt,0
End Sub Private Sub Form_MouseDown(Button As Integer, Shift As Integer, _
X As Single, Y As Single)
If (Button=vbLeftButton) Or ( Button=vbRightButton) Then PopupMenu Bt
End Sub
Private Sub Form_MouseDown(Button As Integer,Shift As Integer,_X As Single,Y As Single) If Button=2 Then PopupMenu Bs,2 End Sub Private Sub Form_MouseDown(Button As Integer,Shift As Integer,_X As Single,Y As Single) PopupMenu Bs End Sub Private Sub Form_MouseDown(Button As Integer,Shift As Integer,_X As Single,Y As Single) PopupMenu Bs,0 End Sub Private Sub Form_MouseDown(Button As Integer,Shift As Integer,_X As Single,Y AS Single) If(Button=vbLeftButton)Or(Button=vbRightButton)Then PopupMenu Bs End Sub