VB6.0用掲示板の過去のログ(No.1)−VBレスキュー(花ちゃん)
[記事リスト] [新規投稿] [新着記事] [ワード検索] [過去ログ] [管理用]

投稿日： 2003/07/21(Mon) 13:57
投稿者： NEU(ノイ)
Ｅメール：
ＵＲＬ：
タイトル： Re: スペース区切りで読み込み

回答ではありません、参考にしてください。

Dim strTemp() As String
Dim count As Long
Dim i As Long

count = 0
Do While Not EOF(1)
    Line Input #1, mytext
    count = count + 1
    Debug.Print count & ") ";
    strTemp = Split(mytest, " ")
    Debug.Print UBound(strTemp) + 1 & " / ";
    For i = 0 To UBound(strTemp)
        Debug.Print "[" & strTemp(i) & "]";
    Next i
    Debug.Print ""
Loop

- 関連一覧ツリー （★ をクリックするとツリー全体を一括表示します）
- 返信フォーム （この記事に返信する場合は下記フォームから投稿して下さい）

- Web Forum -