[英]VB.net Multiple Buttons using one function
我动态重命名按钮,并且需要基于按钮文本执行功能。 我有工作代码(每个按钮5个部分)。 有没有一种好方法,可以使用DirectCast或CType或所有其他功能仅对所有5个按钮使用一个功能,因此我不必具有多个在做同一件事的功能?
我的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
提前致谢!
您可以尝试以下方法,而不是直接参考Buton1(不确定VB.NET sintax):
Dim myButton as Button
myButton=(button)sender
If myButton.Text = "GO" Then...
声明:本站的技术帖子网页,遵循CC BY-SA 4.0协议,如果您需要转载,请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.