EXCEL技巧——用VBA限制登录密码次数-Excel教程

我们经常在登录一些系统的时候遇到过这样的情况，如果密码输入几次都错误的话，心痛就锁死了，在短时间内就会处于冻结状态，这个确实很简单，我们可以用一段VBA代码来实现，现在我们就来自己尝试一下。

前期准备工作（包括相关工具或所使用的原料等）

EXCEL软件

详细的操作方法或具体步骤

新建一个EXCEL表格，单击菜单栏“开发工具”——VisualBasic，打开VBA编辑器，我们将在这个编辑其中编写代码。

在编辑器中选择“Sheet2”，单击“插入”——模块，现在就打开了代码编辑框。

现在我们来输入代码：

Sub login()

Dim strPassword As String '设置strPassword为字符串常量

Dim i As Integer '定义i为整数量

Do

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

If strPassword="123456" Then '判断密码是否正确，密码为123456

Exit Do '退出Do循环

Else

MsgBox ("密码有误，重新输入！") '提示密码错误

If

i=i + 1 'i循环一次增大1

Loop While i < 3

If i >=3 Then 'i超过5次，输出“请下次在来吧！”

MsgBox "请下次在来吧！"

Application.Quit

Else

MsgBox "欢迎光临！" '如果密码正确则输出“欢迎光临！”

If

Sub

单击菜单栏“运行”——运行子过程/用户窗体，弹出对话框“请输入密码”。

现在在密码框中输入“111111”，单击确定，弹出对话框，提示“密码有误，请重新输入”，连续输入3次，弹出对话框提示“请下次再来吧！”

在密码框中输入“123456”，单击确定，弹出对话框，提示“欢迎光临”。

经验内容仅供参考，如果您需解决具体问题(尤其法律、医学等领域)，建议您详细咨询相关领域专业人士。作者声明：本文系本人依照真实经历原创，未经许可，谢绝转载。