數(shù)據(jù)庫(kù)課程設(shè)計(jì)報(bào)告(人事管理系統(tǒng))-預(yù)覽頁(yè)
【正文】 2016 年1月15日1． 題目分析：人事管理系統(tǒng)是企、事業(yè)單位常見(jiàn)的計(jì)算機(jī)信息管理系統(tǒng)。工資管理系統(tǒng)是數(shù)據(jù)庫(kù)管理系統(tǒng)的一個(gè)比較典型的應(yīng)用，后臺(tái)數(shù)據(jù)庫(kù)采用Microsoft SQL Sever數(shù)據(jù)庫(kù)。一個(gè)單位的職工不會(huì)是一成不變的，總是在不斷的變化：有調(diào)出、有調(diào)入、也有職工在本單位內(nèi)部調(diào)動(dòng)。(3) 查詢統(tǒng)計(jì)功能。, size=5, maxsize=100, filegrowth=10% ) log on ( name=人事信息管理系統(tǒng), filename=39。查無(wú)此人39。任何人不得添加數(shù)據(jù)39。這僅對(duì)多用戶應(yīng)用程序才是需要的 End SubPrivate Sub cmdUpdate_Click() = End SubPrivate Sub cmdClose_Click() Unload MeEnd SubPrivate Sub Data1_Error(DataErr As Integer, Response As Integer) 39。 Error$(DataErr) Response = 0 39。 ( + 1) 39。 ( * ( * )) + 1End SubPrivate Sub Data1_Validate(Action As Integer, Save As Integer) Select Case Action Case vbDataActionMoveFirst Case vbDataActionMovePrevious Case vbDataActionMoveNext Case vbDataActionMoveLast Case vbDataActionAddNew Case vbDataActionUpdate Case vbDataActionDelete Case vbDataActionFind Case vbDataActionBookmark Case vbDataActionClose End Select = vbHourglassEnd Sub（4）基本職工信息：Private Sub cmdAdd_Click() End SubPrivate Sub cmdDelete_Click() 39。這就是放置錯(cuò)誤處理代碼的地方 39。忽略錯(cuò)誤End SubPrivate Sub Data1_Reposition() = vbDefault On Error Resume Next 39。對(duì)于 Table 對(duì)象，當(dāng)記錄集創(chuàng)建后并使用下面的行時(shí)， 39。這是放置驗(yàn)證代碼的地方 39。但是我從中發(fā)現(xiàn)，只要一步一步調(diào)試、靜下心來(lái)看待問(wèn)題，再?gòu)?fù)雜再微小的問(wèn)題都會(huì)迎刃而解，當(dāng)一個(gè)程序被調(diào)試出來(lái)時(shí)，那時(shí)的快樂(lè)相比與任何困難都值得的。
環(huán)評(píng)公示相關(guān)推薦
鄂ICP備17016276號(hào)-1