Вызов метода управления из другой функции vb.net

Question

Мне интересно, можно ли использовать метод, связанный с элементом управления из другой функции. Например,

Sub myCheckBox(sender As Object, e As EventArgs) Handles myCheckBox.CheckedChanged 
'''Code I want to run from other function 
End Sub 

Function MyOtherFunction(x as double, y as double) as double 
'''Call myCheckBox method 
End function 

Answer 1

В целом разумно ограничивать код в событиях обработкой связанных с пользователем вещей. Вы можете разместить общий код в сабвуферов и вызывать их из событий, другие методы (СУБ) и другие функции:

Sub myCheckBox(sender As Object, e As EventArgs) Handles myCheckBox.CheckedChanged 
    ' user/click related code 
    ' ... 
    CommonReusableCodeSub(sender As object) 
    End Sub 

    Function MyOtherFunction(x as double, y as double) as double 
    ' do some special stuff, maybe even just to prep 
    ' for the call to a common sub 
    CommonReusableCodeSub(Nothing) 
    End function 

    Sub CommonReusableCodeSub(chk as CheckBox) ' can also be a function 
     ' do stuff common to both above situations 

     ' note how to detect what is going on: 
     If chk Is Nothing then 
     ' was called from code, not event 
     ' do whatever 
     Exit Sub  ' probably 
     End If 

     Select Case chk.Name  ' or maybe chk.Tag 
      chk.thisOption 
      ' do whatever 
      chk.thatOption 
      ' do whatever 
      ' etc... 
     End Select 

    End Sub 

Это предотвращает приложение логики (бизнес/Интернет и т.д. и т.п. и т.д.) от получения безнадежно перемешались и даже зависит от UI-слой и текущий макет. Примечание: некоторые элементы управления реализуют способ вызова кода события: кнопки и радиоприемники, например, имеют btn.PerformClick, нет такой удачи с флажками.

Answer 2

Предполагая, что WinForms:

Dim cbs = Me.Controls.OfType(Of Checkbox)().Where(Function(cb) cb.Checked).ToList() 
For Each cb In cbs 
    'run code for each checkbox that is checked 
Next