【文章內(nèi)容簡(jiǎn)介】
d Sub 以上連接方法是在事件里完成,也可以把連接做一個(gè)過(guò)程,需要連接時(shí)直接帶參調(diào)用也可。如在模塊中這樣定義Public conn As New Public Function DBConnection(FileName As String)As BooleanSet conn = New = “provider=。” amp。 “data source=” amp。 FileNameIf = adStateOpen ThenDBConnection = TrueElseDBConnection = FalseEnd If End Function 然后回事件中調(diào)該函數(shù)。其相應(yīng)代碼如下:Private Sub Command2_Click() = If DBConnection()ThenMsgBox “連接成功!”ElseMsgBox “連接失?。 盓nd If End Sub第二篇:VB實(shí)訓(xùn)總結(jié)VB實(shí)訓(xùn)總結(jié)時(shí)間過(guò)得真快,轉(zhuǎn)眼間,一周的實(shí)訓(xùn)生活已悄然過(guò)去了,然而實(shí)訓(xùn)的過(guò)程還歷歷在目。實(shí)訓(xùn)期間,讓我學(xué)到了很多東西,不僅使我在理論上對(duì)VB程序設(shè)計(jì)有了全新的認(rèn)識(shí),在實(shí)踐能力上也得到了提高,真正地做到了學(xué)以致用,更學(xué)到了很多做人的道理,對(duì)我來(lái)說(shuō)受益非淺。親身感受到理論與實(shí)際的相結(jié)合,讓我大開(kāi)眼界。也是對(duì)以前所學(xué)知識(shí)的一個(gè)初審吧!這次實(shí)訓(xùn)對(duì)于我以后學(xué)習(xí)、找工作也真是受益菲淺,在短短的一周中相信這些寶貴的經(jīng)驗(yàn)會(huì)成為我今后成功的重要的基石。作為一名大二的學(xué)生,經(jīng)過(guò)差不多一年半的在校學(xué)習(xí),對(duì)程序設(shè)計(jì)有了理性的認(rèn)識(shí)和理解。在校期間,一直忙于理論知識(shí)的學(xué)習(xí),沒(méi)有機(jī)會(huì)也沒(méi)有相應(yīng)的經(jīng)驗(yàn)來(lái)參與項(xiàng)目的設(shè)計(jì)開(kāi)發(fā)。所以在實(shí)訓(xùn)之前,程序設(shè)計(jì)對(duì)我來(lái)說(shuō)是比較抽象的,不知道一個(gè)完整的程序要怎么完成。這次我做的項(xiàng)目是人事管理系統(tǒng),其中包含了登陸、員工資料庫(kù)、考勤庫(kù)、工資庫(kù)、商務(wù)信息等幾個(gè)部分。在實(shí)訓(xùn)剛開(kāi)始的時(shí)候,做的只是幾個(gè)簡(jiǎn)單的界面,覺(jué)得其實(shí)還算比較簡(jiǎn)單的,到第三天,基本部分的代碼都編寫出來(lái)了,但是調(diào)試的時(shí)候出現(xiàn)了很多問(wèn)題。而且,有時(shí)候由于考慮不周以及粗心的緣故,代碼方面也存在很大的誤差。老師們教會(huì)了我們很多簡(jiǎn)單實(shí)用的技巧。也讓我們意識(shí)到了要想全面完整的完成一個(gè)模塊,首先要經(jīng)行程序設(shè)計(jì),全面分析會(huì)用到的東西及考慮可能會(huì)出現(xiàn)的情況。所以出現(xiàn)的問(wèn)題也在老師的指導(dǎo)下,順利解決了。本程序的編寫,有很多不足的地方,可能有些功能不太全面也不太完善,但我覺(jué)得自己是認(rèn)認(rèn)真真的做了,而且從中學(xué)到了很多,以后,我要把自己欠缺的知識(shí)點(diǎn)補(bǔ)習(xí)好,而且要學(xué)會(huì)舉一反三,融會(huì)貫通,最重要的是改掉粗心馬虎、考慮不周的習(xí)慣。我想我以后會(huì)將此程序完善好,爭(zhēng)取能夠運(yùn)用到生活中去。在實(shí)訓(xùn)期間帶給我不僅僅是一種經(jīng)驗(yàn),更是我人生的一筆財(cái)富。俗語(yǔ)說(shuō):紙上得來(lái)終覺(jué)淺。沒(méi)有把理論用于實(shí)踐是學(xué)得不深刻的。當(dāng)今大學(xué)教育是以理論為主,能有機(jī)會(huì)進(jìn)行實(shí)訓(xùn),對(duì)我來(lái)說(shuō)是受益不淺的。我就快畢業(yè)走向社會(huì)了,相信這次實(shí)習(xí)對(duì)我日后參加工作有幫助。一路的艱辛與微笑,雖有所收獲,然所學(xué)是開(kāi)始,新的考驗(yàn)和抉擇要奮斗不息、礪前行,請(qǐng)不要讓我們年輕的時(shí)光留下太多遺憾!第三篇:VB實(shí)訓(xùn)心得為期一周的實(shí)訓(xùn)即將結(jié)束,通過(guò)這次的實(shí)訓(xùn)使我們學(xué)到了很多,同時(shí)也讓我們意識(shí)到我們要學(xué)的更多。本次實(shí)訓(xùn)的項(xiàng)目是關(guān)于工程測(cè)量的程序設(shè)計(jì),以小組的形式進(jìn)行分工合作,我組共3個(gè)人,任務(wù)是四等水準(zhǔn)測(cè)量的程序設(shè)計(jì)。從程序的需求分析、可行性分析、設(shè)計(jì)到編寫、調(diào)試、修改、完善、到最后的實(shí)訓(xùn)報(bào)告,每個(gè)人都付出了時(shí)間和精力去做好自己的任務(wù)并努力地去完善它。實(shí)訓(xùn)的第一天接到任務(wù)時(shí)我們都覺(jué)得有點(diǎn)難度,很有挑戰(zhàn)性,畢竟四等水準(zhǔn)測(cè)量是一個(gè)比較系統(tǒng)、完善、功能相對(duì)較齊全的計(jì)算程序,因此程序編寫也十分復(fù)雜,工作量較大,編寫一定要認(rèn)真。一個(gè)小小的失誤都可能使程序出現(xiàn)大的漏洞。而我們只是學(xué)了點(diǎn)簡(jiǎn)單的vb程序編寫,沒(méi)有嘗試過(guò)這種相對(duì)來(lái)說(shuō)比較系統(tǒng)完善的系統(tǒng)。所以在做項(xiàng)目的時(shí)候我們倍感壓力、更加的團(tuán)結(jié)協(xié)作,可即使如此我們還是出現(xiàn)了錯(cuò)誤,我們的程序在編寫上存在一些漏洞,導(dǎo)致調(diào)試時(shí)不能正常運(yùn)行,后經(jīng)過(guò)老師的指導(dǎo)、我們的調(diào)整,終于可以完美的運(yùn)行,這里也耽誤了我們很多寶貴的時(shí)間,直接導(dǎo)致了我們?cè)陧?xiàng)目調(diào)試上速度不夠快。本人很榮幸地?fù)?dān)任組長(zhǎng)一職,與其他組員一起進(jìn)行任務(wù)分配以及協(xié)調(diào)等。我組做了四等水準(zhǔn)測(cè)量的計(jì)算程序、豎直角計(jì)算和視