Отладка VB.NET Studio прекращается - PullRequest
Новая
       24

Отладка VB.NET Studio прекращается

0 голосов
/ 10 января 2019

Я пытаюсь проверить некоторые флажки программно. Я прочитал этот пост, чтобы сделать это. Как получить управляющее свойство по «имени строки»?

Мой код: 1) 

Dim FiltrosStr As String = AnswerX.Substring(7)
Dim Filt13() As String = FiltrosStr.Split(",")

If Filt13.Length >= 2 Then
Dim Filt1 = Filt13(0)
Dim Filt3 = Filt13(1)

x = 1
For Each XBit As Char In Filt1

    Dim ChkName As String = "Filt" & x.ToString & "xxEvtVerChk"

    Dim ChkX As CheckBox = Me.Controls.Find(ChkName, True).FirstOrDefault()'<-Halt here

    If XBit = "1" Then
        ChkX.Checked = True
    Else
        ChkX.Checked = False
    End If
    x += 1
    If x > 6 Then
        Exit For
    End If
Next

2) Также пробовал 

Dim x As Integer
Dim FiltrosStr As String = AnswerX.Substring(7)
Dim Filt13() As String = FiltrosStr.Split(",")

If Filt13.Length >= 2 Then
Dim Filt1 = Filt13(0)
Dim Filt3 = Filt13(1)

x = 1
For Each XBit As Char In Filt1

    Dim ChkName As String = "Filt" & x.ToString & "xxEvtVerChk"
    Dim ChkX As CheckBox = CType(Me.Controls(ChkName), CheckBox)'<-Halt here            
    If XBit = "1" Then
        ChkX.Checked = True
    Else
        ChkX.Checked = False
    End If
    x += 1
    If x > 6 Then
        Exit For
    End If
Next

Мне просто нужно установить или снять некоторые флажки внутри трехуровневой вкладки. Form-> TabPage-> TabPage-> TabPage-> GroupBox-> CheckBox

12 флажков имеют почти одинаковые имена, только в середине их имен изменяется только одно число.

Я не понимаю, что я делаю неправильно и почему даже IDE останавливаются. Единственный способ остановить это - закрыть сеанс или перезапустить Windows.

...