Question

我是Visual Basic的新手，我想编写多个按钮，按钮具有相似的功能，并希望为每个按钮添加相同的脚本，但它会为每个按钮提供多行，所以如何使用相同的脚本，我希望能够将外部链接设为与基本程序链接通信的“.VB”... 例如：

（主窗口代码）“JoVen.vb”

Public Sub Button1_Click (ByVal sender As System.Object, ByVal e As
    'Code to send run External link Ai.vb
End Sub

Public Sub Button2_Click (ByVal sender As System.Object, ByVal e As
    'Code to send run External link Ai.vb
End Sub

（代码外部VB脚本）“AI.vb”

Public Class AI
    Public Sub Main ()
         Dim But1 The New Jove ()
         But1.Bt1 = True
         MsgBox ("Link Executed")
    end Sub
end Class

我希望你理解我，对不起，如果我写错了，我正在使用谷歌翻译。

Answer 1

您可以使用相同的单击事件处理程序处理多个按钮控件，如下所示：

Public Sub Button_Click (ByVal sender As System.Object, ByVal e As System.EventArgs) _
    Handles Button1.Click, Button2.Click, Button3.Click, Button4.Click
    ' Common code that all buttons need here
Dnd Sub

现在您不必为一堆按钮点击事件处理程序“重复”逻辑。

Answer 2

您可以在对象过程结束时使用句柄，例如

Public Sub Button_Click (ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click, Button2.Click, Button3.Click, Button4.Click

如何执行外部链接 - VB 2008

2 个答案: