Выбор кнопки из вида
Я застрял с некоторым синтаксисом при выяснении, какая из 2 кнопок в представлении была нажата. У меня есть несколько представлений - так что сначала произойдет, если текст назначается двум кнопкам на основе текущего представления, а затем я хочу выполнить действие, основанное на том, какая кнопка была нажата. Мои представления работают нормально - это код кнопки, который я пытаюсь выяснить. Я также пытаюсь избежать написания подпрограммы для каждого отдельного нажатия кнопки - и хочу общий код, который я могу использовать для любого из представлений, которые всегда будут иметь 2 кнопки.
Sub catchtheClick
Dim button1,button2,clickButton As Button
clickButton = Sender
If (we figure out which view - view1 for example) Then
button1.Text = "view1-button1"
button2.Text = "view1.button2"
button1.Tag = "btn1"
button2.Tag = "btn2"
Select clickButton.Tag
Case "btn1"
(we go to another view etc.)
Case "btn2" Then
(we go to some other view etc.)
End Select
End If
End Sub
3 ответа
Я сделал несколько изменений - в том числе расположение кнопки init и имена событий - теперь все работает нормально.
Избегайте путаницы - просто используйте конструктор, чтобы добавить представления, а затем используйте "Инструменты... Генерация членов", чтобы добавить все ваши операторы Dim и статистику событий.
Вы видели учебник по массивам представлений?
Ваш код неверен. Вы объявляете button1 и button2, которые никогда не инициализируются и не назначаются. Самое простое решение - использовать свойство Tag, чтобы пометить каждую кнопку, а затем проверить clickButton.Tag и найти, какая кнопка была нажата.