' 拡張子を .txt から .log に変更したファイルパスを取得する
Dim stAfterName1 As String = System.IO.Path.ChangeExtension("C:\Hoge.txt", ".log")
' 拡張子を削除したファイルパスを取得する
Dim stAfterName2 As String = System.IO.Path.ChangeExtension("C:\Hoge.txt", Nothing)
' 拡張子を .txt から .log に変更したファイルパスを表示する
MessageBox.Show(stAfterName1)
' 拡張子を削除したファイルパスを表示する
MessageBox.Show(stAfterName2)ネタ元