高校人事管理信息系統(tǒng)設(shè)計-資料下載頁
2025-04-18 04:07本頁面
【正文】 ist Security Info=False。Initial Catalog=人事管理。Data Source=PC043 = adCmdTable = 基本信息表(工號).Value = Trim()(性別).Value = Trim()(學(xué)歷).Value = Trim()(政治面貌).Value = Trim()(姓名).Value = Trim()(年齡).Value = Trim()(職務(wù)).Value = Trim()(所屬部門).Value = Trim()MsgBox 恭喜你添加成功 = = = = = = = = Exit SubEnd IfEnd Sub添加工資代碼如下：Private Sub Command11_Click() = Provider=。Integrated Security=SSPI。Persist Security Info=False。Initial Catalog=人事管理。Data Source=PC043 = adCmdText = select 工號 from 工資表 where 工號 = 39。 amp。 Trim() amp。 39。If = False Then MsgBox 此工號已存在, 0, 提示 Exit SubEnd IfIf = Or = Or = Or = ThenMsgBox 請將信息填寫完整ElseDim a As String a = = Provider=。Integrated Security=SSPI。Persist Security Info=False。Initial Catalog=人事管理。Data Source=PC043 = adCmdTable = 工資表(工號).Value = Trim()(基本工資).Value = Trim()(工齡補貼).Value = Trim()a = + + (實發(fā)工資).Value = Trim(a)MsgBox 恭喜你添加成功 = = = = = Exit SubEnd IfEnd Sub添加工作信息代碼如下：Private Sub Command20_Click() = Provider=。Integrated Security=SSPI。Persist Security Info=False。Initial Catalog=人事管理。Data Source=PC043 = adCmdText = select 工號 from 工作表 where 工號 = 39。 amp。 Trim() amp。 39。If = False Then MsgBox 此工號已存在, 0, 提示 Exit SubEnd IfIf = Or = Or = Or = ThenMsgBox 請將信息填寫完整Else = Provider=。Integrated Security=SSPI。Persist Security Info=False。Initial Catalog=人事管理。Data Source=PC043 = adCmdTable = 工作表(工號).Value = Trim()(姓名).Value = Trim()(來院時間).Value = Trim()(任職時間).Value = Trim()MsgBox 恭喜你添加成功 = = = = Exit SubEnd IfEnd Sub添加年度考核代碼如下：Private Sub Command25_Click() = Provider=。Integrated Security=SSPI。Persist Security Info=False。Initial Catalog=人事管理。Data Source=PC043 = adCmdText = select 工號 from 年度考核表 where 工號 = 39。 amp。 Trim() amp。 39。If = False Then MsgBox 此工號已存在, 0, 提示 Exit SubEnd IfIf = Or = Or = Or = ThenMsgBox 請將信息填寫完整Else = Provider=。Integrated Security=SSPI。Persist Security Info=False。Initial Catalog=人事管理。Data Source=PC043 = adCmdTable = 年度考核表(工號).Value = Trim()(考察年度).Value = Trim()(工作業(yè)績).Value = Trim()(工作態(tài)度).Value = Trim()MsgBox 恭喜你添加成功 = = = = Exit SubEnd IfEnd Sub 5．小結(jié) 這不是第一次作課程設(shè)計了，雖然不是挺陌生的，但剛開始時還是感覺無從下手。將理論轉(zhuǎn)化為實際的確有點麻煩，問題總是在意想不到的時候出現(xiàn)。前2天我都在熟悉兩個軟件的基本操作，后面的時間才開始著手設(shè)計窗體和代碼。窗體的設(shè)計還是相對比較簡單的，因為我想減少點窗體，所以我選擇了多界面瀏覽的控件sstab，這個控件因為以前沒接觸過，所以對它的屬性不是特別了解，用起來很吃力。那幾天里，我一直在網(wǎng)上搜索這個控件的相關(guān)用法和屬性，最后終于把這個控件搞懂了。老師說這也是一個學(xué)習(xí)的過程，我很同意，因為如果我們都把界面做成一樣的，控件都用那幾個，那我們的系統(tǒng)界面也就顯得太單調(diào)了，沒什么創(chuàng)意。我們以后出去工作也是一樣，計算機知識更新太快，所以我們必須學(xué)會自主學(xué)習(xí)的能力，要邊學(xué)邊用，學(xué)以致用。代碼的設(shè)計就比較困難了，計算機對代碼的要求比較嚴(yán)謹(jǐn)，即使是一個標(biāo)點出現(xiàn)了錯誤，程序也無法運行。在實際操作中我經(jīng)常遇到這種情況，總是粗心把字母或標(biāo)點打錯了，以至于程序不能運行。所以每次都是反反復(fù)復(fù)的盯著代碼看，就怕打錯了。后來幾天就要好點了，代碼幾乎沒有出現(xiàn)非智力因素的錯誤。我以后想當(dāng)一個程序員，程序員就要要求嚴(yán)謹(jǐn)，一絲不茍，我想這次的課程設(shè)計對我是一個很好的鍛煉。做這次課程設(shè)計讓我學(xué)到了很多的東西，讓我對數(shù)據(jù)庫有了更深的了解，也對我以后做其他的課程設(shè)計打下了良好的基礎(chǔ)。只要肯動腦筋，學(xué)會獨立思考，沒有什么難的。不會可以請教老師和其他同學(xué)，一步一步的進行完善，這次課程設(shè)計我坐代老師旁邊，我每次有問題都會去問他，老師總是不厭其煩的為我解答，最終幫我解決問題，感謝代老師這么多天對我的細心指導(dǎo)。做完了所有的工作后，終于松了一口氣，心里有點小小的成就感。雖然因為知識的缺乏，該系統(tǒng)的漏洞還是不可避免，但我對這門課更有信心了，只要努力就會有回報的。這些就是我這次課程設(shè)計的收獲。 6．參考文獻1 . 北京：北京機械工業(yè)出版社，20052 錢雪忠、黃學(xué)光、. 北京： 北京郵電大學(xué)版社，20053 Basic可視化程序設(shè)計. 北京：中國鐵道出版社，20054 ：機械工業(yè)出版社，20035 唐世胃. sqlserver入門北京：中國鐵道出版社，2006
公司管理相關(guān)推薦
鄂ICP備17016276號-1