【正文】 “, vbInformation, ”提示：“Exit Sub End If If Trim()= ”“ ThenMsgBox ”請輸入電話“, vbInformation, ”提示：“Exit SubEnd If(”sname=39。 amp?！?If Not ThenMsgBox ”該姓名已有，請重新輸入“, vbExclamation, ”提示：“With Text1.SelStart = 0.SelLength = Len(.Text).SetFocusEnd WithExit Sub End If With .AddNew.Fields(0)= Trim().Fields(1)= Trim().Update.Requery End WithSet = Adodc1 = ”“ = ”“MsgBox ”已成功添加“, vbInformation, ”提示：“End Sub提示輸入錯誤：Private Sub Text2_Change()For i = 1 To Len(Text2)If Not IsNumeric(Mid(Text2, i, 1))Then MsgBox ”請輸入正確的電話號碼！“, vbExclamation, ”警告： = Len(Text2)Exit SubEnd IfNext End Sub返回：Private Sub Command1_Click() End Sub主要輸入輸出界面（1）From1(登錄界面)（2）From2(轉(zhuǎn)換界面)（3）From3(查詢界面)（4）From4(刪除界面)（5）From5(添加界面)三、遇到的問題及解決方案在做查詢是查看上下翻動，只可以看當前和下一條，后面還有的號碼就無法產(chǎn)看。原代碼：Private Sub Command4_Click() End Sub改動后：Private Sub Command4_Click() = TrueIf Then = FalseEnd If End Sub在怎么系統(tǒng)完成后，將系統(tǒng)拉倒其他電腦上用就會彈出ADODC數(shù)據(jù)庫不對。五、學習心得剛學VB的時候感覺這很沒意思，因為全是代碼對于剛接觸的我來說很難，可以從第一次上VB的上機課開始，就感覺很有意思，因為當看到自己做的一個程序做出來時你會有成就感，所以開始照著課本或老師講的來做，結(jié)果卻發(fā)現(xiàn)，怎么運行不了？明明是按照老師的步驟去做的，明明是按照老師的要求去做的，但是就是會遇到一些問題使程序運行不了。但由于時間問題，做的還是有點粗糙，還是不免存在一定的問題。在課程設(shè)計過程中，雖然我對程序設(shè)計不是很熟悉，但是通過老師詳細的講解，我按照步驟去做，遇到問題的時候先自己想辦法解決，解決不了的就去問同學，問老師，通過這種學習，收獲很大，學會了自己解決棘手問題。要了解概念：VB程序設(shè)計本身并不復雜，變量，函數(shù)，條件語句。自己動手，編寫一些程序，才會有成就感，進而對課程產(chǎn)生興趣。養(yǎng)成良好的編程習慣，程序構(gòu)思要有說明。對運行結(jié)果要做正確與否的分析。經(jīng)過一段時間，通過我爸爸的關(guān)系 。于是第一天我只是整理了一下材料，同事交給我怎么整理分類材料。同事說過了幾天就稍有點習慣了，剛步入工作崗位，才發(fā)現(xiàn)自己有很多都不懂的。還要學習一些會計的知識。我開始用電腦學習Word。我開始學習怎么用復印機，小時候就見過怎么用，而這次真真正正學會怎么用，復印時總能問道焦味，以前以為是墨水的味道，現(xiàn)在懂得復印的原理之后才明白那是激光照射的高溫之下產(chǎn)生的焦味。經(jīng)過這幾天的適應，我已經(jīng)對工作比較熟悉了。周末，老板提議我們工作完后去吃飯。我學到了一些在學校學不到的東西，我發(fā)現(xiàn)自己真的變了點，會比以前為人處事了。忙了一天還沒有忙完，中間還有人催，經(jīng)理也來催，當時真的不想干了，不來受這份氣。經(jīng)過這次的忙碌，我了解到我對WordExcel等辦公軟件還沒有完全掌握，只是了解一些皮毛而已，我還要多學習一些知識。Photoshop的強大功能比我以前用的美圖秀秀效果好多了，雖然只是掌握了些皮毛，但處理圖片還是比美圖秀秀好。今天同事有事要晚來一點，就要我一個人在辦公，大家相處的很好，沒有什么隔合。真的很想念在學校的日子。所以，感覺現(xiàn)在的工作還是挺不錯的，最重要的事就是周圍的同事都很不錯的。同事跟我說了一些推心置腹的話，說工作中人際交往事非常重要的，在大學里要好好鍛煉自己的交流能力，畢竟大家都在同一處工作，少不了交流?，F(xiàn)在，離走進社會越來越近了。這就要求我們利用假期時間走進社會實踐。這就形成了從實踐中學習，從學習中實踐的良性循環(huán)。我們不僅要學好課本里的知識，還要主動走進社會，積極在實踐中學習其他的東西，不斷增加自己的經(jīng)驗，全方面武裝自已，才能在這個社會有立足之地甚至擁有不敗之地。剛開始。不然，想念以后干什么都會干不好的?，F(xiàn)在才明白，在校做一名學生，是多么的好啊！早晚要工作，早晚要步入社會，早晚要面對這些避免不了的事。有個事實眾所周知，學生的實際操作能力與在校理論學習有一定的差距。有時候我會想，實際操作這么簡單，但為什么我們要學習那么深奧的知識呢？現(xiàn)在的教育真的存在很大的弊端，嚴重的脫離了社會實際應用嗎？其實不然，在學習這些吃力的知識的同時，我們的學習能力提高了，理解力和邏輯思維能力也增強了。作為大學生，我們的年齡也不小了，離走向社會工作也不遠了，我們應該懂得與社會上各方面的人交往，處理社會上發(fā)生的各方面的事情，這就意味著我們必須得重視社會實踐。我們要帶著實實在在的能力走進社會，為社會服務。只要你想學習，學習的機會還是很多的，老員工們從不吝惜自己的經(jīng)驗來指導你工作，讓你少走彎路；集團公司、公司內(nèi)部有各種各樣的培訓來提高自己，你所要作的哪些是你需要了解的，哪些是你感興趣的。另一個是積極進取的工作態(tài)度在工作中，你不只為公司創(chuàng)造了效益，同時也提高了自己，象我這樣沒有工作經(jīng)驗的新人，更需要通過多做多問來積累經(jīng)驗。最后一點是為人處事作為學生面對的無非是同學、老師、家長，而工作后就要面對更為復雜的關(guān)系。在我工作的崗位中，我做到了一些，因為自己在工作中的努力，也得到了非常多的鼓勵。第一個就是缺乏工作經(jīng)驗。第二是工作態(tài)度，在工作中僅僅能夠完成布置的工作，在沒有工作任務時不能主動要求布置工作，若沒有工作做時就會松懈，不能做到主動學習，這主要還是因為懶惰在作怪，在今后我要努力克服惰性，沒有工作任務時主動要求布置工作，沒有布置工作時作到自主學