Excel を作る part2

VB6 っつってもそこまで簡単に Excel の機能は作れません。最初は入力が出来ないところでつまづく。次につまづきそうなのは
ファイルからの読み取り？
ファイルから読んだ文字を Grid に反映させるとか。これはテキストボックス一つしか使っていないので Sheet そのものは操作出来ません。て事で Box 一つで Sheet 操作するサンプル

Dim i As Integer
Dim FName As String
Dim str1(50) As String

  FName = "C:\temp.txt"
  fNumber = FreeFile

  Open FName For Input As #fNumber

  Do Until EOF(fNumber)
    For i = 0 To 35
      Line Input #fNumber, str1(i)
      MSFlexGrid1.TextMatrix(i, 0) = Mid(str1(i), 1, 6) '左1文字目から6文字切り出しGridセット
    Next i
  Loop
  Close #fNumber