Блог

Я пытаюсь запустить код в форме Windows,используя vb.net где у меня есть несколько ящиков с картинками со свойствами, такими как backgroudimage и местоположение.

Поэтому я хочу устранить эти повторяющиеся инициализации,и поэтому я пытаюсь инициализировать все элементы управления с помощью GetType.Команда Getproperties. Но я получаю ошибку исключения

 Private Sub Read_csv_file_itextbox_Load_1(sender As Object, e As EventArgs) Handles MyBase.Load
    For Each c As Control In Me.Controls
        If c.GetType().Name = "TextBox" Then
            c.GetType().GetProperty("BackColor").SetValue(c, "Transparent", Nothing)
        End If
    Next
End Sub
 

И мне также нужно явно задать свойства для некоторых текстовых полей,которые имеют имена TextBox1, TextBox2, Textbox3 и так далее.

И я хочу получить доступ к этим текстовым полям в их индексации четных чисел и выполнить свой код.

Правильный способ сделать то, что вы пытаетесь сделать в коде, который вы опубликовали, был бы следующим:

 For Each tb In Controls.OfType(Of TextBox)()
    tb.BackColor = Color.Transparent
Next
 

Не используйте Отражение без веской причины.

Обратите внимание, что установка значения BackColor a TextBox Transparent не обязательно имеет смысл, но вы можете использовать тот же принцип для любого типа элемента управления, любого свойства и любого значения.

Если вы хотите отфильтровать любой список с помощью LINQ, вы вызываете Where метод. Вам предстоит определить, какое условие(условия) вы хотите отфильтровать, и написать соответствующее Boolean выражение, например

 For Each tb In Controls.OfType(Of TextBox)().
                        Where(Function(tb) Enumerable.Range(1, 10).
                                                      Where(Function(n) n Mod 2 = 0).
                                                      Select(Function(n) $"TextBox{n}").
                                                      Contains(tb.Name))
    tb.BackColor = Color.Transparent
Next
 

Это сначала создаст список TextBoxes , а затем отфильтрует их Name . Он будет включать только те, у Name TextBoxN которых число где N является четным числом в диапазоне от 1 до 10. Это прекрасный пример того, как сначала определяется логика, т. Е. выясняется, что должен делать код, а затем пишется код, специально предназначенный для этого.