freepeople性欧美熟妇, 色戒完整版无删减158分钟hd, 无码精品国产vα在线观看DVD, 丰满少妇伦精品无码专区在线观看,艾栗栗与纹身男宾馆3p50分钟,国产AV片在线观看,黑人与美女高潮,18岁女RAPPERDISSSUBS,国产手机在机看影片

正文內(nèi)容

寵物用品管理系統(tǒng)--數(shù)據(jù)庫課程設(shè)計(編輯修改稿)

2025-02-14 15:26 本頁面
 

【文章內(nèi)容簡介】 et 1 = New Set rs1 = New Set cm1 = New Dim strn As Stringstrn = driver={sql server}。server=(local)。database=CW。 strn = 1strsql = select * from managers where mngId=39。 + + 39。and psd=39。 + + 39。Set rs1 = (strsql)If = False ThenUnload MeElseMsgBox (用戶名或密碼錯誤,請重新登錄!)End IfEnd SubPrivate Sub register_Click()Unload MeEnd Sub(2) 客戶注冊頁面 Private Sub Form_Load() = select * from customersSet = Adodc1 = cusNameSet = = citySet = = telSet = = adsEnd SubPrivate Sub new_Click()End SubPrivate Sub return_Click()Unload MeEnd SubPrivate Sub save_Click()MsgBox 注冊成功!, vbOKOnly, 提示End Sub(3) 貨品管理頁面Private Sub delete_Click()End SubPrivate Sub return_Click()Unload MeEnd Sub(4) 貨品展示頁面 Dim s As StringPrivate Sub order_Click()Unload MeEnd SubPrivate Sub register_Click()Unload MeEnd SubPrivate Sub return_Click()Unload MeEnd Sub 凡是需要數(shù)據(jù)庫信息的窗體,都必須將VB與SQL連接,使用Adodc控件和Datagrid控件,設(shè)置屬性,更改相應(yīng)的ODBC數(shù)據(jù)源和記錄源,將數(shù)據(jù)庫中的信息與VB連接起來。七、系統(tǒng)評價及心得體會系統(tǒng)評價 本次的課程設(shè)計,我能完成老師給出的最基本要求,并在此基礎(chǔ)創(chuàng)新,選擇了一個相對新穎的題目進(jìn)行設(shè)計,合理之處是把系統(tǒng)分為管理員和客戶兩個方向來管理,大大提高了系統(tǒng)的效率,方便使用。包括增刪改查以及注冊等多個功能。不足之處是建表太多,數(shù)據(jù)有點冗余。以后會多加改正,創(chuàng)建出更合理的管理系統(tǒng)。學(xué)習(xí)感受。 (1)必須牢固地掌握基礎(chǔ)知識,如數(shù)據(jù)庫,vb等,這樣才能寫出高水平的程序。 (2)當(dāng)遇到問題時,多動腦筋,查資料或者上網(wǎng),認(rèn)真仔細(xì)地解決,相信
點擊復(fù)制文檔內(nèi)容
環(huán)評公示相關(guān)推薦
文庫吧 www.dybbs8.com
備案圖片鄂ICP備17016276號-1