vb帳號密碼驗證
1樓:網友
'---視窗模組變數---dim logincount as inteterlogincount=0
--按鈕過程---
dim uname as string
dim upass as string
uname="vb"
upass="123"
if trim( and trim( then...
elseif logincount<>2 thenlogincount=logincount+1else
unload me
end if
end if
2樓:網友
dim a as integer
private sub command1_click()if a >= 2 then
endend if
if <>"vb" or <>"123" thenmsgbox ("使用者名稱或密碼不對")
a = a + 1
elsemsgbox ("登陸成功")
a = 0end if
end sub
vb qq登陸驗證帳號密碼
3樓:微笑
其實這個拿e語言做還方便滲如檔點 下面是用vb的原始碼 這叢亂裡是橡喚參考資料。
vb 密碼驗證
4樓:薔高翰
你說的設定賬戶是什麼樣的賬戶?程式的賬戶?可以建立和刪除?
vb中如何驗證賬號密碼後出現登陸框?
5樓:網友
private sub command1_click()if = "1234" and = "使用者名稱" then '密碼是1234,帳號是使用者名稱。
正確" 'text3顯示正確。
else '否則。
錯誤" 'text3顯示錯誤。
end if
end sub
private sub command2_click()end '退出。
end sub
6樓:白居艱
一、假設您的。
窗體為form1
帳號為「qq」
密碼為「123456」
二、form1中加乙個command控制項。
新增乙個窗體form2
三、對擊command控制項,輸入如下命令。
private sub command1_click()if = "qq" and = "123456" thenend if
end sub
vb製作 密碼驗證
7樓:網友
既修改又驗證。
private sub command1_click()
確認修改密碼提交。
if text1(0).text = then
msgbox "你沒有輸入名稱,請重新輸入!",16, "錯誤正姿叢!"
exit sub
elseif text1(1).text = then
msgbox "你沒有輸入原密碼,請重新輸入!",16, "錯誤!"
exit sub
elseif text1(2).text = then
msgbox "你沒有輸入新密碼,請重新輸入!",16, "錯誤!"
exit sub
elseif text1(3).text = then
msgbox "你沒有再次輸入新密舉櫻碼,請重新輸入!",16, "錯誤!"
exit sub
end if
if text1(2).text <>text1(3).text then
msgbox "你輸入的新密碼和再次輸入的新密碼不符,請重新輸入!",16, "錯誤!"
exit sub
end if
if text1(0).text <>yhmc then
msgbox "你輸入的名稱不是你的名稱,請重新輸入!",16, "錯誤!"
exit sub
end if
if text1(1).text <>yhmm then
msgbox "你輸入的原密碼不是你的密碼,請重新輸入!",16, "錯誤!"
exit sub
end if
call conn
strsql = select * from 資料表 where 使用者名稱='"text1(0).text & and 密碼='"text1(1).text &
set rs =
if not then
rs!密碼 = text1(2).text
msgbox "祝賀您!你的管理員密碼修改成功!",48, "修改成冊握功!"
else msgbox "沒有你查詢的記錄!",16, "錯誤!無記錄!"
end if
set rs = nothing
set conn = nothing
end sub
vb中檢驗使用者賬號密碼的問題
8樓:網友
非也,從你給出的程式開來。
userid應該是使用者名稱。
userpow應該是密碼。
單從這段程式來看是可以刪除的,不過如果是整個系統工程的話,還是不要刪的為好。因為後面可能要用來判斷使用者的許可權和功能。
9樓:網友
userid是當前使用者標識。
userpow應該是使用者許可權。
你不需要的話當然可以刪除。
急!幫忙編vb程式。要求:編乙個密碼和賬號驗證程式,賬號123456密碼
10樓:我要問問題
private cmd1_click
if "123456" and "密碼" then'驗證賬號、密碼,如果符合則進入下乙個窗體unload form1else
賬號、密碼不對則繼續輸入。
end if
end sub
去除Excel中VB的密碼?
首先,如果檔案格式是 xslm 需要先開啟excel檔案,另存為2003版格式 xls 然後用普通的文字器 我用的是notepad 開啟這個檔案,注意檔案型別選 所有檔案 然後在檔案裡查詢 dpb 把它改成 dpx 注意大小寫。這個是重點 儲存修改。然後用excel重新開啟這個檔案。你會遇到一些錯誤...
vb中eecute的用法,VB中Execute的用法
execute返回了一個結果集 因為返回一行 0 表示這個結果集的第一個欄位的值 直接賦給lzdbig id1值是 查詢出來的 max big id 表裡最大的 加 0 表示不將這個結果賦給任何變數,直接顯示 vb中shell函式和shellexecute函式的使用方法 聯絡 區別?樓主,vb之中只...
VB如何獲取網頁的內容
1 相關 如下 public function gethtmlstr strurl as string 獲取遠端網頁原始碼 stime now 獲取當前時間 ntime now 獲取迴圈時間 2 使用 在窗體 相應位置寫如下 dim a as string a gethtmlstr 要獲取的 url...