VB事件大全

VB常用属性方法事件在Visual Basic中，有许多常用的属性、方法和事件可以用于开发应用程序。

下面是一些常用的属性、方法和事件的说明：属性：1. Name属性：用于获取或设置控件的名称。

2. Text属性：用于获取或设置控件的显示文本。

3. Enabled属性：用于获取或设置控件是否可用。

4. Visible属性：用于获取或设置控件是否可见。

5. Width和Height属性：用于获取或设置控件的宽度和高度。

6. Top和Left属性：用于获取或设置控件的上边距和左边距。

7. BackColor属性：用于获取或设置控件的背景颜色。

8. ForeColor属性：用于获取或设置控件的前景颜色。

9. Font属性：用于获取或设置控件的字体。

10. TextAlign属性：用于获取或设置文本框中文本的对齐方式。

方法：1. MessageBox.Show方法：用于显示一个消息框，可以用于显示提示信息或错误信息。

2. Console.WriteLine方法：用于在控制台窗口中输出文本。

3. SqlConnection.Open方法：用于打开一个数据库连接。

5. StreamReader.ReadLine方法：用于从文本文件中读取一行文本。

6. StreamWriter.WriteLine方法：用于向文本文件中写入一行文本。

7. Convert.ToInt32方法：用于将一个字符串转换为整数。

8. Math.Max方法：用于返回两个数值中较大的一个。

9. String.ToUpper方法：用于将字符串转换为大写。

10. Array.Sort方法：用于对数组中的元素进行排序。

事件：1. Click事件：在单击控件时引发，用于响应用户的点击操作。

2. Load事件：在窗体或控件加载时引发，用于初始化界面或加载数据。

3. KeyPress事件：在用户按下键盘按键时引发，用于响应键盘输入。

4. MouseMove事件：在鼠标移动时引发，用于跟踪鼠标位置。

VB中的键盘事件、鼠标事件、拖放技术键盘事件：参数是KeyAscii，每次按一下键盘上的一个键，相应的键的Ascii码值都要赋给参数KeyAscii，然后再执行相应的操作KeyPreview：接受键盘事件。

默认情况下，窗体的KeyPreview 属性为False，只有窗体获得焦点才能相应键盘事件；若窗体的KeyPreview属性为True，窗体会在空件之前首先截获键盘事件。

Shift And 7: 取Shift参数的低三位，因为7的二进制数是111，shift参数与111进行按位And运算，得到是按了三个功能键中的哪一个。

命令按钮控件的default属性用于设置默认命令按钮.，设置为true时,按[Enter键]相当于用鼠标单击了该按钮，Cancel属性为True，则Esc键触发按钮的Click事件快捷键的优先级高于键盘事件，鼠标事件：参数X和Y表示鼠标指针的位置Clc：清除图像。

划线函数Line格式：Line (x1, y1) -(x2, y2), [color], [B][F](x1, y1) 可选的。

Single （单精度浮点数），直线或矩形的起点坐标。

(x2, y2) 必选的。

Single （单精度浮点数），直线或矩形的终点坐标。

color 可选的。

Long （长整型数），画线时用的 RGB 颜色，可用RGB函数B 可选的。

如果包括，则利用对角坐标画出矩形。

F 可选的。

如果使用了 B 选项，则 F 选项规定矩形以矩形边框的颜色填充。

不能不用 B 而用F。

例：Line (0, 0)-(X, Y), vbGreen, BF拖放技术:DragMode属性：0—手动拖放，1—自动拖放DragDrop事件：Private Sub Form_DragDrop(Source As Control, X As Single, Y As Single)Source.Move X, YEnd Sub---Source表示拖放的控件，即DragMode属性为1的控件；xy 表示鼠标指针的位置坐标。

VB事件慨述{ 窗体和图象框类事}Paint事件：当某一对象在屏幕中被移动，改变尺寸或清除后，程序会自动调用Paint事件。

注意：当对象的AutoDraw属性为True（－1）时，程序不会调用Paint事件。

Resize事件：当对象的大小改变时触发Resize事件。

Load事件：仅适用于窗体对象，当窗体被装载时运行。

Unload事件：仅适用于窗体对象，当窗体被卸载时运行。

{当前光标（Focus）事件}GotFocus事件：当光标聚焦于该对象时发生事件。

LostFocus事件：当光标离开该对象时发生事件。

注意：Focus英文为“焦点”、“聚焦”之意。

（鼠标点击的意思）{鼠标操作事件}Click事件：鼠标单击对象。

