[リストへもどる]   [VBレスキュー(花ちゃん)]
一括表示

投稿時間:2007/01/16(Tue) 13:58
投稿者名:Do_Shirouto
Eメール:
URL :
タイトル:
Button1.について
ここのサンプルプログラムを拝見させていただきました。
誠に有り難うございます。
このサンプルプログラムのButton1はどの様にして、
作るのですか?
ご教授のほど宜しくお願いいたします。
お手数をおかけして誠に申し訳ございません・

蛇足
'リストボックスに水平スクロールバーを表示
と有りますが、垂直ではないのですか?
’----------------------
1.テキストファイルを読込みリストボックスに表示
 
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
        '1行づつ読込む
        ListBox1.Items.Add(st.ReadLine)
    Loop
    st.Close()     'ファイルを閉じる
End Sub

投稿時間:2007/01/16(Tue) 14:50
投稿者名:Mana
Eメール:
URL :
タイトル:
Re: Button1.について
フォームにツールボックスから貼り付ければいいのではないでしょうか?

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

投稿時間:2007/01/16(Tue) 15:21
投稿者名:大吉末吉
Eメール:
URL :
タイトル:
Re: Button1.について
> ここのサンプルプログラムを拝見させていただきました。
> このサンプルプログラムのButton1はどの様にして、
> 作るのですか?

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

ちなみに、

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

これって、VB.NET用のサンプルプログラムなのでは・・・
#VB6まででは、基本的に使用できません。

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

投稿時間:2007/01/17(Wed) 16:36
投稿者名:Do_Shirouto
Eメール:
URL :
タイトル:
Re: Button1.について
Manaさん- 大吉末吉さん
ご回答有り難うございました。
これからも宜しくお願いいたします。