Vb.net Visual Basic-列表框

Vb.net Visual Basic-列表框,vb.net,listbox,checkedlistbox,Vb.net,Listbox,Checkedlistbox,我有两个列表框。ListBox1由选中列表框(LotteryBox)中的5个选定数字填充,ListBox2由随机数字1-99填充。我想找到一种方法来验证两个列表框中的数字是否匹配。例如,如果它们匹配一个数字。它会说“你已经匹配了一个号码”。等等我认为我在正确的道路上: Dim Matched As Integer = 0 If ListBox2.Contains((LotteryBox.SelectedItem)) Then Matched += 1 If ListBox2.Co

我有两个列表框。ListBox1由选中列表框(LotteryBox)中的5个选定数字填充,ListBox2由随机数字1-99填充。我想找到一种方法来验证两个列表框中的数字是否匹配。例如,如果它们匹配一个数字。它会说“你已经匹配了一个号码”。等等我认为我在正确的道路上:

Dim Matched As Integer = 0
    If ListBox2.Contains((LotteryBox.SelectedItem)) Then Matched += 1
    If ListBox2.Contains((LotteryBox.SelectedItem)) Then Matched += 1
    If ListBox2.Contains((LotteryBox.SelectedItem)) Then Matched += 1
    If ListBox2.Contains((LotteryBox.SelectedItem)) Then Matched += 1
    If ListBox2.Contains((LotteryBox.SelectedItem)) Then Matched += 1

但是我如何区分在彩票盒中选择的五个数字呢

尝试通过从lotterybox填充的listbox1循环。 就像这样(我没有设置对象来测试这个。)


您的列表框永远不会包含任何数字。键入时弹出的intellisence告诉您,
Contains
将控件作为参数,而不是SelectedItem。MSDN(F1)表示该方法检索一个值,该值指示指定控件是否为该控件的子控件。由于数字/字符串不是控件,因此它将始终为false。数据位于items集合中。但使用数据比使用控制更好
For listItem = 0 To Listbox1.ListCount - 1
  if ListBox2.Contains(listbox1.List(listItem)) Then Matched = Matched + 1
Next listitem