Question

我试图找到一种方法来遍历要在文本框中显示的字符串列表。这些字符串是从一个名为＆＃39; texts＆＃39;的单独类中检索的。字符串在＆＃39;文本中声明。 class as（适用于ngs1,2,3等）

position: absolute

当单击下一个按钮时，该块运行，按钮的目的是遍历显示的文本列表。

 Public Shared ngs1 As String = "Text"

我希望能够在没有精选案例的情况下做到这一点，因此它本质上是

        ElseIf firstTimeRun = True Then
        welcome += 1
        Select Case welcomePages
            Case 1
                txtDisplay.Text = texts.ngs1
            Case 2
                txtDisplay.Text = texts.ngs2
            Case 3
                txtDisplay.Text = texts.ngs3
        End Select

我不确定如何正确地执行此操作，方法是使用其他变量名称中的变量。非常感谢任何帮助，谢谢！

Answer 1

如果您只想迭代所有这些文本，只需创建一个（String）或数组列表并添加所有ngsX ...

例如： Dim list as List(Of String)

Dim indexActualShownString as Integer

然后你可以在你的Clicked_Event中使用

txtDisplay.text=list.Items(indexActualShownString) as Integer
indexActualShwonString += 1

但我不确定我是否理解你的问题。你还应该实现一种重置indexActualShownString的方法，因为我不知道它的目的究竟是什么。

使用变量迭代变量？

1 个答案: