Dim StringaDB As String = System.Configuration.ConfigurationManager.ConnectionStrings("Architech").ToString
        Try
            Using db As New SqlCeConnection(StringaDB)
                db.Open()
                Dim sqlstr As String = ""
                sqlstr = "Select NomeUtente From Tab_utenti"
                Using sqlcmdCE As New SqlCeCommand(sqlstr, db)
                    sqlcmdCE.ExecuteNonQuery()
                    Notifica.Show("Registrazione effettuata con successo. Grazie per la collaborazione")
                    sqlcmdCE.Dispose()
                End Using
                db.Dispose()
            End Using
        Catch ex As SqlCeException
            Notifica.Show(ex.Message)
        Catch ex As Exception
            Notifica.Show(ex.Message)
        End Try