ありがとうございます。
原本と訂正文と見比べながら、いろいろと手を加えていますが、初心者の私には理解できず、未だにプログラムを動かすことができません。

Stations = Split("津田沼 東船橋 船橋 西船橋 下総中山 本八幡 市川")で、「プロシージャの外では無効です」（私のPCではInvalid outside procedure）が表示されます。

ここは、もともとの下のような駅名の書き方と同義なのですよね。であれば便利だなーと思っています。お時間があれば、再度ご教授していただけないでしょうか？分からないところが分からなくて、もう泣きそうです（微笑）。

Private Sub Form_Load()

    Station(1) = "津田沼"　←訂正文では番号が0～6までのようですね。
    Station(2) = "東船橋"
    Station(3) = "船橋"
    Station(4) = "西船橋"
    Station(5) = "下総中山"
    Station(6) = "本八幡"
    Station(7) = "市川"

End Sub