Excel中使用vba制作密碼驗證的操作方法

　　excel使用vba制作自己的密碼驗證，如何進行操作呢?今天，學(xué)習(xí)啦小編就教大家在Excel中使用vba制作密碼驗證的操作方法。

　　Excel中使用vba制作密碼驗證的操作步驟如下：

　　首先我們打開一個工作樣表作為例子。

　　進入vba代碼編輯器，按下alt+f11組合快捷鍵進入。然后輸入以下代碼。

　　Sub login()

　　Dim strPassword As String '保存密碼

　　Dim i As Integer '輸入密碼的次數(shù)

　　Do

　　strPassword = InputBox("請輸入密碼") '輸入密碼

　　If strPassword = "test" Then '判斷密碼是否正確

　　Exit Do '退出循環(huán)

　　Else

　　MsgBox ("密碼不正確，請重新輸入")

　　End If

　　i = i + 1

　　Loop While i < 3

　　If i >= 3 Then '超過正常輸入密碼次數(shù)

　　MsgBox "密碼錯誤，退出程序!"

　　Application.Quit

　　Else

　　MsgBox "歡迎你使用本系統(tǒng)!"

　　End If

　　End Sub

　　首先我們定義了一個login過程。首先保存密碼定義為文本字符。輸入密碼定義為整數(shù)型。

　　接下來是使用do循環(huán)，循環(huán)的意思是重復(fù)的運行這段代碼，如果沒有設(shè)置停止條件，就會不停的運行下去。這里在do循環(huán)里就是不停的輸入密碼并進行判斷密碼是否正確。

　　大家可以看到密碼被窩設(shè)置為test，這里是固定密碼，如果有多個密碼，大家可以自行思考一下如何寫。接下來我們要對密碼驗證次數(shù)有一個設(shè)定值。也就是用while循環(huán)條件設(shè)置，比如這里的<3次。

　　因為這是一個過程，所以在使用時，我們要在工作薄內(nèi)建立一個按鈕來激活這個過程，創(chuàng)建按鈕的方法就不贅述了。這里我來提示一下大家，這個過程的代碼是正常實現(xiàn)的，但是并不能起到加密的作用。還記得當(dāng)初我教大家的如何在開啟程序的時候自動運行宏嗎?在workbook-open動作下使用call 過程。