タイトル : 文字列検索 投稿日 : 2005/04/21(Thu) 11:37 投稿者 : あみ
[OSのVer]:Windows [VBのVer]:VB.NET 初めて投稿します。 ディレクトリを入力してもらって参照するプログラムを作っているのですが、 "\"がいくつ並んでいても参照されてしまいます。(例 E:\\\sample\) それをエラーにするために"\"の後の文字が"\"ならエラーにするという 処理を書いたのですが、うまくいきません。教えてください。お願いします。 <ソース> For index = 0 To finum - 1 Dim intplace As Integer Dim strnext As String intplace = InStr(strOrgOut, "\") + 1 strnext = GetChar(strOrgOut, intplace + 1) If strnext = "\" Then 'エラー処理をする Foforbid(TxtOrgOut, "エラーです。") Exit Sub End If index = intplace + 1 Next intplaceに"\"の位置を格納 strnextで"\"の次の文字を取ってきて比較、というものです。 よろしくお願いします。 |