qq_33785275 2016-01-18 15:50 采纳率: 0%
浏览 1600

关于VB的checklistbox和Listbox的信息交换,求大神帮忙啊!!!!!1

我想要把用一个checklistbox里面的选项限制另外一个checklistbox可以选多少个,然后再将选到的文本显示在listbox中,但我不知道该怎样做呀!!!!!!
这是我写的Code
Private Sub cbSizeOfBox_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cbSizeOfBox.SelectedIndexChanged
Dim Q As Integer
Q = Q + clbExtreSelect.CheckedItems.Count

    If cbSizeOfBox.Text = "Small   £ 6.95" And Q > 1 Then
        For Q = 0 To clbExtreSelect.CheckedItems.Count - 1
            clbExtreSelect.SetItemChecked(Q, False)
        Next
        MessageBox.Show("You can choose only up to 1 item")
    End If
    If cbSizeOfBox.Text = " Medium    £ 11.95" And Q > 3 Then
        For Q = 0 To clbExtreSelect.CheckedItems.Count - 1
            clbExtreSelect.SetItemChecked(Q, False)
        Next
        MessageBox.Show("You can choose only up to 3 item")
    End If
    If cbSizeOfBox.Text = "Large     £ 15.95 " And Q > 8 Then
        For Q = 0 To clbExtreSelect.CheckedItems.Count - 1
            clbExtreSelect.SetItemChecked(Q, False)
        Next
        MessageBox.Show("You can choose only up to 6 item")
    End If
    If BoxChosen = False Then
        lstList.Items.Add(cbSizeOfBox.SelectedItem)
        BoxChosen = True
    End If
End Sub

    求大神指导啊!
  • 写回答

3条回答

  • threenewbee 2016-01-18 16:00
    关注

    把你的问题说清楚,你想做什么,现在的代码有什么问题。你说得太简略。

    评论

报告相同问题?

悬赏问题

  • ¥15 关于#python#的问题:求帮写python代码
  • ¥20 MATLAB画图图形出现上下震荡的线条
  • ¥15 LiBeAs的带隙等于0.997eV,计算阴离子的N和P
  • ¥15 关于#windows#的问题:怎么用WIN 11系统的电脑 克隆WIN NT3.51-4.0系统的硬盘
  • ¥15 来真人,不要ai!matlab有关常微分方程的问题求解决,
  • ¥15 perl MISA分析p3_in脚本出错
  • ¥15 k8s部署jupyterlab,jupyterlab保存不了文件
  • ¥15 ubuntu虚拟机打包apk错误
  • ¥199 rust编程架构设计的方案 有偿
  • ¥15 回答4f系统的像差计算