仅使用一个事件处理程序按下时,在按钮内获取文本

Question

我正在制作一个简单的计算器.我厌倦了在每个按钮中分配事件处理程序,这是低效的.

我只想要一个事件处理程序在按下时获取按钮内的文本.

怎么做？

  Private Sub num1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles co.Click
    numPressed = num1.Text
End Sub

Answer 1

在您的点击事件中:

Dim button as Button = sender
Dim theTextYouWant as String = button.Text