VB.NET
* Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

For ii = 0 To CheckedListBox1.CheckedItems.Count
ListBox1.Items.Add(CheckedListBox1.CheckedItems(ii))
ii += 1
Next
End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
ListBox1.Items.Clear()

CheckedListBox1.Items.Add(TextBox1.Text)

End Sub

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click

For jj = 0 To CheckedListBox1.CheckedItems.Count
CheckedListBox1.Items.RemoveAt(jj)

jj += 1
Next


End Sub
End Class 

checkedlistbox.PNG

 CheckedListBox의 Items을 추가 하고 선택된 항목을 삭제 할수 있는 프로그램

 

 

에러 부분을 수정하여 댓글 남기기