[VB.NET] 비주얼베이직 .NET 버전에서 계산기 숫자 입력을 효율적으로 구현하는 방법

비주얼 베이직 연습할 겸 계산기 만들고 있는데요,
숫자 버튼 눌러서 텍스트 박스에 숫자가 뜨게 할 때 사진에 있는 방법 말고 다른 방법은 없나여?
저렇게 일일이 쓰지않고 하는 방법이 있는 것 같은데 독학이라 어렵네요…
감사합니다.

안녕하세요? “비주얼베이직 .NET 버전에서 계산기 숫자 입력을 효율적으로 구현하는 방법”에 대해 질문주셨군요.

아래와 같이 NumberPad_Click 이라는 이벤트를 만드시구요! Handles 부분에 인식되어야 할 모든 버튼들의 이름들을 추가해줍니다.

Private Sub NumberPad_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click, Button2.Click, Button3.Click, Button4.Click, Button5.Click, Button6.Click, Button7.Click, Button8.Click, Button9.Click, Button0.Click
Try
Dim T As Button
T = CType(sender, Button)
'Button1 과 같은 Name 속성의 마지막 글자 (숫자) 만 추출해서 입력하게 하는 코드.
'예: Name 속성이 Button1 로 설정되어 있을 경우 마지막 글자인 1 을 텍스트박스에 입력.
InputNumber(Microsoft.VisualBasic.Right$(T.Name, 1))
Record = Nothing
Catch ex As Exception
MsgBox(ex.ToString(), MsgBoxStyle.Exclamation, "Exception : NumberPad_Click")
End Try
End Sub

이렇게 코드를 작성하시면 모든 버튼들을 클릭하실 때 숫자가 표시됩니다.
고맙습니다.