dim s as string(2)
dim l as list(of string())

s(0)="1-1"
s(1)="1-2"
l.add(s)
s(0)="2-1"
s(1)="2-2"
l.add(s)
.
.
.

for each s in l
debug.string(s(0) + "::" s(1) )
next

出力結果
2-1::2-2
2-1::2-2
.
.
.

入れたとおりに出しても結果は最後に入れたやつだけが延々とかえってきます。
きっとものすごく初歩的なことを知らないんだと思います。助けてください。
addrangeしたときにキャストがどうとかと言われたのでそれがヒントだと思うんですが・・・

よろしくお願いします。