Warning: file_get_contents(/data/phpspider/zhask/data//catemap/7/python-2.7/5.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Vb.net 使用变量遍历变量?_Vb.net - Fatal编程技术网

Vb.net 使用变量遍历变量?

Vb.net 使用变量遍历变量?,vb.net,Vb.net,我试图找到一种方法来迭代文本框中要显示的字符串列表。这些字符串是从一个名为“text”的单独类中检索的。 字符串在“text”类中声明为(对于ngs1、2、3等) 单击“下一步”按钮时,该块将运行,该按钮的目的是遍历显示的文本列表 ElseIf firstTimeRun = True Then welcome += 1 Select Case welcomePages Case 1 txtDi

我试图找到一种方法来迭代文本框中要显示的字符串列表。这些字符串是从一个名为“text”的单独类中检索的。 字符串在“text”类中声明为(对于ngs1、2、3等)

单击“下一步”按钮时,该块将运行,该按钮的目的是遍历显示的文本列表

        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
我希望能够在没有选择案例的情况下做到这一点,这样基本上

'Pseudo code
ElseIf firstTimeRun = True Then
welcome += 1
txtDisplay.text = texts.ngs(welcome)

我不知道如何正确地做到这一点,在其他变量的名称中使用一个变量。任何帮助都将不胜感激,谢谢

如果您只想遍历所有这些文本,只需创建一个列表(字符串)或数组并添加所有ngsX

例如:
Dim列表作为列表(字符串)

然后您可以在单击的事件中使用

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

但我不确定我是否正确理解你的问题。您还应该实现一种重置
索引显示的方法,因为我不知道它的确切用途。

您是否尝试过使用任何类型的集合?向量、数组、列表等@AugustoQ啊,抱歉,我尝试了向量,但由于我是VB新手,尽管MSDN试图提供帮助,它们还是把我弄糊涂了。我也尝试过阵列,但遇到了类似的问题。在我尝试这样做的时候,你会推荐在上面使用数组/向量吗?谢谢你的快速回复!因为你已经有了一个变量的索引是的,直接创建一个数组并访问索引比创建一个大的select案例要容易得多。我把字符串放在一个数组中,它让我可以跨类使用它,所以这确实解决了我的大部分问题,现在它只是在一个数组中管理所有文本。谢谢你,帮了大忙!这确实有点帮助,但我希望每次点击按钮都能带来下一个问题,尽管我似乎快要解决了,谢谢你的回复!然后只需将实际显示项目的索引保存在另一个变量中,每个单击的事件该变量都会向上一个…您可以将该变量用作窗体的全局变量或类“文本”中的属性。我已编辑了我的答案,如果您现在找到一些帮助,请查看:)嘿,抱歉,很晚才回复您,这确实有帮助!非常感谢。
Dim indexActualShownString as Integer
txtDisplay.text=list.Items(indexActualShownString) as Integer
indexActualShwonString += 1