使用CheckListBox

Question

我正在尝试使用checklistbox创建一个if语句。如何在检查列表框中使用选中的值创建if语句？我尝试使用下面的代码就像在组合框中一样：

If CheckedListBox1.CheckedItems = "AHRM" Then

但我收到了一个错误：

  

类型的值无法转换为字符串。

Answer 1

CheckedListBox.CheckedItems会返回所有已检查项目的collection条。不是一个字符串。

您可以检查它的timerange <- function(startvec, endvec) { dates <- seq(as.Date(startvec), as.Date(endvec), by="days") return(dates) } 属性，如果您只期望一个属性，请选择第一个属性：

Count

如果你期望多个，你可以使用以下小LINQ查询和Dim checked As String = Nothing Dim checkedItems = CheckedListBox1.CheckedItems If checkedItems.Count <> 0 Then checked = checkedItems(0).ToString() If checked = "AHRM" Then .... 或Contains（如果你想连接它们）：

String.Join

Answer 2

Dim values As [String] =＆＃34;＆＃34;

对于i as Integer = 0 To CheckBoxList1.Items.Count - 1

如果CheckBoxList1.Items（i）.Selected Then

values = CheckBoxList1.Items（i）.Value

   If values  = "AHRM" Then
   // your code
   end if

结束如果 下一步