VB :: Q & A

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

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

NumberInput

 

안녕하세요? “비주얼베이직 .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

 

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

Advertisements

Leave a Reply

Fill in your details below or click an icon to log in:

WordPress.com Logo

You are commenting using your WordPress.com account. Log Out /  Change )

Google photo

You are commenting using your Google account. Log Out /  Change )

Twitter picture

You are commenting using your Twitter account. Log Out /  Change )

Facebook photo

You are commenting using your Facebook account. Log Out /  Change )

Connecting to %s