TortoriseSVNを呼び出してコミット。

TortoiseSVN 1.0.6で動作確認済み

Sub TortoiseCommit()
    Dim slnDir As String = Path.GetDirectoryName(DTE.Solution.FullName)
    Dim pathFileName As String = Path.Combine(slnDir, "SlgDirPath.txt")
    Dim writer As BinaryWriter = New BinaryWriter(New FileStream(pathFileName, FileMode.Create))
    Dim contents As String = slnDir + Chr(10)
    Dim n As Integer
    Dim val As Int16
    For n = 0 To contents.Length - 1
        val = CType(AscW(contents.Chars(n)), Int16)
        writer.Write(val)
    Next
    writer.Close()

    Dim ps As System.Diagnostics.Process = New System.Diagnostics.Process
    ps.StartInfo.FileName = "C:\Program Files\TortoiseSVN\TortoiseProc.exe" ' 環境に応じて書き換える必要有り。
    ps.StartInfo.Arguments = "/command:commit /path:""" + pathFileName + """"
    ps.Start()
End Sub