パスを結合する

VB.NETでは最後の文字がパスセパレータかどうかのチェックは不要です。
Path.Combine()メソッドを使用することにより、簡単にパスを結合することができます。

Imports System.IO

Public Class FileSystemForm

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        '最後の文字がパスセパレータ
        MessageBox.Show(Path.Combine("c:\app1\", "test.txt"))

        '最後の文字がパスセパレータではない
        MessageBox.Show(Path.Combine("c:\app1", "test.txt"))

    End Sub
End Class

どちらも同じc:\app1\test.txtを返します。