excel使用vba制作自己的密码验证

小编致力于为大家奉献最有效的经验，让大家能够解决掉问题，但是大家也都知道，每个人遇到的情况都是不一样的，大家在看小编经验的同时，除了跟随操作，也需要自己的思考，举一反三的解决问题，这样才会变得更加有内涵，成为和小编一样的经验达人。excel使用vba制作自己的密码验证，这里，让小编给大家介绍一下。

工具/原料

• excel2016
• 此经验本人原创首发，未经本人许可请勿转载。

方法/步骤

1. 1

   首先我们打开一个工作样表作为例子。

   
2. 2

   进入vba代码编辑器，按下alt+f11组合快捷键进入。然后输入以下代码。

   Sub login()

       Dim strPassword As String    '保存密码

       Dim i As Integer             '输入密码的次数

       Do

           strPassword = InputBox("请输入密码") '输入密码

           If strPassword = "test" Then  '判断密码是否正确

               Exit Do                '退出循环

           Else

               MsgBox ("密码不正确，请重新输入")

           End If

           i = i + 1

       Loop While i < 3

       If i >= 3 Then   '超过正常输入密码次数

           MsgBox "密码错误，退出程序！"

           Application.Quit

       Else

           MsgBox "欢迎你使用本系统！"

       End If

   End Sub

   
3. 3

   首先我们定义了一个login过程。首先保存密码定义为文本字符。输入密码定义为整数型。

   
4. 4

   接下来是使用do循环，循环的意思是重复的运行这段代码，如果没有设置停止条件，就会不停的运行下去。这里在do循环里就是不停的输入密码并进行判断密码是否正确。

   
5. 5

   大家可以看到密码被窝设置为test，这里是固定密码，如果有多个密码，大家可以自行思考一下如何写。接下来我们要对密码验证次数有一个设定值。也就是用while循环条件设置，比如这里的<3次。

   
6. 6

   因为这是一个过程，所以在使用时，我们要在工作薄内建立一个按钮来激活这个过程，创建按钮的方法就不赘述了。这里我来提示一下大家，这个过程的代码是正常实现的，但是并不能起到加密的作用。还记得当初我教大家的如何在开启程序的时候自动运行宏吗？在workbook-open动作下使用call 过程。

   
7. 7

   先写到这里了，谢谢大家的观看。

   祝大家生活愉快。

   小编还有许多其他的经验可以观看，如果无法解决问题可以联系小编进行咨询。

   看不清楚图片的可以点击放大再看哦。

注意事项

• 个人经验，仅供参考。