[비주얼베이직] (문법) 문자 결합 연산자 사용하기

비주얼베이직의 문자 결합 연산자는

여러 개의 문자를 결합하는 연산자로 수치 계산의 '+'와는 다른 기능을 수행한다.
숫자 1 + 1 은 2로 계산되지만, 문자 1 & 1 은 11로 처리된다.
이러한 특성을 활용하여 TextBox 나 Label 다양한 정보를 출력하는 용도로 자주 사용된다.
또한 한 줄에 모두 출력되지 못하는 정보를 여러 줄에 표시하는 줄바꿈 기호 역시 문자 결합 연산자와 함께 사용되어야 한다.

비주얼베이직 문자 연산자의 사용방법

문자 & 문자 : 두 문자를 결합한다.
문자열 안에 공백이 포함되면 공백도 결합되어 표시된다.
줄바꿈을 처리할 때는 'chr(10) & chr(13)' 을 사용한다.
이미 입력된 값에 새로운 값을 추가할 때는 이미 입력된 값을 반드시 포함해야 한다.


예시

Text1 제품이름이 입력될 텍스트
Text2 제품종류가 입력될 텍스트
Text3 구입수량이 입력될 텍스트
Text4 구입단가가 입력될 텍스트
Command1 결과출력 단추

디자인을 이렇게 해주세요 ^^



비주얼베이직 문자 결합 연산자 소스

 Private Sub Command1_Click()    '결과출력 버튼
Dim 수량 As Integer, 단가 As Integer
수량 = Text3.Text
단가 = Text4.Text
Label5.Caption = "구입한 제품은 " & Text1.Text & "이며"
임시 = Label5.Caption & Chr(10) & Chr(13)
Label5.Caption = 임시 & "제품 종류는 " & Text2.Text & "이며"
임시 = Label5.Caption & Chr(10) & Chr(13)
Label5.Caption = 임시 & "구입한 수량은 " & Text3.Text & "개 이며"
임시 = Label5.Caption & Chr(10) & Chr(13)
Label5.Caption = 임시 & "구입한 단가는" & Text4.Text & "원 이므로"
임시 = Label5.Caption & Chr(10) & Chr(13)
Label5.Caption = 임시 & "총 구입금액은 " & 수량 * 단가 & "원 입니다."
End Sub

F5 를 눌러 실행해 봅시다.

정상적으로 표시됬네요
 

요기서 추가로 종료버튼과, 초기화 버튼을 만들어봅시다.



종료 버튼에는 이소스와

Private Sub Command2_Click()
Unload Me
End Sub



초기화 버튼에는 이소스를 입력해주세요

Private Sub Command3_Click()
Label5.Caption = ""
End Sub

비주얼베이직 문자 결합 연산자 예시

문자 결합 연산자.zip

이상으로 비주얼베이직 문자 결합 연산자 사용하기 포스팅을 마치겠습니다.



더많은 강좌를 보시려면