DbClick事件：鼠标双击事件。

MouseDown、MouseUp属性：按下/放开鼠标键事件。

MouseMove事件：鼠标移动事件。

DragDrop事件：拖放事件，相当于MouseDown、MouseMove和MouseUp的组合。

DragOver事件：鼠标在拖放过程中就会产生DragOver事件。

{键盘操作属性}KeyDown、KeyUp事件：按键的按下/放开事件。

KeyPress事件：按键事件。

{改变控制项事件}Change事件：当对象的内容发生改变时，触发Change事件。

最典型的例子是文本框（TextBox）。

DropDown事件：下弹事件，仅用于组合框（ComboBox）对象。

PathChange事件：路径改变事件，仅用于文件列表框（FileBox）对象。

事件指示一个控件的内容已经改变的。

此事件如何和何时发生则随控件的不同而不同：•ComboBox－改变控件的文本框部分的正文。

该事件仅在Style 属性设置为 0（下拉 Combo）或 1（简单 Combo）和正文被改变或者通过代码改变了Text 属性的设置时才会发生。

•DirListBox－改变所选择的目录。

该事件在双击一个新的目录或通过代码改变Path 属性的设置时发生。

•DriveListBox－改变所选择的驱动器。

该事件当选择一个新的驱动器或通过代码改变Drive 属性的设置时发生。

•HScrollBar 和VScrollBar（水平和垂直滚动条）－移动滚动条的滚动框部分。

该事件在进行滚动或通过代码改变Value属性的设置时发生。

•Label－改变Label 的内容。

该事件在一个 DDE 链接更新数据或通过代码改变Caption 属性的设置时发生。

•PictureBox－改变PictureBox 的内容。

该事件当一个 DDE 链接更新数据或通过代码改变Picture属性的设置时发生。

•TextBox－改变文本框的内容。

该事件当一个 DDE 链接更新数据、用户改变正文或通过代码改变Text 属性的设置时发生。

语法Private Sub object_([index AsInteger])事件语法包括下列部分：事件过程可协调在各控件间显示的数据或使它们同步。

例如，可用一个滚动条的事件过程更新一个TextBox 控件中滚动条的Value 属性的设置。

或者可以利用事件过程在一个工作区里显示数据和公式，在另一个区域里显示结果。

事件过程在更新系统控件（DirListBox，DriveListBox 和FileListBox）中的各属性时也是有用的。

例如，可更新一个DirListBox 控件的Path 属性设置来反映一个DriveListBox 控件的Drive 属性设置的改变。

注意一个事件过程有时会导致一个。

Vb事件名Click：在一个对象上按下，然后释放一个鼠标按钮时发生. Change：控件的内容已经改变.Dblclick：一个对象上按下和释放鼠标按钮并再次按下和释放鼠标按钮时，该事件放生.Mousedown:按下鼠标按钮时发生.Mouseup：释放鼠标按钮时发生.Mousemove：在移动鼠标时发生.Keydown：在一个对象具有焦点时，按下一个键时发生.Keyup：在一个对象具有焦点时，松开一个键时发生.Keypress：在一个对象具有焦点时，按下和松开一个ansi键时发生. Gotfocus：当对象获得焦点时发生.Lostfocus：当对象失去焦点时发生.Load：在一个窗体被装载时发生.Unload：当窗体从屏幕上删除时发生.Resize：当一个对象第一次显示或一个对象窗口状态改变时发生呢. Active：当一个窗口对象成为活动窗口时发生.Deactne：当一个窗口对像不再是活动窗口时发生.Vd中的声明变量Private|dim|static|public变量名as数据类型。

（指明变量作用范围）常量声明[public|private]const常量名[as step]=常量表达式过程：通用过程（显示调用）和事件过程(自动调用)Sub过程语法：[private|pusne][static]————（语句代码）sub过程名（参数）End sub事件过程语法：控制事件语法：private sub————（语句代码）控制对象名---事件名（参数）End sub窗体事件语法：private sub form（语句代码）----事件名（参数）End sub sub 过程调用CallFunction 过程语法[private|public][static]————（语句代码）funcetion过程名（参数）[as 数据类型]End functionFunction过程调用：call+…………..。

Activate、Deactivate 事件在物件變成現用視窗的時候，會發生 Activate 事件。

而當物件不再是現用視窗時，則會發生Deactivate 事件。

語法Private Sub object_Activate()Private Sub object_Deactivate()object 代表一個「適用於」清單中的物件之物件運算式。

