神马文学网vb窗体所有事件（11）
来源：百度文库 编辑：神马文学网 时间：2024/04/29 08:47:06
vb窗体所有事件（1）
2009-10-03 20:39
（1）Click 事件
在程序运行时单击窗体内的某个位置，Visual Basic将调用窗体的Form_Click事件。如果单击的是窗体内的控件，则只能调用相应控件的Click事件。Click事件：标题栏显示“鼠标单击”，窗体显示"欢迎使用VB"
Private Sub Form_Click()
Caption = "鼠标单击"
Print "欢迎使用VB"
End Sub
（2）DblClick 事件
程序运行时双击窗体内的某个位置，就触发了两个事件，第一次按动鼠标时，触发Click事件，第二次产生DblClick事件。DblClick 事件：标题栏显示“双击窗体” ，清除背景图。
Private Sub Form_DblClick()
Caption = "鼠标双击"
Picture = LoadPicture("")
Print "结束使用VB"
End Sub
(3) Initialize初始化事件与 Load事件
在程序运行时，当窗体被装入工作区时开始为Initialize之后才触发它的Load事件。所以该事件通常用来在启动应用程序时,对控件属性和变量初始化
Private Sub Form_Load()
Caption = "装入窗体"
Picture = LoadPicture ( App.Path + "\window.jpg")
FontSize = 48
FontName = "隶书"
Print "装入窗体"
End Sub
(4) Unload事件
卸载窗体时触发该事件。
(5) Resize事件
当窗体大小发生改变时，将触发一个Resize事件。
6）Activate Deactivate事件
Activate 当一个对象成为活动窗口时发生。
Deactivate 当一个对象变为非活动(Deactivate)事件当在程序运行过程中,一个窗体变为非活动窗体时,则产生该事件
7）MouseDown事件：按下鼠标任意键时产生
8）MouseMove事件：按下鼠标任意键，并移动鼠标时产生。
9）MouseUp事件：放开鼠标任意键时产生。
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
由上可见，上述3个事件的参数都是一样的，说明如下：
Button参数：表示按下的鼠标是哪一个键。1表示按下鼠标左键，2表示按下鼠标右键，4表示按下鼠标的中间键。 Shift参数：是一个整数值，其取值的含义见 vb窗体所有事件（2）表4-2。
X、Y参数：表示鼠标光标所在的坐标值。
10）DragDrop事件：鼠标点住某一对象并拖动，直到放开鼠标键时才发生该事件，在拖放过程中，不发生DragDrop事件。
2009-10-03 20:39
（1）Click 事件
在程序运行时单击窗体内的某个位置，Visual Basic将调用窗体的Form_Click事件。如果单击的是窗体内的控件，则只能调用相应控件的Click事件。Click事件：标题栏显示“鼠标单击”，窗体显示"欢迎使用VB"
Private Sub Form_Click()
Caption = "鼠标单击"
Print "欢迎使用VB"
End Sub
（2）DblClick 事件
程序运行时双击窗体内的某个位置，就触发了两个事件，第一次按动鼠标时，触发Click事件，第二次产生DblClick事件。DblClick 事件：标题栏显示“双击窗体” ，清除背景图。
Private Sub Form_DblClick()
Caption = "鼠标双击"
Picture = LoadPicture("")
Print "结束使用VB"
End Sub
(3) Initialize初始化事件与 Load事件
在程序运行时，当窗体被装入工作区时开始为Initialize之后才触发它的Load事件。所以该事件通常用来在启动应用程序时,对控件属性和变量初始化
Private Sub Form_Load()
Caption = "装入窗体"
Picture = LoadPicture ( App.Path + "\window.jpg")
FontSize = 48
FontName = "隶书"
Print "装入窗体"
End Sub
(4) Unload事件
卸载窗体时触发该事件。
(5) Resize事件
当窗体大小发生改变时，将触发一个Resize事件。
6）Activate Deactivate事件
Activate 当一个对象成为活动窗口时发生。
Deactivate 当一个对象变为非活动(Deactivate)事件当在程序运行过程中,一个窗体变为非活动窗体时,则产生该事件
7）MouseDown事件：按下鼠标任意键时产生
8）MouseMove事件：按下鼠标任意键，并移动鼠标时产生。
9）MouseUp事件：放开鼠标任意键时产生。
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
由上可见，上述3个事件的参数都是一样的，说明如下：
Button参数：表示按下的鼠标是哪一个键。1表示按下鼠标左键，2表示按下鼠标右键，4表示按下鼠标的中间键。 Shift参数：是一个整数值，其取值的含义见 vb窗体所有事件（2）表4-2。
X、Y参数：表示鼠标光标所在的坐标值。
10）DragDrop事件：鼠标点住某一对象并拖动，直到放开鼠标键时才发生该事件，在拖放过程中，不发生DragDrop事件。
vb窗体所有事件（11）
vb窗体所有事件（4）
vb窗体所有事件（1）
vb窗体所有事件（2）
VB.Net窗体控件响应键盘回车等事件的实例
VB - 浅谈圆角窗体
VB创建汉字窗体1
vb数据窗体架构的说明
如何用VB创建汉字窗体
轻松打造VB.NET特殊窗体
Web所有父窗体与子窗体的交互方法列举(子调用父窗体函数)
VB.NET中多窗体同步的解决方案
Visual Basic自适应窗体设计经验-开发频道-VB-天极网
VB创建不规则窗体经验总汇 | 异次元软件世界
Visual Basic2自适应窗体设计经验-开发频道-VB-天极网
Resize所有控件-vb教程-VB技巧
VB事件大全
VB示例:VB中使窗体右上角的X按钮失效
Resize所有控件-vb教程-VB技巧-依恋网
vb.net入门——在 Windows 窗体中执行拖放操作
VB 用API创建动态菜单示例2（含子菜单且能响应事件）
VB 用API创建动态菜单示例（含子菜单且能响应事件）zxczxc
VB.NET键盘事件相关内容概览
VB.NET键盘事件相关内容概览