1樓:匿名使用者
程式**:
該程式的主要目的是要判斷輸入的使用者名稱是否合法,所以我們首先編寫判斷使用者名稱的程式**。雙擊“確定”按鈕,新增如下的程式**:(黑體部分為系統自動生成的**,楷體為註釋)
private sub command1_click()
′判斷是否輸入了使用者名稱
if text1.text=″″ then ′如果text1為空,即沒有輸入使用者
msgbox ″請輸入使用者名稱!″,vbokonly+vbcritical,″錯誤″
exit sub ′退出這個過程
else ′如果輸入了使用者名稱
if text1.text=″軟體世界″ and text2.text=″12345″ then ′如果輸入的使用者名稱是″軟體世界″且密碼為″12345″
msgbox ″你是合法使用者,歡迎進入!″,vbokonly+vbinformation,″歡迎進入″
else ′如果不是″軟體世界″或密碼不是″12345″
msgbox ″使用者名稱或密碼錯誤!″,vbokonly+vbcritical,″錯誤″
text1.text=″″
text2.text=″″ ′清空text1及text2控制元件中的文字內容,讓使用者重新輸入
end if
end if
end sub
在這一段**中,我們使用了if…then…else…end if。這是一個條件判斷語句,if text1.text=″″ then這句**則是判斷text1是否為空,如果為空,這個條件就成立,則執行then後的語句,如果text1不為空,則這個條件不成立,程式將會跳到else處,執行else後的語句。
程式測試:
現在我們可以單擊“f5”鍵來執行這個程式,看看其執行效果。直接單擊“確定”按鈕,將會彈出一個對話方塊(如圖7);在“使用者名稱”後輸入“軟體世界”,“密碼:”後輸入“12345”,再單擊“確定”按鈕,此時便會出現一個“歡迎進行”的資訊框(如圖8)。
怎麼樣,一個屬於自己的“登入視窗”就製作好了。
但這個程式目前還只能判斷在程式中已設定好了的使用者名稱及密碼,沒有靈活性,你可以發揮你的聰明才智,使其能夠判斷多個合法的使用者及密碼。
2樓:
vb不能編寫手機程式的. 系統都不同 不通用
使用vs2019用vb語言編寫簡單的網頁具體代
就是最簡單的html 了!這有什麼難度 用vs2012編寫vb程式。等急求!嗯很願意幫助你怎麼發給你呢 vs2012中vb語言的form1.move 20,20 form1.left 20 form1.top 20 我猜是這樣!誰能幫我用html語言做一個簡單的網頁?就行 第一行第一列 第一行第二列...
輸入半徑,用VB編寫計算圓面積和圓周長的程式
private sub label2 click const pi 3.14159 dim r as single,i as single,s as single r inputbox 請輸入半徑 輸入半徑 i 2 pi r s pi r 2 label2 label2 r label3 label...
用VB編寫「密碼校驗」程式的設計
你在自己寫的方法裡 加個static 關鍵字。這樣就可以直接通過 類名來呼叫了。也就是像呼叫系統函式那樣,不用new直接通過類名就可以呼叫了。完整 如下,初始化都已經做好啦,新增控制元件試試吧 dim ncount as integerprivate sub form load 初始化控制元件資訊 ...