第一次机房收费系统—修改密码后重新登录

前言：

      机房进行到了白热化的阶段，说起来也是惭愧，人家别的小伙伴都在进行软工阶段，而我还是在这机房前面徘徊！话不多说，今天来小结一下修改密码的部分的那些“小芝麻”！

一、宏观把控

判断原密码是否输入正确——新密码与原密码是否相同——新密码两次输入是否一致——修改成功后强制用户重新登录

\

二、代码展示

前几个步骤的代码与之前的查询语句大概相似，不同的是修改密码成功后的重新登录的代码！

Dim frm As Form
            For Each frm In Forms
                If frm.Name <> "Login" Then
                   
                    Unload frm
                    If myexit = vbNo Or myexit = vbYes Then
                        Cancel = False
                    End If
                    frmMain.Hide
                    Login.Show
                    Login.txtpassword.Text = ""
                    Login.txtUserName.Text = ""
                   
                End If
            Next

小结：做一件事简单，长时间做一件事就不容易了！Keep do it !