[비주얼베이직] 리스트박스(ListBox) 사용하기

리스트박스는 콤보박스와 추가하는방식이 똑같으니 생략하고 리스트박스를 이용한 프로그램을 제작해보겠습니다

이렇게 디자인 해주세요

Text1을 공백으로 해주시구요 ㅎ


소스

Private Sub Command1_Click()         '추가버튼
List1.AddItem Text1.Text   '리스트1에 새 항목을 추가한다
Text1.Text = ""
Text1.SetFocus
End Sub

Private Sub Command2_Click()        '삭제버튼
List1.RemoveItem List1.ListIndex         '리스트1에 항목을 삭제한다
End Sub

F5을 눌러 실행해주세요

텍스트 란에 글을 입력후 추가를 눌러주시면 리스트박스로 추가됩니다

리스트박스에 불필요한것을 클릭후 삭제 버튼을 눌러봅시다

삭제가 정상적으로 되지요?



이상으로 [비주얼베이직] 리스트박스(ListBox) 사용하기 포스팅을 마치겠습니다