[비주얼베이직] 라디오 버튼 사용하기!!

이번에는 라디오버튼에 대해 살짝 작성해 볼게요!!

라디오 버튼은 저번에 했던 체크박스와 매우 비슷해요

근데 체크박스와 차이점이 좀 있습니다!!

 

그건 바로바로..... 체크박스는 여러개가 선택 가능했다면,

라디오박스는 다중선택이 안된다는 겁니다.

즉 하나의 옵션만 선택해야 될 경우 이 라디오 버튼을 사용하게 되는 겁니다

 

일단 저번 체크박스와 비슷하게 만들어 보겠습니다.

 

 

 

체크박스 옆에 보시면 동그란 원안에 점이 찍힌게 라디오 버튼 입니다!!

저걸로 디자인창에 드래그 하시면 라디오 박스 모양이 나오실 거에요 ㅎㅎ

 

 

일단 저번과 비슷하게 하기 위해 디자인을 비슷하게 해봤습니다.

라디오 버튼 3개와, 버튼 1개, 텍스트박스 하나를 만들어 봤습니다.

라디오 박스를 선택을 하고, 버튼을 누르면

텍스트박스 창에 선택한 라디오버튼에 있는 말이 나오게 되는 프로그램 입니다!!

 

 

 

자 이제 만들었던, 각 항목들에 대해 이름을 지정해 줘야 겠죠??

각각의 속성에서 Caption 부분을 수정하면 됩니다!

저는 위와 같이 수정 했습니다.

아 텍스트박스는 Caption 속성으로 수정하는거 아니고 Text 속성으로 수정해야 하는거

아시죠?? ㅎㅎ

                             

 

이번 프로그램도 버튼을 눌렀을때 이벤트가 발생 하므로

디자인 창에서 그냥 버튼을 더블클릭 해주세요 따당!!

버튼 클릭 함수 사이에 보시면

IF문이 나왔어요 ㅎㅎ

저번 체크박스랑 비슷하죠??!!!!!!!!!!!!!!!!!!

 

if Option1.Value = True then

Text1.Text = Option1.Caption

End If

 

이거에 대해 말해 볼게요

Oprion1.Value는 라디오버튼이 체크값이에요

라디오버튼이 체크가 되어 있다면, Option1.Value는 True 이고,

체크가 안되어 있다면 Option1.Value는False 에요

 

그러니깐 위에 IF문 조건은 라디오버튼이 체크가 되있나 안되있나를 확인하는 조건문 이에요 ㅎㅎ

그래서 조건이 만족했다면!!

텍스트박스에 뿌려주는 거에요

전에는 라벨에 뿌려 줬는데 이번에는 텍스트 박스에요

라발에 뿌려줄때는

Label1.Caption = Option1.Caption 이였어요, 라벨에 나오는 글씨는 Caption 속성에 있는 내용이 나오는 거라 그래요 ㅎ

텍스트 박스는 Text 속성에 있는 내용이 나와요

그래서 위 소스 보시면

Text1.Text = Option1.Caption 이렇게 되 있어요

라디오버튼에 있는 Caption값을 텍스트박스에 뿌려주는 거에요

 

 

자 이제 완성을 했으니 프로그램을 실행시켜 볼게요

라디오 버튼은 처음에도 말했듯이!! 하나밖에 선택이 안되요

하나를 선택 후 확인 버튼을 누르시면

텍스트박스 창에 선택한 라디오버튼의 Caption이 나오시는걸 확인하실수 있으실 겁니다!!

 

Private Sub Command1_Click()
If Option1.Value = True Then
    Text1.Text = Option1.Caption
End If

If Option2.Value = True Then
    Text1.Text = Option2.Caption
End If

If Option3.Value = True Then
    Text1.Text = Option3.Caption
End If
End Sub