45*45のtxtデータを配列に読み込もうとしているのですが、エラーが出ます。なぜでしょうか?
宜しくお願いします。
【VB2005を使っています。】
Private Sub OpenButton1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OpenButton1.Click
Dim selectButton As DialogResult
Dim filename As String
Dim i, j As Integer
\'開く ダイアログの表示
selectButton = DBOpenDialog1.ShowDialog()
filename = DBOpenDialog1.FileName
If selectButton = Windows.Forms.DialogResult.OK Then
Dim sr As System.IO.StreamReader = Nothing
Dim readFields() As String
i = 0
sr = New System.IO.StreamReader(filename, System.Text.Encoding.Default)
Do Until sr.EndOfStream
readFields = sr.ReadLine().Split(\",\")
For j = 0 To 44
Tests1(i, j) = readFields(j)
Next j
i += 1
Loop
sr.Close()
End If
End Sub