? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?前言
? ? ? ?從事ACCESS數(shù)據(jù)庫的設(shè)計(jì)到今年為止已是20年了,其中設(shè)計(jì)過很多在此環(huán)境下的數(shù)據(jù)庫,根據(jù)項(xiàng)目不同裸弦,設(shè)計(jì)也就不同掌腰,但總的慨括來說,也就是表焕参、查詢轻纪、窗體、報(bào)表叠纷、宏刻帚、模塊這些了。10年前曾經(jīng)被某論壇邀請(qǐng)去為某版塊做指導(dǎo)涩嚣,給初學(xué)者進(jìn)行指導(dǎo)和修改ACCESS數(shù)據(jù)庫的設(shè)計(jì)崇众。
? ? ? ? 如今已近甲子之年,如果不把所學(xué)所用的告訴大家航厚,哪一天西去了顷歌,或者全部健忘了,有負(fù)一生所學(xué)幔睬,心有不甘眯漩。其實(shí)很多的初學(xué)者,接觸ACCESS時(shí)麻顶,可能走進(jìn)了一個(gè)誤區(qū)赦抖,老想者從最原始的VBA編碼開始學(xué)習(xí),卻不知要走這樣的一條路辅肾,那是要花大量的精力队萤,大量的時(shí)間,去從頭開始矫钓,這是得不償失的浮禾。我曾經(jīng)用一個(gè)星期,每天一個(gè)小時(shí)在網(wǎng)上給初學(xué)者講數(shù)據(jù)庫的設(shè)計(jì)份汗,聽者都會(huì)自己設(shè)計(jì)出來適合自己工作的數(shù)據(jù)庫了盈电。
? ? ? ?在當(dāng)今信息量很多、很大的網(wǎng)絡(luò)時(shí)代杯活,很多知識(shí)匆帚,很多手法、很多理念旁钧,我們都是可以拿來為我所用吸重。ACCESS學(xué)習(xí)應(yīng)該從拼裝(組裝)開始互拾,就象搭積木一樣,你只要把積木拼裝起來嚎幸,拼裝起適合自己認(rèn)為的形狀就已成功了颜矿。ACCESS數(shù)據(jù)庫設(shè)計(jì)的理念與搭積木一樣,首先去借用別人設(shè)計(jì)的數(shù)據(jù)庫中的一些功能嫉晶,直接為我所用骑疆,久而久之,就會(huì)知道自己要設(shè)計(jì)的功能應(yīng)怎樣才能實(shí)現(xiàn)替废,然后把某編碼稍改一下箍铭,就能成為另一種新的功能。
? ? ? ? 隨著時(shí)間的堆棧椎镣、知識(shí)的積累诈火、數(shù)據(jù)庫設(shè)計(jì)理念的更新、我相信用不了多久状答,你就會(huì)是一個(gè)ACCESS設(shè)計(jì)冷守、操作、理念快手及專業(yè)人士了惊科。
???????? ACCESS數(shù)據(jù)庫的應(yīng)用在20年的設(shè)計(jì)拍摇、學(xué)習(xí)生涯中,個(gè)人認(rèn)為沒有它不能實(shí)現(xiàn)的功能译断,它的功能太過強(qiáng)大授翻、唯一缺的就是你的理念,你的創(chuàng)新孙咪、你的思維方式堪唐,還有就是你想不到的方法,只要你想到的翎蹈,它就會(huì)一定能實(shí)現(xiàn)淮菠。
? ? ? ? ?以上綜述,說明了ACCESS易學(xué)荤堪、易懂合陵、易設(shè)計(jì)的性質(zhì),下面就不再講表的設(shè)計(jì)澄阳、查詢的設(shè)計(jì)了拥知,而是從窗體設(shè)計(jì)講起,因?yàn)榇绑w的設(shè)計(jì)才是重中之重碎赢,數(shù)據(jù)庫的功能一切都在窗體上操作低剔。
一、窗體消息彈出設(shè)計(jì),消息的彈出不外乎下面幾種:
1襟齿、窗體按鈕的設(shè)計(jì):
點(diǎn)擊之后姻锁,就會(huì)出現(xiàn)一個(gè)設(shè)計(jì)窗體
然后在窗體添加一個(gè)按鈕。按圖調(diào)出設(shè)計(jì)選項(xiàng)卡猜欺,然后按箭頭點(diǎn)擊按鈕控件
然后把控件拖到窗體空白處
? ? ? ? ?此時(shí)位隶,就會(huì)有一個(gè)對(duì)話框彈出,我們點(diǎn)取消开皿,按自己意愿來設(shè)計(jì)消息涧黄,點(diǎn)下一步就是按ACCESS的功能來給按鈕添加一些功能。當(dāng)按鈕創(chuàng)建后副瀑,先選定按鈕弓熏,然后點(diǎn)擊按鈕屬性恋谭,在屬性設(shè)計(jì)中和直接單擊右鍵都可以找到糠睡。如下2張圖所示:(圖一)
(圖二)
? ? ? 點(diǎn)擊屬性后,就可以調(diào)出屬性表疚颊,進(jìn)行按鈕觸發(fā)事件編碼的設(shè)計(jì)了
給按鈕改名狈孔,改成“確定”名稱。
給按鈕添加觸發(fā)事件代碼:
這樣就可以進(jìn)入事件代碼(編碼)窗口中進(jìn)行事件設(shè)計(jì)了
Option Compare Database
Private Sub 確定_Click()
MsgBox "授權(quán)過期!"?? ‘消息文字的提醒
Exit Sub?‘消息彈出后按確定鍵退出
End Sub
很多人都把“Exit Sub”給省掉了材义,這是一種不好的方法和習(xí)慣均抽。
MsgBox "授權(quán)過期!"是一種最直接,也最簡(jiǎn)單的消息設(shè)計(jì)類型其掂,你只要在雙引號(hào)之中隨意添加自己想要的提醒文字油挥。
完成后退出并保存剛才寫入的事件,再保存設(shè)計(jì)的窗體款熬,取個(gè)名字“消息設(shè)計(jì)學(xué)習(xí)窗體”深寥。
如果我們把窗體設(shè)計(jì)成一種彈出的方式,那么就在窗體屬性中把“否”改寫“是”贤牛,然后保存惋鹅。
運(yùn)行窗體上的按鈕,效果如下圖
今天就寫到這里了殉簸,但愿有緣人能看到闰集,明天接著寫消息提示的種類及應(yīng)用。