• <noscript id="ecgc0"><kbd id="ecgc0"></kbd></noscript>
    <menu id="ecgc0"></menu>
  • <tt id="ecgc0"></tt>

    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

      先寫到這里了,謝謝大家的觀看。

      祝大家生活愉快。

      小編還有許多其他的經驗可以觀看,如果無法解決問題可以聯系小編進行咨詢。

      看不清楚圖片的可以點擊放大再看哦。

    注意事項

    • 個人經驗,僅供參考。
    • 發表于 2018-02-08 00:00
    • 閱讀 ( 1078 )
    • 分類:其他類型

    你可能感興趣的文章

    相關問題

    0 條評論

    請先 登錄 后評論
    聯系我們:uytrv@hotmail.com 問答工具
  • <noscript id="ecgc0"><kbd id="ecgc0"></kbd></noscript>
    <menu id="ecgc0"></menu>
  • <tt id="ecgc0"></tt>
    久久久久精品国产麻豆