如何对私人Sub vb网络进行调暗

Question

我该如何简化？

我将不得不将此代码编写79次，并且每次+1。

    Dim C1 = TxtConsecutiveCount1.Text
    Dim C2 = TxtConsecutiveCount2.Text
    Dim C3 = TxtConsecutiveCount3.Text
    Dim C4 = TxtConsecutiveCount4.Text
    Dim C5 = TxtConsecutiveCount5.Text

    For i As Integer = 1 To Val(TxtConsecutiveNumber2Count.Text)
        Dim C = +(i) = TxtConsecutiveCount1.Text
        Dim TxtConsecutiveCount = TxtConsecutiveCount(i).text

Answer 1

我也不了解您的目的，但是我可以说您可以像这样使公众黯淡

Public test As String  = ""

这将帮助您通过另一种简便的方法来标记该字符串。