Problem trying to compact SQL 2005 CE database

This is running on a portable device using CE 5.0 and compact framework 2.0.  The goal is for the user to be able to run a process that compacts the database.  Here is the code:

        Dim Source As String = "\My Documents\Data.SDF"
        Dim Destination As String = "\Application\Data.CPT"
        Dim sqlEngine As SqlCeEngine

        Try
            If File.Exists(Source) Then
                sqlEngine = New SqlCeEngine("Data Source=" & Source)
                sqlEngine.Compact("Data Source=" & Destination)
                File.Delete(Source)
                File.Move(Destination, Source)
            End If

        Catch sqlex As SqlCeException
            Dim sqlerror As SqlCeError
            For Each sqlerror In sqlex.Errors
                MessageBox.Show(sqlerror.Message)
            Next

        Catch ex As Exception
            MessageBox.Show(ex.Message)

        Finally
            sqlEngine.Dispose()
        End Try

When I run it through the debugger, the yellow line gets to the line that says "sqlEngine = New...", and then goes to the next line "sqlEngine.Compact...", and then it drops down to the "Catch sqlex..." area, but never shows an error.  I have a messagebox.show a couple of lines down, intended to show any sql errors, but I just get a blank message box.

One other thing that looks strange to me...near the end of this code, on the line that says "sqlEngine.Dispose()", I have a warning that says "Variable sqlEngine is used before it has been assigned a value".  I don't understand that at all, since it's been defined above.  I am not getting any other warnings or syntax errors in this code.

Is there an obvious problem with my code, or at least a way to see what error I'm getting?  TIA