tagCANDY CGI VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板
VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板
[ツリー表示へ]  [ワード検索]  [Home]

タイトル Re: dir取得について
投稿日: 2008/02/11(Mon) 00:37
投稿者花ちゃん
> Private Sub 取得()
        ↑ プロシージャ名等に全角文字を使用しないように
>    namae = "東京"
>    MyPath = "C:\大阪\名古屋\福岡\ & namae & "\" "
                    ↑文字の終りの " が抜けている ので 最後の " も
>   MyName = Dir(MyPath, vbDirectory)  
>   MsgBox MyPathe
               ↑ MyName にしないと  MyPathe にしても e が余計
>
> End if

上記を修正すると下記になります、見比べて見て下さい。

Private Sub Command1_Click()
   Dim namae  As String
   Dim MyPath As String
   Dim MyName As String
   namae = "東京"
   MyPath = "C:\大阪\名古屋\福岡\" & namae & "\"
   MyName = Dir(MyPath, vbDirectory)
   MsgBox MyName
End Sub

- 関連一覧ツリー をクリックするとツリー全体を一括表示します)

古いスレッドにレスはつけられません。