| ファイルに関するパス操作色々 （6個） (SNo.020) １．起動したプログラムのフルパスを取得する ２．指定のパス文字列からファイル名を取得 ３．指定のパス文字列から拡張子だけを取得 ４．指定のパス文字列からファイル名を拡張子を除いて取得 ５．指定したパス文字列の絶対パスを取得 ６．パス文字列の拡張子を変更する |
|
| 使用コントロール | Button1 〜 Button6 |
| その他条件 | WindowsXP(Vista) Visual Basic 2005(VB2008) |
|
１．起動したプログラムのフルパスを取得する
Private Sub Button1_Click(ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles Button1.Click '起動したプログラムのフルパスを取得する 'Application.ExecutablePath プロパティ 'アプリケーションを開始した実行可能ファイルの 'パスを、ファイル名を含めて取得します Debug.WriteLine(Application.ExecutablePath) '結果 c:\VBDotNet1\020\bin\020.exe End Sub |
|
| ２．指定のパス文字列からファイル名を取得 Private Sub Button2_Click(ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles Button2.Click '指定のパス文字列からファイル名を取得 'Path.GetFileName メソッド '指定したパス文字列のファイル名と拡張子を返します。 Debug.WriteLine(System.IO.Path.GetFileName("c:\VBDotNet1\020\bin\020.exe")) '結果 020.exe （ファイルの有無はチェックしない） End Sub |
|
| ３．指定のパス文字列から拡張子だけを取得 Private Sub Button3_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles Button3.Click '指定のパス文字列から拡張子だけを取得 'Path.GetExtension メソッド '指定したパス文字列の拡張子を返します。 Debug.WriteLine(System.IO.Path.GetExtension("c:\VBDotNet1\020\bin\020.exe")) '結果 .exe End Sub |
|
| ４．指定のパス文字列からファイル名を拡張子を除いて取得 Private Sub Button4_Click(ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles Button4.Click '指定のパス文字列からファイル名を拡張子を除いて取得 'Path.GetFileNameWithoutExtension メソッド '指定したパス文字列のファイル名を拡張子を付けずに返します。 Debug.WriteLine(System.IO.Path.GetFileNameWithoutExtension( _ "c:\VBDotNet1\020\bin\020.exe")) '結果 020 End Sub |
|
| ５．指定したパス文字列の絶対パスを取得 Private Sub Button5_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles Button5.Click '指定したパス文字列の絶対パスを取得 'Path.GetFullPath メソッド '指定したパス文字列の絶対パスを返します。 Debug.WriteLine(System.IO.Path. _ GetFullPath("test.txt")) '結果 c:\VBDotNet1\020\bin\test.txt Debug.WriteLine(System.IO.Path.GetFullPath("../../")) '結果 c:\VBDotNet1\ End Sub |
|
| ６．パス文字列の拡張子を変更する Private Sub Button6_Click(ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles Button6.Click 'パス文字列の拡張子を変更する 'Path.ChangeExtension メソッド 'パス文字列の拡張子を変更します。 Debug.WriteLine(System.IO.Path.ChangeExtension("c:\Test.txt", ".bak")) '結果 c:\Test.bak End Sub |
|
| 別途、フォルダー（ディレクトリ）に関するパス操作色々もご覧下さい。 | |