Dim cmd As OleDbCommand = New OleDbCommand("SELECT Username,Pass FROM Persona WHERE [Username]='" + TextBox1.Text + "' AND [Pass] ='" + TextBox2.Text + "'", m_conn)

            Dim myReader As OleDbDataReader = cmd.ExecuteReader()



            If myReader.Read() Then
                If (TextBox1.Text = myReader(0).ToString()) And (TextBox2.Text = myReader(1).ToString()) Then
                    Dim Utente_Reagistrato As New Form_Utente
                    Me.Visible() = False
                    Utente_Reagistrato.Show()
                    m_cmd.ExecuteNonQuery()
                    m_conn.Close()