請注意物件可以藉由程式碼中的 Show 方法，來變成是現用的。

只有在物件是可見的時候，才會發生 Activate 事件。

而除非您使用 Show 方法，否則以 Load 來載入的 UserForm 並不是可見的。

只有在一應用程式中移動駐點，才會發生 Activate 及 Deactivate 事件。

而將駐點移到另一個應用程式並不會引發此事件。

在載出物件時，並不會發生 Deactivate 事件。

Initialize 事件發生在一個物件載入後，但尚未顯示的時候。

語法Private Sub object_Initialize()object 代表一個「適用於」清單中的物件之物件運算式。

請注意Initialize 通常用在準備使用一個應用程式，或是 UserForm 的時候。

您可將變數指定為起始值，且控制項可以移動或改變大小來配合初始資料。

QueryClose 事件發生在 UserForm 關閉之前。

Private Sub UserForm_QueryClose(cancel As Integer , closemode As Integer)QueryClose 事件的語法具有以下幾個單元：傳回值closemode 參數會傳回以下的值：這些常數都詳列在 Visual Basic for Applications 的物件瀏覽中的物件程式庫。

請注意vbFormMDIForm 也在「物件瀏覽」中，只是目前還沒有支援。

請注意這個事件通常用來確認：在應用程式關閉前，使用者表單中是否還有未結束的工作。

vb窗体所有事件（2）vb窗体所有事件（2）2009-10-03 21:21l KeyDown事件：按下键盘上的任意键l KeyUp事件：释放键盘的任意键l KeyPress事件：按下对应某ASCII字符的键（11）KeyDown事件和KeyUp事件按下键盘上的任意一个键，就会引发当前具有焦点的对象的KeyDown事件。

释放时，则会引发该对象的KeyUp事件。

以窗体为例，KeyDown事件和KeyUp事件的语法如下：Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)Private Sub Form_KeyUp(KeyCode As Integer, Shift As Integer)①Keycode参数KeyCode参数是一个整数，返回所按键的键码值。

键码值是以“键”为准。

例如，由于大写字母和小写字母使用同一键，因此“A”和“a”的键码值是相同的。

又如大键盘上的数字“1”和小建盘上的数字“1”，虽然是同一数字，但由于键不同，它们的键码值也不相同。

常用键的键码值如表4-1所示：表4-1 常用键的键码值②Shift参数Shift参数是一个整数值，返回Shift、Ctrl、Alt的状态。

只有检查此状态才能判断输入的是大写还是小写字母。

Shift参数用来判断是否按下了键盘上的Shift、Ctrl和Alt，或这3个键的任意组合，其对应的关系如表4-2所示：表4-2 Shift的取值和Shift、Ctrl和Alt组合状态的对应关系下面的代码将测试你当前按下的键，并通过消息框告诉你。

Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)Dim ShiftKey As IntegerShiftKey = Shift And 7 '7对应为1+2+4Select Case ShiftKeyCase 1 '或VbShiftMaskMsgBox "You pressed the Shift key."Case 2 '或VbCtrlMaskMsgBox "You pressed the Ctrl key."Case 4 '或VbAltMaskMsgBox "You pressed the Alt key."End SelectEnd Sub。

常用窗体事件（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 = 48FontName = "隶书"Print "装入窗体"End Sub(4) Unload事件Private Sub Form_Unload(cancel As Integer)卸载窗体时触发该事件。

(5) Resize事件Private Sub Form_Resize()当窗体大小发生改变时，将触发一个Resize事件。

vb窗体所有事件（4）vb窗体所有事件（4）Change 事件指示一個控制項的內容已經改變。

此事件是如何及何時發生的，則隨控制項的不同而有所差異：ComboBox - 改變控制項的文字方塊部分的文字。

該事件僅在Style 屬性設定為0 (Dropdown Combo)或1 (Simple Combo) 以及當文字被改變，或者藉程式碼改變了Text 屬性設定時才會發生。

DirListBox - 改變所選擇的目錄。

該事件發生在按兩下新目錄，或以程式碼改變Path 屬性設定時。

DriveListBox - 改變所選擇的磁碟機。

該事件發生在選擇了新磁碟機，或以程式碼改變Drive 屬性設定時。

HScrollBar 和VScrollBar（水平和垂直捲軸）- 移動捲軸的捲動方塊部份。

該事件發生在捲動或以程式碼改變Value 屬性設定時。

Label - 改變Label 的內容。

