CheckedListBox怎么显示一个数据行的数据?
代码如下:
Dim mycommand As SqlDataAdapter = New SqlDataAdapter("selectagency", thevar.myconnection)
mycommand.SelectCommand.CommandType = CommandType.StoredProcedure
Dim ds As New DataSet
Try
mycommand.Fill(ds, "agency")
Dim r As DataRow
For Each r In ds.Tables("agency").Rows
'CheckedListBoxdj.Items.Add(r.Item("agencyname"))
CheckedListBoxdj.Items.Add(r)
Next
CheckedListBoxdj.DisplayMember = r.Item("agencyname").ToString
Catch ex As Exception
Labelmsg.Text = ex.Message
Finally
End Try
这个显示的是sys.data.data,怎么才可以让它象绑定数据源一样的显示特定的字段呢?displaymember=该怎么写?