2017-05-08 126 views
0

我試圖找到一種方法來遍歷字符串列表以顯示在文本框中。這些字符串是從一個名爲「文本」的單獨的類中檢索的。 字符串是在「文本」類中(對於ngs1,2,3,等)使用變量遍歷變量?

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 

我希望能夠做到這一點沒有選擇的情況下,所以它本質

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

我不知道如何正確地做到這一點,通過在使用變量其他變量的名稱。任何幫助將不勝感激,謝謝!

+0

您是否嘗試過使用任何類型的集合?向量,數組,列表等。 – AugustoQ

+0

@AugustoQ啊,道歉,我嘗試了矢量,但對VB來說是新手,他們讓我困惑,儘管MSDN試圖幫助。陣列我也嘗試過,但我碰到類似的問題。當時我一直試圖這樣做,你會推薦使用Array/Vector來完成這個任務嗎?感謝您及時的回覆! –

+0

既然你已經有了你的變量的索引,那麼創建一個數組並直接訪問索引,而不是創建一個大的選擇案例會容易得多。 – AugustoQ

回答

0

如果你只是想通過這一切文本進行迭代,只需要創建一個列表(字符串)或數組,並添加所有的ngsX ...

如例: Dim list as List(Of String)

Dim indexActualShownString as Integer 

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

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

但是我不確定我是否理解你的問題是正確的。而且你還應該實現一種重置indexActualShownString的方式,因爲我不知道它的目的究竟是什麼。

+0

這確實有些幫助,但我希望它能夠在每次點擊按鈕時帶來下一個按鈕,儘管我似乎正在接近解決它,謝謝您的迴應! –

+0

然後,只要在另一個變量中顯示實際顯示的項目的索引,並且每次點擊事件,該變量就會變成一個......您可以將該變量用作表單的全局變量或作爲班級中的屬性「文本」 –

+0

我編輯了我的答案,看看如果你現在找到一些幫助:) –