私は今、ＣＳＶファイルを使ってクイズを作成しています。
表示の仕方は以下の通りです
問題文,選択肢1,選択肢２,選択肢３,正答
ああああ,いいいい,うううう,ええええ,いいいい
ですが、最初の一列しか表示できず困っています
お願いします！私に2列目に移動できるコードを教えてください！
コードはこちらのサイトのものを使用させていただきました
 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim Reader As New IO.StreamReader("作品の問題点.csv", System.Text.Encoding.GetEncoding("Shift-JIS"))
        Dim Items() As String                'CSVの各項目を表す配列
        Dim Line As String = Reader.ReadToEnd 'CSVの一行
        Dim PostalCode As String            
        Button1.Visible = False
        Button2.Visible = True
        Button3.Visible = True
        Do Until IsNothing(Line)

            Items = Line.Split(",")                   
            PostalCode = Items(0)                    
            Label1.Text = Items(0)
            Button2.Text = Items(1)
            Button3.Text = Items(3)
            Line = Reader.ReadLine                  '次の行を読み込む。

        Loop
        Reader.Close()
    End Sub