該事件發生在DDE 連結更新資料，或以程式碼改變Caption 屬性設定時。

PictureBox - 改變PictureBox 的內容。

該事件發生在DDE 連結更新資料，或以程式碼改變Picture 屬性設定時。

TextBox - 改變文字方塊的內容。

該事件發生在DDE 連結更新資料、使用者改變文字，或以程式碼改變Text 屬性設定時。

語法Private Sub object_Change([index AsInteger])Change 事件語法具有以下幾個單元：單元說明object 一個「適用於」清單中某物件的物件運算式。

index 一個整數，用以辨認在控制項陣列中的一個控制項。

請注意Change 事件程序可協調在各控制項間顯示的資料，或使它們同步處理。

例如，可用一個捲軸的Change 事件程序，更新一個TextBox 控制項中捲軸Value 屬性的設定。

或者可以利用Change 事件程序在一個工作區域裡顯示資料和公式，而在另一個區域裡顯示結果。

一、鼠标事件
Cilck：用户单击鼠标键时发生
DbLClick：用户双击鼠标键时发生
MouseDown：用户释放鼠标键时发生
MouseMove：移动鼠标时发生
二、键盘事件
KeyDown：在键按下时触发。

（可获得一个KeyCode值）
KeyUp：在键弹起时触发。

（可获得一个KeyCode值）
KeyPress：在键盘按下再弹起时发生。

（它可获得KeyAscii值）
注：
1、既然有了KeyDown和KeyUp，为什么还要KeyPress事件，我将键盘按下去后，到底是触发了KeyPress事件，还是KeyDown或KeyUp事件？答案是，当我们按了一下键盘后，这三种事件都触发。

2、一般而言，大多数程序并不关心KeyDown事件来确定按下的键，KeyPress事件在触发后，能够获得一个KeyAscii值。

它指键盘上的某个键与计算机ASCII码对应的值，如键“1”，KeyAscii为49；“A”，KeyAscii 为65；“Enter”，KeyAscii为13。

当我们在KeyPress事件中将KeyAscii 的值改为0后，就等于禁止键入。

3、然而并不是所有键盘上的键都有其KeyAscii值，有时，我们程序要判断用户是否按了功能键，可要区别数字小键盘和常规数字键时，那么KeyAscii就无能为力了。

此时可以考虑KEyDown和KeyUp事件，当用户击键后，它们能获得一个唯一的KeyCode值，从而判断用户到底按了键盘上的哪个键。

可以说，键盘上大多数键（Tab、PrintScreen键除外），都有唯一的KeyCode序列号。

常用的 ASCII 码表（0-127）。

VB列表框常用事件,属性和方法VB列表框常用事件,属性和方法常用事件列表框接收Click和DblClick事件。

但有时不用编写Click事件过程代码，而是当单击一个命令按钮或发生DblClick事件时，读取’text 属性。

常用方法列表框中的列表项，可以在设计状态通过List属性设置，也可以在程序中用Addhem方法来添加，用RemoveItem方法或Clear方法删除列表项。

(1)Addltem方法格式：列表框．AddItem(项目字符串)[，索引值]功能：AddItem方法把“项目字符串”的文本放到列表框中。

说明：如果省略了“索引值”，则文本被放在列表框的尾部。

可以用“索引值”指定插入在列表框中的位置，表中的项目是从0开始的计数，“索引值”不能大于表中项数ListCount一1。

该方法只能单个地向表中添加项目。

(2)RemoveItem方法格式：列表框．RemoveItem(索引值)功能：该方法用来删除列表框中指定的项目。

说明：该方法从列表框中删除以“索引值”为地址的项目，该方法每次只删除一个项目。

例如：在窗体上建立一个列表框：Listl，两个命令按钮：Commandl、Command2，则用下面的过程可以向列表框添加和删除项目。

Private Sub Commandl_Click()Listl．Addltem”One”，0End SubPrivate Sub Command2_Click()Listl．Removeltem 0End Sub程序分别向列表框中增加和删除项目。

单击命令按钮Commandl，可以把字符串“One”加到列表框Listl的开头；而单击命令按钮Command2，则可删除列表框开头的一项。

(3)Clear方法格式：列表框．Clear功能：该方法用来删除列表框中的全部内容。

说明：执行了Clear方法后，ListCount重新被设置为0。

列表框常用属性1．常用属性列表框的基本属性：Name、Height、width、Top、Left、Enabled、Visible和．Index 等列表框的特有属性：(1)List属性该属性是一个字符数组，存放列表框的项。