ここのサンプルプログラムを拝見させていただきました。
誠に有り難うございます。
このサンプルプログラムのButton1はどの様にして、
作るのですか？
ご教授のほど宜しくお願いいたします。
お手数をおかけして誠に申し訳ございません・

蛇足
'リストボックスに水平スクロールバーを表示
と有りますが、垂直ではないのですか？
’----------------------
１．テキストファイルを読込みリストボックスに表示
　
Private Sub Button1_Click(ByVal sender As System.Object, _
                          ByVal e As System.EventArgs) Handles Button1.Click
'テキストファイルを読込みリストボックスに表示
    'リストボックスに水平スクロールバーを表示
    ListBox1.HorizontalScrollbar = True
    ListBox1.Items.Clear()  '一旦消去
    Dim st As New System.IO.StreamReader("..\..\Test.txt", _
                                    System.Text.Encoding.Default)
    'ファイルの最後までループ
    Do Until st.Peek = -1
        '１行づつ読込む
        ListBox1.Items.Add(st.ReadLine)
    Loop
    st.Close()     'ファイルを閉じる
End Sub

フォームにツールボックスから貼り付ければいいのではないでしょうか？

また、「Horizon」であれば水平でいいと思うのですが・・・
水平か垂直か、どちらがいいかはそのプログラムの仕様になると思いますが・・・

> ここのサンプルプログラムを拝見させていただきました。
> このサンプルプログラムのButton1はどの様にして、
> 作るのですか？

ここは、「VB2.0〜6.0用掲示板」ですが、御使用のＶＢのバージョンは何でしょう？

ちなみに、

> Private Sub Button1_Click(ByVal sender As System.Object, _
>                           ByVal e As System.EventArgs) Handles Button1.Click

これって、ＶＢ．ＮＥＴ用のサンプルプログラムなのでは・・・
＃ＶＢ６まででは、基本的に使用できません。

もし、貴方の使用しているＶＢのバージョンが「VB.NET」や「VB2005」なら「VB．NET用掲示板」をご利用ください。

Manaさん- 大吉末吉さん
ご回答有り難うございました。
これからも宜しくお願いいたします。