VB attempt at Try Catch Finally

Dim conn
on error goto catch
    'Do work here
    set conn = new DbConnection()

    goto finally
catch:
    MsgBox(Error)

    goto finally
finally:
    if(conn not is nothing) then
        conn.Close()
        set conn  = nothing
    end if