Excel如何創(chuàng)建用戶登錄窗口？

Excel如何創(chuàng)建用戶登錄窗口？

Excel如何創(chuàng)建用戶登錄窗口？介紹了如何利用VBA窗體控件、文本框控件和按鈕控件制作用戶登錄窗口。

1.啟動Excel并打開工作表，打開Visual Basic編輯器，在項目資源管理器中單擊鼠標(biāo)右鍵，然后在上下文菜單中選擇“插入|用戶表單”以插入用戶表單。按F4打開“屬性”對話框，在“標(biāo)題”文本框中輸入文本“用戶登錄”來更改表單標(biāo)題，如圖1所示。

圖1創(chuàng)建一個用戶表單并設(shè)置其屬性

2.從“工具箱”對話框中選擇“文本框”控件、“標(biāo)簽”控件和“命令按鈕”控件，并在表單中繪制這些控件，如圖2所示。在“屬性”對話框中，將兩個標(biāo)簽控件的“標(biāo)題”屬性分別設(shè)置為“登錄名”和“登錄密碼”，并將命令按鈕控件的“標(biāo)題”屬性分別設(shè)置為“確定”和“取消”，如圖3所示。

圖2向表單添加控件

圖3修改控件的

3.選擇表單中的第二個“文本框”控件，并將“屬性”對話框中的“密碼字符”屬性設(shè)置為字符“*”，如圖4所示。這樣，在此文本框中輸入的字符將被“*”替換。

圖4更改

私有子命令按鈕1 _單擊()

如果文本框1。文本“郭一凡”然后“判斷用戶名是否正確

‘ MsgBox ‘用戶名錯誤，您無權(quán)登錄！’給出了不正確的提示

帶文本框1?！癝elStart=0”設(shè)置選定文本的起始字符。SelLength=Len(文本框1。設(shè)置選定文本的長度。“設(shè)置焦點”文本框獲得焦點

Elseif textbox2.text’ abcdef ‘然后’如果密碼錯誤

‘密碼輸入不正確，請重新輸入！’暗示

帶文本框2。“SelStart=0”設(shè)置選定文本的起始字符。SelLength=Len(文本框2。設(shè)置選定文本的長度。獲取焦點的“設(shè)置焦點”

MsgBox ‘登錄成功，歡迎光臨！’登錄成功提示

“卸載我”卸載表單

這里，程序首先判斷第一個文本框中文本屬性的值是否是設(shè)置的用戶名，如果不是，則給出提示。同時，使用With結(jié)構(gòu)來設(shè)置關(guān)鍵的SelStart屬性和SelLength屬性，以便文本框中的文本可以突出顯示。同時，使用SetFocus方法使文本框獲得焦點，方便用戶更改用戶名。如果輸入的是設(shè)置的用戶名，那么程序判斷第二個文本框中的文本屬性值是否是設(shè)置的密碼，如果不是，則執(zhí)行與錯誤用戶名相同的操作。如果用戶名和密碼正確，程序會提示并卸載表單。

7.雙擊項目資源管理器中的“此工作簿”選項，打開“代碼”窗口，并輸入以下程序代碼，使用戶表單在工作簿打開時可見。切換到Excel，保存文檔，并完成本示例的制作。

版權(quán)聲明：本文內(nèi)容由網(wǎng)絡(luò)用戶投稿，版權(quán)歸原作者所有，本站不擁有其著作權(quán)，亦不承擔(dān)相應(yīng)法律責(zé)任。如果您發(fā)現(xiàn)本站中有涉嫌抄襲或描述失實的內(nèi)容，請聯(lián)系我們jiasou666@gmail.com 處理，核實后本網(wǎng)站將在24小時內(nèi)刪除侵權(quán)內(nèi)容。

版權(quán)聲明：本文內(nèi)容由網(wǎng)絡(luò)用戶投稿，版權(quán)歸原作者所有，本站不擁有其著作權(quán)，亦不承擔(dān)相應(yīng)法律責(zé)任。如果您發(fā)現(xiàn)本站中有涉嫌抄襲或描述失實的內(nèi)容，請聯(lián)系我們jiasou666@gmail.com 處理，核實后本網(wǎng)站將在24小時內(nèi)刪除侵權(quán)內(nèi)容。