１ テキストファイルの読み込みについて
①１行ずつ読み込むときは、
Open ファイル名 For Input As ＃ファイル番号
Do EOF（ファイル番号）
Line Input ＃ファイル番号 , buf
Loop
②全部を読み込むときは、
Open ファイル名 For Binary As ＃ファイル番号
buf＝Space（FileLen（ファイル名）） ’//ファイルに含まれる総文字数の確保
Get ＃ファイル番号 , , buf
③10行のテキストファイルがあり、11行目に改行コードの有無による処理の検証結果
1行ずつ読み込んだときは10行として処理できる。
全部を読み込んでSplit（buf,vbCrlf)を使用して処理したときに
For i=Lbound(配列) to Ubound(配列）
で処理を行うと、11行目に改行コードがないときは1行ずつ読み込んだときに同じ。Ubound（配列）は要素９
11行目に改行コードあるときはUbound（配列）は要素10になり配列（10）は空文字のみとなる。
・考えられる対処方法
For i=Lbound(配列) to Ubound(配列) – 1
で処理した後に配列（最大添え字）に対して処理を行う。