Question

VB里如果有两个事件要执行一模一样的操作怎么办？

VB里面如果有两个事件比如Private Sub command1_click()和Private Sub command2_click()要执行的操作是一模一样的，那么该如何做？

Answer 1

可以Call另一个过程 你可以在Private Sub command1_click()下写按下command1按钮后运行的代码。然后在Private Sub command2_click()下写 Call Command1_Click 这样就可以触发按下Command1了。 或者你另写一个的Sub过程，把这两个事件要运行的代码放进那个过程里，然后在Private Sub command1_click()和Private Sub command2_click()下都写入Call 那个过程的代码。 这样就可以了 如果不会请追问.

Answer 2

将你这个要执行的过程写成一个过程函数例如function 过程函数()..........end function然后这两个事件调用CALL 过程函数()或者sub 过程事件().......end sub 更简单的方法：Private Sub Command2_Click()
Command1_Click '本句可以在单击command2时，即可执行command1的单击代码。
End Sub

Answer 3

Private Sub command1_click()下面写事件Private Sub command2_click()command1_click

Answer 4

sub xx() msgbox "hi man!"end subPrivate Sub command1_click() xx '这是调用上面的过程end subPrivate Sub command2_click() xx '这是调用上面的过程ens sub