Dim command As MySqlCommand = Me.FormUI.Conn.CreateCommand()
        command.CommandText = "SELECT * FROM `user` WHERE name = ?name AND pass = ?pass"
        Dim myParam_user As MySqlParameter = command.Parameters.Add("?name", MySqlDbType.Text)
        Dim myParam_pass As MySqlParameter = command.Parameters.Add("?pass", MySqlDbType.Binary)        myParam_user.Value = Trim(Me.UserName)
        myParam_pass.Value = MD5Manager.Encrypt(Trim(Me.Password))
        Dim reader As MySqlDataReader = command.ExecuteReader()        If Not reader.HasRows Then
            MsgBox("用户名或密码错误")
            reader.Close()
            Exit Sub
        Else