2015-12-14 105 views
0

我動態地重命名按鈕,我需要根據按鈕文本執行一個功能。我有工作代碼(每個按鈕5個部分)。是否有很好的方法,使用DirectCast或CType或真正的任何其他功能的所有5個按鈕的單一功能,所以我不必有多個功能是做同樣的事情?VB.net使用一個功能的多個按鈕

兩個5個按鍵的我的代碼示例:

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click 
    If Button1.Text = "GO" Then 
     MsgBox("GO") 
    ElseIf Button1.Text = "STOP" Then 
     MsgBox("STOP") 
    End If 
End Sub 

Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click 
    If Button2.Text = "GO" Then 
     MsgBox("GO") 
    ElseIf Button2.Text = "STOP" Then 
     MsgBox("STOP") 
    End If 
End Sub 

提前感謝!

+0

CTYPE等工程對類型不是方法。只要將它們連接到相同的處理程序 – Plutonix

+1

[VB.NET中的同一事件的多個事件處理程序]的可能重複(http://stackoverflow.com/questions/12588350/multiple-event-handlers-for-the-same-事件在虛擬網絡) –

+0

@varocarbas - 謝謝,這工作爲我在做什麼。 – FNDevCJ

回答

0

而不是直接引用Buton1你可以試試這個(不知道VB.NET sintax):

Dim myButton as Button 
myButton=(button)sender 
If myButton.Text = "GO" Then... 
相關問題