Forループ、vb.netでテキストファイルに書き込む方法

Question

3つの文字列変数が既に宣言されており、値が設定されています。これらの3つの文字列をForループのテキストファイルに書きたい。ループの1回のパスごとに1つの文字列を書く。私は文字列に整数カウンタを追加し、リテラル文字列ではなく、既に宣言されている3つの文字列変数の1つを理解するためにvb.netに理解させる方法を理解できません。値を持つ。

サンプルコード--->

Dim writer As New StreamWriter("c:\temp\test_out.txt") 
Dim datastr1 As String 
Dim datastr2 As String 
Dim datastr3 As String 
datastr1 = "test string 1" 
datastr2 = "test string 2" 
datastr3 = "test string 3" 


Dim i As Integer 
For i = 1 To 3 
    writer.WriteLine("datastr" & i) 
Next i 

結果は次のとおりです。

datastr1 
datastr2 
datastr3 

しかし、私は結果になりたい：

test string 1 
test string 2 
test string 3 

は私を助けてくれてありがとう。

Answer 1

Dim datastr() As String = {"test string 1", 
          "test string 2", 
          "test string 3"} 
    ' Loop over each element with For Each. 
    For Each str As String In datastr 
     writer.WriteLine(str) 
    Next