【正文】
在這里添加錯(cuò)誤處理代碼 MsgBox 數(shù)據(jù)錯(cuò)誤事件命中錯(cuò)誤: amp。 Error$(DataErr) Response = 0 39。忽略錯(cuò)誤End SubPrivate Sub Data1_Reposition() = vbDefault On Error Resume Next 39。這將顯示當(dāng)前記錄位置 39。為動(dòng)態(tài)集和快照 = 記錄: amp。 ( + 1) 39。對(duì)于 Table 對(duì)象,當(dāng)記錄集創(chuàng)建后并使用下面的行時(shí), 39。必須設(shè)置 Index 屬性 39。 = 記錄: amp。 ( * ( * )) + 1End SubPrivate Sub Data1_Validate(Action As Integer, Save As Integer) 39。這是放置驗(yàn)證代碼的地方 39。當(dāng)下面的動(dòng)作發(fā)生時(shí),調(diào)用這個(gè)事件 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:(1)登陸鍵面:(2)基本菜單(3)修改密碼(4) 基本信息:(5)五:實(shí)驗(yàn)總結(jié)1. 實(shí)驗(yàn)中遇到的問(wèn)題:(1) 數(shù)據(jù)庫(kù)中存儲(chǔ)過(guò)程和觸發(fā)器的建立,因?yàn)樵谄綍r(shí)的學(xué)習(xí)中沒(méi)有太認(rèn)真的學(xué)習(xí)這一塊以至于在課程設(shè)計(jì)的過(guò)程中這塊存在者嚴(yán)重的問(wèn)題,但是在同學(xué)的幫助下及時(shí)的得到了解決(2) 數(shù)據(jù)庫(kù)與VB的連接訪問(wèn)2,心得:很多的題目看似簡(jiǎn)單,其實(shí)不然,一開(kāi)始看了只有這么幾個(gè)模塊是心里挺高興的,但是當(dāng)我真真正正地去把一個(gè)操作寫(xiě)成功時(shí),很多意想不到的情況發(fā)生了。有時(shí)候會(huì)為了一個(gè)操作不能調(diào)試成功而整個(gè)晚上都不能去安心做其他的作業(yè)。這也就要求我們要冷靜沉著、兢兢業(yè)業(yè)的去對(duì)待這件事,編程是一個(gè)很繁瑣的過(guò)程,要考慮到很多錯(cuò)誤轉(zhuǎn)移情況,在這期間會(huì)有很多以前不曾想過(guò)的問(wèn)題出現(xiàn),次數(shù)多了,不免會(huì)有覺(jué)得做不下去的感覺(jué)。但是我從中發(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è)相比與任何困難都值得的。經(jīng)過(guò)課程設(shè)計(jì)我覺(jué)得立足程序、回歸書(shū)本才是組重要的,在著手寫(xiě)程序時(shí)覺(jué)得思路一片混亂,無(wú)意間出現(xiàn)的問(wèn)題會(huì)不知道怎么解決。這時(shí),需要回歸書(shū)本,書(shū)本是前人總結(jié)的經(jīng)驗(yàn),幾乎所有情況都會(huì)有解決方法。只有把書(shū)本“吃透”,在遇到問(wèn)題是才會(huì)反應(yīng)快。