【正文】 干精神等。在工作 中具體表現(xiàn)為 :對(duì)難堪場(chǎng)面的委婉圓場(chǎng)能力、對(duì)0801030222 錢建飛 32 領(lǐng)導(dǎo)者交辦事項(xiàng)的領(lǐng)悟能力、對(duì)責(zé)怪批評(píng)的忍耐反思能力等。 。 。作為一名年輕干部 ,應(yīng)該具備多種能力 ,其中一項(xiàng)重要能力就是學(xué)習(xí)能力，這也是一種工作能力 ,是形成核心競(jìng)爭(zhēng)力的基礎(chǔ)性條件。 。核心競(jìng)爭(zhēng)力在形成以后 ,還會(huì)面臨再培育和再提升的問(wèn)題 ,否則隨著競(jìng)爭(zhēng)的加劇和科學(xué)技術(shù)的發(fā)展 ,核心競(jìng)爭(zhēng)力也會(huì)逐漸失去其競(jìng)爭(zhēng)優(yōu)勢(shì) ,淪為一般競(jìng)爭(zhēng)力 ,甚至完全喪失競(jìng)爭(zhēng)優(yōu)勢(shì)。 。 （一）個(gè)人核心競(jìng)爭(zhēng)力的性質(zhì) 。 （三）注重實(shí)效，建立長(zhǎng)效機(jī)制。 （二）密切配合，強(qiáng)化溝通協(xié)作。 （二）不同崗員培訓(xùn)重視程度 不一。二是要嚴(yán)格落實(shí)培訓(xùn)經(jīng)費(fèi)使用規(guī)定，加強(qiáng)培訓(xùn)經(jīng)費(fèi)的管理。 0801030222 錢建飛 28 （四）加強(qiáng)培訓(xùn)機(jī)制建設(shè)，健全完善培訓(xùn)管理體制。一是加強(qiáng)管理人員培訓(xùn)技能的培訓(xùn)。三是高度重視新員工安全教育工作。結(jié)合工作熱點(diǎn)、難點(diǎn) ，全面推進(jìn)全員安全文化教育，促進(jìn)全體員工對(duì)安全生0801030222 錢建飛 27 產(chǎn)的相關(guān)文件和標(biāo)準(zhǔn)實(shí)現(xiàn)有效領(lǐng)會(huì)與全面掌握。 （二）加強(qiáng)員工安全教育，提高員工隊(duì)伍的安全意識(shí)。一是抓好應(yīng)急隊(duì)員軍事技能培訓(xùn)。 根據(jù)管理崗位和操作崗位不同的工作內(nèi)容與工作性質(zhì)，具有針對(duì)性地開(kāi)展員工培訓(xùn)，提升培訓(xùn)效果。 三是安全知識(shí)培訓(xùn)覆蓋率達(dá) 100%。 一、 總體思路 0801030222 錢建飛 25 緊密圍繞保衛(wèi)處年度工作目標(biāo)，深入貫徹落實(shí)科學(xué)發(fā)展觀，以黨的十八大五中全會(huì)精神為指引，以提高員工思想政治素質(zhì)和業(yè)務(wù)能力為核心，強(qiáng)化培訓(xùn)體系建設(shè)，優(yōu)化人才培育形式，夯實(shí)培訓(xùn)工作基礎(chǔ) ，打造一支專業(yè)技能精、執(zhí)行能力強(qiáng)、綜合素質(zhì)高的員工隊(duì)伍。讓我們滿載著這份責(zé)任和這份奉獻(xiàn)揚(yáng)帆起航，再創(chuàng)石油事業(yè)的錦繡前程。沒(méi)有奢華的生活，沒(méi)有優(yōu)厚的待遇，沒(méi)有顯赫的地位，但他卻總是忙碌而快樂(lè)的工作著，沒(méi)有一絲抱怨，沒(méi)有一絲哀嘆，有的只是他一句鏗鏘有力的答言： 我是石油 人 。 站在這里我怎能忘記為延長(zhǎng)石油發(fā)展殫精竭慮的他。這就是對(duì)奉獻(xiàn)的最好注解，幾年來(lái)涌現(xiàn)在我們?cè)O(shè)備維修部的優(yōu)秀人物數(shù)不勝數(shù)：機(jī)電維修車間優(yōu)秀青年女工白春麗；機(jī)電車間孩子上小學(xué)的單身媽媽趙秀梅；油管維修車間李瑋青 ?? 今年四月份至八月份奪油會(huì)戰(zhàn)全廠周六加班，我們默默地在各自的工作崗位 上上不懈的努力和付出，經(jīng)歷了多少次工作與親情的考驗(yàn)，背負(fù)了多少回對(duì)家人和親友的愧疚。因?yàn)樨?zé)任可以讓即將沉淪的浪子回頭，0801030222 錢建飛 23 可以讓弱不禁風(fēng)的幼苗逐漸承受風(fēng)吹雨打，可以讓一個(gè)人堅(jiān)持一輩子做好一件事情。 這個(gè)貢獻(xiàn)就是奉獻(xiàn)。我們每一名石油人的切身利益都和延長(zhǎng)石油的生存和發(fā)展息息相關(guān)。Initial Catalog=canteen。若用戶名為空，返回，重新輸入 End If Call sqlcon() If ( = user_id And = psw) Then () () Else MsgBox(登錄失敗，請(qǐng)檢查用戶名及密碼是否正確！ , + 48, 注意 ) End If End Sub Sub sqlcon() Dim constr As String = Provider=。開(kāi)闊了視野，增長(zhǎng)了知識(shí)，積累了經(jīng)驗(yàn)。這些都有待于進(jìn)一步的改善。系統(tǒng)設(shè)計(jì)為整個(gè)程序構(gòu)建了骨架 ,各個(gè)功能模塊實(shí)現(xiàn)各個(gè)細(xì)節(jié)部分。 %39。 Private Sub Command1_Click() 0801030222 錢建飛 17 If = Or = Then MsgBox 員工編號(hào)或名稱為空，請(qǐng)重新輸入！ Exit Sub End If If = 員工檔案修改 Then If = True Then MsgBox 編號(hào)不存在無(wú)法修改 , vbOKOnly + vbExclamation, 警告！ Exit Sub End If Dim Mag As Integer Mag = MsgBox(是否修改！ , vbYesNo, 警告 ) If Mag = vbYes Then 39。 amp。 amp。 amp。 amp。 amp。 amp。 amp。 amp。結(jié)束 EXCEL 對(duì)象 Set xlApp = Nothing 39。設(shè)置活動(dòng)工作表 (1, 1) = 員工編號(hào) (1, 2) = 姓名 (1, 3) = 年齡 (1, 4) = 性別 (1, 5) = 所在部門 (1, 6) = 電話 (1, 7) = 職位 (1, 8) = 學(xué)歷 (1, 9) = 聘用時(shí)間 (1, 10) = 離職時(shí)間 (1, 11) = 婚姻狀況 (1, 12) = 政治面貌 (1, 13) = 畢業(yè)學(xué)校 (1, 14) = 籍貫 (1, 15) = 民族 For j = 1 To sum (j + 1, 1) = (0) (j + 1, 2) = (1) 0801030222 錢建飛 15 (j + 1, 3) = (2) (j + 1, 4) = (3) (j + 1, 5) = (4) (j + 1, 6) = (5) (j + 1, 7) = (6) (j + 1, 8) = (7) (j + 1, 9) = (8) (j + 1, 10) = (9) (j + 1, 11) = (10) (j + 1, 12) = (11) (j + 1, 13) = (12) (j + 1, 14) = (13) (j + 1, 15) = (14) Next SaveFile = d:\ 39。 Set xlApp = CreateObject() 39。and 學(xué)歷 like 39。 and 所在部門 like 39。 and 政治面貌 like 39。 and 職位 like 39。and 性別 like 39。and 婚姻狀況 like 39。 and 姓名 like 39。保存到 text1 中去 Dim SaveFile As String Dim xlApp As Dim xlBook As Dim xlSheet As = select * from 員工基本信息表 where 員工編號(hào) like 39。先給賦值為 0 If = 0 Then = 0 Else sum = 0 Do While Not 39。% amp。% amp。% amp。% amp。% amp。% amp。% amp。% amp。主要集成了查詢，錄入，刪除，統(tǒng)計(jì)，輸出等功能 具體實(shí)現(xiàn)代碼如下： Private Sub Luru_Click(Index As Integer) da = 員工檔案添加 BH = 員工 編號(hào) bc = 保存 End Sub Private Sub shuchu_Click(Index As Integer) End Sub Private Sub Tongji_Click(Index As Integer) End Sub Private Sub Toolbar1_ButtonClick(ByVal Button As ) Select Case Case 添加 da = 員工檔案添加 BH = 員工編號(hào) 0801030222 錢建飛 11 bc = 保存 Load Form8 Case 查詢 Load Form3 Case 刪除 Load Form3 Case 修改 Load Form3 Case 幫助 MsgBox 請(qǐng)聯(lián)系客服，我們將給予幫助！ , vbOKOnly, Case 退出系統(tǒng) Unload Me Case 統(tǒng)計(jì) Load Form3 Case 退出系統(tǒng) End End Select End Sub 三、主功能界面 0801030222 錢建飛 12 主功能界面上集成了幾乎所有的功能按鈕，這是由于檔案的修改、刪除、統(tǒng)計(jì)、導(dǎo)出等功能都必須通過(guò)查詢后才能工作。 Trim() amp。 系統(tǒng)設(shè)計(jì) 一、 登錄界面 0801030222 錢建飛 8 當(dāng)輸入的賬號(hào)和密碼符合 Access 數(shù)據(jù)庫(kù)中的用戶表中的數(shù)據(jù)時(shí) 時(shí)，焦點(diǎn)落在確定上面，此時(shí)點(diǎn)擊確定就可以登入系統(tǒng)。 4． ImageList 屬性定義與數(shù)據(jù)條對(duì)應(yīng)的 ImageList 控件名，該控件定義工具條按鈕顯示的圖像。 Toolbar 也是一個(gè)控件容器且具有 Style屬性，并可以為其增加下拉按鈕和平滑按鈕等。 0801030222 錢建飛 4 系統(tǒng)分析 檔案管理信息系統(tǒng) 修改員工信息 增加員工信息 刪除員工信息 查詢員工信息 打印員工檔案 權(quán)限管理 0801030222 錢建飛 5 ： 添加員工信息 統(tǒng)計(jì)員工信息 查詢員工信息 修改員工信息 刪除員工信息 信息處理 員工基本信息表 客戶 0801030222 錢建飛 6 實(shí)現(xiàn)菜單選項(xiàng) 菜單是程序最重要的特性之一，大多數(shù)程序都依賴一個(gè)定義良好增加員工信息要求 修改員工信息要求 刪除員工信息要求 新員工信息 員工信息修改結(jié)果 刪除員工信息 員工信息 查詢員工信息要求 打印要求 員工信息 查詢結(jié)果 輸出打印結(jié)果 增加員工 修改員工 刪除員工 查詢信息 信息輸出 有關(guān)操作人員 員工基本信息表 有關(guān)部門 0801030222 錢建飛 7 的菜單使程序易于使用和維護(hù)， Visual Basic 也提供了強(qiáng)大 的創(chuàng)建菜單功能是程序更加標(biāo)準(zhǔn)。 （ 2）修改功能 該系統(tǒng)提供的檔案修改功能可以在員工的基本情況發(fā)生變化后，根據(jù)修改的項(xiàng)目修改員工原始的各種信息，比如修改學(xué)歷、所在部門、職務(wù)名稱等。又經(jīng)過(guò)權(quán)限的設(shè)置，幫助他們 能夠快速準(zhǔn)確和職能化的工作，減少作業(yè)量并提高效率。但由于 SQL Server 較 Access 復(fù)雜，本設(shè)計(jì)又是注重研究系統(tǒng)的實(shí)現(xiàn)，所以采購(gòu)管理信息系統(tǒng)在 Access 技術(shù)上是完全可行的。確定總體結(jié)構(gòu)，利用數(shù)據(jù)庫(kù)所具有的能力，以最簡(jiǎn)潔最容易的方法，使其成為一個(gè)初級(jí)的系統(tǒng)軟件。但是， access 是個(gè)高度復(fù)雜的系統(tǒng)，在這里將實(shí)現(xiàn)的是一個(gè)適用于中小企業(yè)的備忘錄，包含的模塊主要由用戶登錄、備忘錄類型的設(shè)定、信息錄入以及特定信息的采集。目前的 ERP 軟件就整合了財(cái)務(wù)、庫(kù)存、人事等各方面的企業(yè)要素，極大地提高了企業(yè)的信息流轉(zhuǎn)效率，從而提高了生產(chǎn)率。 可行性分析 通過(guò)調(diào)查分析采購(gòu)供應(yīng)管理信息系統(tǒng)所具備的能力及實(shí)現(xiàn)的方法。 SQL Server 2021 完全可以提供該系統(tǒng)的操作要求和數(shù)據(jù)庫(kù)需求。 （ 4）管理可行性：此次采購(gòu)管理系統(tǒng)的設(shè)計(jì)由于操作簡(jiǎn)單，內(nèi)容較少，0801030222 錢建飛 3 且炒作簡(jiǎn)單，同時(shí)又能適應(yīng)大部分的采購(gòu)系統(tǒng)，故能使采購(gòu)流程效率提高。本系統(tǒng)支持任何一種輸入方法。 （ 5）檔案打印功能 可根據(jù)需要，打印出員工數(shù)據(jù)庫(kù)中所有或部分人事檔案。其中的按鈕可以顯示圖像和標(biāo)題，并按功能分組或加入分隔符，還可以圍棋設(shè)置鼠標(biāo)停留在其上顯示的提示字符。其屬性及對(duì)象如下： 1． Align 屬性定義工具條在窗體中的位置 2． ToolTipText 屬性是字符串類型，定義控件的提示字符 3． Style 屬性定義按鈕外觀。 創(chuàng)建工具條包括 ImageList 和 Toolbar 控件 ImageList 用于為其他控件提供圖像庫(kù)，將 ImageList 控件加入到工具箱的操作于前述 Toolbar 控件相同。 amp。由他可以連接跳轉(zhuǎn)到用戶想要用用的任何一個(gè)功能界面。刪除記錄 End If End Sub Private Sub Command1_Click() cx = 1 = select * from 員工基本信息表 where 員工編號(hào) like