C# と VB.NET の質問掲示板

VB2010

お世話になります。
VBというか、オブジェクト指向そのものが理解できておらず、
周りにも有識者がいなく、作りとして良いか悪いか判断できないため、
投稿させていただきました。

現在、画面で設定された値をもとに、複数の定義体を作成するツールを作成しており、
画面で設定されたパラメタをどのように他クラスへ渡すのが良いのか悩んでおります。

以下のソースでは、画面の値をすべて　GamenParam　に格納して、それを他クラスへ
渡す際、コンストラクター渡ししており、この部分で悩んでおります。
また、GamenParam内で、構造体を使用していますが、構造体は値型であるため、
大量のデータを受け渡す場合には向いていないような感じもしています。
このような場合、皆様はどのようにされているのでしょうか？
ご意見を頂けたらと思います。

よろしくお願いします。

Public Class Form1
    Private Sub Button1_Click(・・・
       Dim param As New GamenParam
       '★ここで画面の入力値を　param　に格納
       Dim c1 As New Class1(param)
       c1.Class1_Run()
       Dim c2 As New Class2(param)
        c2.Class2_Run()
    End Sub
End Class

Public Class Class1
    Private _param As GamenParam
    Public Sub New(ByVal p As GamenParam)
        _param = p
    End Sub
    Public Sub Class1_Run()
        Console.WriteLine(_param.kojin(0).name & " : " & _param.kojin(0).addr)
    End Sub
End Class

Public Class Class2
    Private _param As GamenParam
    Public Sub New(ByVal p As GamenParam)
        _param = p
    End Sub
    Public Sub Class2_Run()
        Console.WriteLine(_param.kojin(1).name & " : " & _param.kojin(1).age)
    End Sub
End Class

Public Class GamenParam
    Public outPath As String
    Public kojin As Generic.List(Of stKojin)
End Class

Public Structure stKojin
    Public name As String
    Public addr As String
    Public age As Integer
End Structure

VisualStudio Community 2017
を使用しています。

以下のデータとソースを作成しました。
予想では、読み込みデータは1行目、5行目、10行目と
出力してほしかったのですが、
1，2，3行目が出力してしまいます。



sample.csvの中身
1,100
2,200
3,300
4,400
5,500
6,600
7,700
8,800
9,900
10,1000


        private void button1_Click(object sender, EventArgs e)
        {
/**/
            // sampleファイルオープン
            var fs = new FileStream(@"C:\Users\mau\sample.csv", FileMode.Open, FileAccess.Read);
            var sr = new StreamReader(fs, Encoding.Default);

            // 書き込み用ファイルオープン
            StreamWriter sw = new StreamWriter(@"C:\Users\mau\sample_new.csv", true, Encoding.GetEncoding("shift_jis"));
            sw.WriteLine("fpos,no,row");

            //現在のfsの位置
            long fpos = fs.Position;
            // 1行目読み込み
            var buf = sr.ReadLine();
            sw.WriteLine(fpos +","+ buf +","+ fs.Position);
            byte[] st = new byte[20];

            // 5行目読み込み
            fpos = 0;
            fpos = fpos + (buf.Length + 1) * 5;
            fs.Seek(fpos, SeekOrigin.Begin);
            var buf = sr.ReadLine();

            buf = sr.ReadLine();0
            sw.WriteLine(fpos + "," + buf + "," + fs.Position);

            // 10行目読み込み
            fpos = 0;
            fpos = fpos + (buf.Length + 1) * 10;
            fs.Seek(fpos, SeekOrigin.Begin);
            buf = sr.ReadLine();
            sw.WriteLine(fpos + "," + buf + "," + fs.Position);
            fs.Close();
            sr.Close();
            sw.Close();
        }
    }
}