Имя пользователя:
Пароль:
 

Название темы: Visual Basic 2008
Показать сообщение отдельно

Аватара для Devils0411

Ветеран


Сообщения: 902
Благодарности: 51

Профиль | Отправить PM | Цитировать


Еще одна задачка, которую не могу понять как решить. Есть CheckListBox, в котором два пункта с флажками. При выборе двух пунктов, как определить, какой пункт был выбран последним?

Код: Выделить весь код
        Dim x As Integer
        Dim gchk, gchk1 As String
        Dim itemChecked As Object
        Const quote As String = """"
        For Each x In CheckedListBox1.CheckedIndices
            MessageBox.Show("Index#: " + x.ToString() + ", is checked. Checked state is:" + _
           CheckedListBox1.GetItemCheckState(x).ToString() + ".")
            gchk = CheckedListBox1.GetItemCheckState(0).ToString()
            gchk1 = CheckedListBox1.GetItemCheckState(1).ToString()
        Next

        For Each itemChecked In CheckedListBox1.CheckedItems

            ' Use the IndexOf method to get the index of an item.
            MessageBox.Show("Item with title: " + quote + itemChecked.ToString() + quote + _
                            ", is checked. Checked state is: " + _
                            CheckedListBox1.GetItemCheckState(CheckedListBox1.Items.IndexOf(itemChecked)).ToString() + ".")
        Next
Т.е. нужно запомнить флажков было при первом выборе, а потом на основе этих данных изменить положение флажков.
К примеру выбрали мы первый пункт и поставили флажок. После мы выбрали второй пункт, и вот тут нам нужно чтобы флажок с первого пункта снялся. Поставили снова флажок на первом пункте и флажок снялся со второго пункта и т.д.

-------
Скрипт автоустановки WINDOWSXP; Скрипт мультиустановки ОС


Отправлено: 21:53, 04-02-2015 | #345

Название темы: Visual Basic 2008