CheckedListBox:Itemのセット

■CheckedListBox

 CheckedListBoxは何故かDataSourceが使えない…。

 (*)Propertyにはあるが、DataSourceに値をセットした時点で何故かエラー。

 

■仕方ないのでItemをAddする

 Dim wList As List(T)
 Dim wkp As KeyValuePair(Of Integer, String)
 For Each wrk In wList
  wkp = New KeyValuePair(Of Integer, String)(キー、値)
  _frm.ChkLstShikaku.Items.Add(wkp)
 Next
 _frm.ChkLstShikaku.DisplayMember = "Value"
 _frm.ChkLstShikaku.ValueMember = "Key"

 

(*)DisplayMemberにセットする値は上記の通り"Value","Key"という文字列でないとNG