基于pb語言的企業(yè)工資管理系統(tǒng)(編輯修改稿)
2025-06-19 08:05 本頁面
【文章內(nèi)容簡介】 e項，打開Create Adaptive Server Anywhere Database對話框 在Database Name編輯框中輸入或選擇數(shù)據(jù)庫路徑和名稱（11），設置相應的選項,單擊OK按鈕。 點擊“11“左邊的”+”，展開,選擇Tables右擊，在彈出的菜單中選擇New Tables下Grid。數(shù)據(jù)表的字段設置框如下：Colum NameData TypeWidthNullDefaultPassloginpasswordCharchar1010NoNoNoneNone 點擊保存按鈕，名稱為A1。選擇A1,在彈出的菜單中選擇Primary Key下的New Primary Key按鈕,在彈出的對話框中選擇一個字段作為主鍵。 選擇A1右擊，在彈出的菜單中選擇Edit Data下的Grid按鈕。數(shù)據(jù)表中的值如下：PassloginPasswordjiangqilin000000 點擊保存按鈕。登陸界面設計 2．窗體的功能介紹和屬性的描述將窗體的名稱改為W_1，Text改為登陸系統(tǒng)選擇工具欄上的命令按鈕，并在窗體中建立兩個單行編輯框（sle_1,sle_2）、兩個標簽框(用戶名,輸入密碼)、兩個命令按鈕(確定,取消）窗體控件屬性默認名控件名文本屬性（Text）字體大小Commandbutton1Commandbutton2Lable1Lable2St_1St_2確定取消無無用戶名輸入密碼宋體宋體宋體宋體宋體宋體五號五號五號五號五號五號程序代碼Open事件程序編碼：//Profile Userverify=”O(jiān)DBC”=False=”Connectstring=’DSN=userverify’”CONNECT USING SQLCA。 IF =0 then Open(w_1) Else Messagebox(“警告”,”數(shù)據(jù)庫連接出錯！”) Halt End if確定按鈕編碼： String user_passlogin String user_password DECLAR my_user CURSOR FOR Select passlogin,password //定義游標from a1where passlogin=:,password=:。open my_user。 //打開游標FETCH my_user into :user_passlogin,:user_password。//讀取數(shù)據(jù)If =0 thenMessagebox(“系統(tǒng)提示”,”你輸入的用戶已被系統(tǒng)確認！”)Open(w_2)
環(huán)評公示相關推薦
鄂ICP備17016276號-1