タイトル : Re:文字列の検索 投稿日 : 2005/04/21(Thu) 21:26 投稿者 : 花ちゃん
ファイルの位置が解れば計算してその位置の文字を取得すればいいのでは。 '012345678901234567 "e:\csv\test01.csv" MyString.Substring(7,10) Dim MyString As String = "e:\csv\test01.csv" If UCase(MyString).IndexOf(".CSV") > 0 Then Dim P1 As Integer = MyString.LastIndexOf("\") Debug.WriteLine(MyString.Substring(P1 + 1, (MyString.Length - P1) - 1)) End If |