3-11 리스트박스 컨트롤을 이용하여 항목 추가/제거하기

리스트박스로 만들어 준비해야할 항목을 점검(추가/삭제하는 프로그램 생성)

코드 작성

Public Class Form1
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        ListBox1.Items.Add("장갑")
        ListBox1.Items.Add("타월")
        ListBox1.Items.Add("양말")
        ListBox1.Items.Add("바지")
    End Sub

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        ListBox1.Items.Add(TextBox1.Text)
        TextBox1.Text = ""
        TextBox1.Focus()
    End Sub

    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        ListBox2.Items.Add(ListBox1.Text)
        ListBox1.Items.Remove(ListBox1.Text)
    End Sub

    Private Sub ListBox2_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ListBox2.SelectedIndexChanged
        ListBox1.Items.Add(ListBox2.Text)
        ListBox2.Items.Remove(ListBox2.Text)
    End Sub
End Class

 

실습

 

실행