VB6.0用掲示板の過去のログ(No.2)−VBレスキュー(花ちゃん)
[記事リスト]
[新規投稿]
[新着記事]
[ワード検索]
[管理用]
| 投稿日 | ： 2007/01/16(Tue) 13:58 |
| 投稿者 | ： Do_Shirouto |
| Ｅメール | ： |
| ＵＲＬ | ： |
| タイトル | ： Button1.について |
ここのサンプルプログラムを拝見させていただきました。
誠に有り難うございます。
このサンプルプログラムの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
- 関連一覧ツリー
（★ をクリックするとツリー全体を一括表示します）
- 返信フォーム
（この記事に返信する場合は下記フォームから投稿して下さい）