vb form的事件
发布网友
发布时间：2023-09-23 00:43
共4个回答
热心网友
时间：2024-12-04 06:19
(活动窗口：在前景上显示的窗口，其标题栏或边框以突出显示，用来与其它可见窗口相区别。)
Resize 当一个对象第一次显示或当一个对象的窗口状态改变时该事件发生。（例如，一个窗体被最大化、最小化或被还原。）
Paint 在一个对象被移动或放大之后，或在一个覆盖该对象的窗体被移开之后，该对象部分或全部暴露时，此事件发生。
热心网友
时间：2024-12-04 06:20
Private Sub Form_Activate()
End Sub
Private Sub Form_Click()
End Sub
Private Sub Form_DblClick()
End Sub
Private Sub Form_Deactivate()
End Sub
Private Sub Form_DragDrop(Source As Control, X As Single, Y As Single)
End Sub
Private Sub Form_DragOver(Source As Control, X As Single, Y As Single, State As Integer)
End Sub
Private Sub Form_GotFocus()
End Sub
Private Sub Form_Initialize()
End Sub
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
End Sub
Private Sub Form_KeyPress(KeyAscii As Integer)
End Sub
Private Sub Form_KeyUp(KeyCode As Integer, Shift As Integer)
End Sub
Private Sub Form_LinkClose()
End Sub
Private Sub Form_LinkError(LinkErr As Integer)
End Sub
Private Sub Form_LinkExecute(CmdStr As String, Cancel As Integer)
End Sub
Private Sub Form_LinkOpen(Cancel As Integer)
End Sub
Private Sub Form_Load()
End Sub
Private Sub Form_LostFocus()
End Sub
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
End Sub
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
End Sub
Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
End Sub
Private Sub Form_OLECompleteDrag(Effect As Long)
End Sub
Private Sub Form_OLEDragDrop(Data As DataObject, Effect As Long, Button As Integer, Shift As Integer, X As Single, Y As Single)
End Sub
Private Sub Form_OLEDragOver(Data As DataObject, Effect As Long, Button As Integer, Shift As Integer, X As Single, Y As Single, State As Integer)
End Sub
Private Sub Form_OLEGiveFeedback(Effect As Long, DefaultCursors As Boolean)
End Sub
Private Sub Form_OLESetData(Data As DataObject, DataFormat As Integer)
End Sub
Private Sub Form_OLEStartDrag(Data As DataObject, AllowedEffects As Long)
End Sub
Private Sub Form_Paint()
End Sub
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
End Sub
Private Sub Form_Resize()
End Sub
Private Sub Form_Terminate()
End Sub
Private Sub Form_Unload(Cancel As Integer)
End Sub
热心网友
时间：2024-12-04 06:20
Unload可以触发Form_Unload事件。
热心网友
时间：2024-12-04 06:21
关闭程序
不会触发
