vb6.0製作登入介面
環境: win7虛擬機器安裝visual basic 6.0
新建工程，新增兩個窗體
窗體名稱 -> fromlogin
窗體caption -> 密碼驗證
username和passsword -> label 名稱為txtuser 和 txtpass
確定和取消 -> commandbtton 名稱為cmdok 和 cmdcancle
cmdok屬性 cancle為false default為true
cmdcancle屬性 cancle為true default為false
窗體名稱 -> frommain
窗體caption -> info
label caption為correct
編輯**fromlogin右鍵檢視**，內容：
private sub cmdcancle_click()
unload me
end sub
private sub cmdok_click()
if txtuser = "root" and txtpass = "root" then
frommain.show
unload me
else
txtuser.text = ""
txtpass.text = ""
end if
end sub
frommain右鍵檢視**，內容：
private sub from_load()
label1.caption = "pass correct"
end sub
預設使用者名稱和密碼: root root
檔案\生成工程*.exe就可以生成可執行檔案。
VB6 0函式集合
一 型別轉換類函式 1.ctype x 格式 p cbool x 將x轉換為 布林 boolean 型別 p cbyte x 將x轉換為 位元組 byte 型別 p ccur x 將x轉換為 金額 currency 型別 p cdate x 將x轉換為 日期 date 型別 p cdbl x 將x轉...
VB6 0 程式設計入門
識別符號 使用者在程式設計時定義的名稱。關鍵字 vb中擁有固定含義 不能被重新定義的識別符號。常見關鍵字 as 定義乙個變數 date 日期函式 else 條件語句中的 否則 error 錯誤物件 let 屬性定義的關鍵字 me 當前物件 null 表示變數不包含有效資料 nothing 將物件變數...
個人筆記 VB6 0入門
未定義的變數賦值為0 預設 dim m as integer,j as integer,x as single,s as string k 等效於 dim m j x s k 乙個簡單的練習如下 option explicit private sub text1 lostfocus if not i...