2021年廣東省汕頭市全國計(jì)算機(jī)等級考試Access數(shù)據(jù)庫程序設(shè)計(jì)真題(含答案)學(xué)校:________班級:________姓名:________考號:________

一、操作題(10題)1.在窗體上畫一個(gè)名稱為Text1的文本框和一個(gè)名稱為Command1的命令按鈕，然后編寫如下事件過程：

PrivateSubCommand1Click()

DimiAsInteger，nAsInteger

n=0

Fori=0To50

i=i+3

n=n+1

Ifi＞10ThenExitFor

Nexti

Text1.Text=Str(n)

EndSub

程序運(yùn)行后，單擊命令按鈕，在文本框中顯示的值是______。

2.在窗體中添加一個(gè)命令按鈕(名為Command1)和一個(gè)文本框(名為Text1)，然后編寫如下事件過程：

PrivateSubCommand1_Click()

DimxAsInteger,yAsInteger,zAsInteger

Callp1(a,b,c)

EndSub

Subp1(xAsInteger,yAsInteger,zAsInteger)

z=x+y

EndSub

打開窗體運(yùn)行后，單擊命令按鈕，文本框中顯示的內(nèi)容是()。

3.下列程序的輸出結(jié)果是()。

PrivateSubCommand1_Click()

Dimarr(1To10)

Fori=1To10

Nexti

ForEachiInarr()

Nexti

EndSub

4.空數(shù)據(jù)庫的建立：在D:\\Access目錄下建立一個(gè)ACCESS空數(shù)據(jù)庫文件“教學(xué)管理.mdb”。

5.在窗體中添加一個(gè)名稱為Commandl的命令按鈕，然后編寫如下程序：

PrivateSubo(ByVidpAslnteger)

p=p*2

EndSub

PrivateSubCommandl_C1kk()

DimiAsIntcger

Cails(1)

Ifi＞4Thcni=i＾2

MsgBoxi

EndSub

窗體打開運(yùn)行后，單擊命令按鈕，則消息框的輸出結(jié)果為______。

6.在窗體中添加一個(gè)命令按鈕，名稱為Command1，然后編寫如下程序：

PrivateSubCommand1_Click()

sum=0

Fori=1To100step2

Nexti

MsgBoxsum

EndSub

窗體打開運(yùn)行后，單擊命令按鈕，則消息框的輸出結(jié)果為()。

7.從外部導(dǎo)入數(shù)據(jù)創(chuàng)建表：有一個(gè)電子表格文件“學(xué)生電子表格.xls”，一個(gè)文本文件“學(xué)生.txt”,一個(gè)“教學(xué)管理_原始.mdb”access數(shù)據(jù)庫,以及一個(gè)空數(shù)據(jù)庫文件“教學(xué)管理.mdb”。操作要求如下：1、將電子表格“學(xué)生電子表格.xls”導(dǎo)入到“教學(xué)管理.mdb”中，表命名為“學(xué)生_從電子表格”。2、將文本文件“學(xué)生.txt”導(dǎo)入到“教學(xué)管理.mdb”中，表命名為“學(xué)生_從文本文件”。3、將“教學(xué)管理_原始.mdb”中的“學(xué)生”表導(dǎo)入到“教學(xué)管理.mdb”，表命名為“學(xué)生”。

8.已知數(shù)列的遞推公式如下：

f(n)＝1當(dāng)n＝0，1時(shí)

f(n)＝f(n-1)+f(n-2)當(dāng)n＞1時(shí)

則按照遞推公式可以得到數(shù)列：1，1，2，3，5，8，13，21，34，55，……?，F(xiàn)要求

從鍵盤輸入n值，輸出對應(yīng)項(xiàng)的值。例如當(dāng)輸入n為8時(shí)，應(yīng)該輸出34。程序如下，

請補(bǔ)充完整。

PrivateSubrunll_Click()

f0=1

f1=1

num=Val(InputBox("請輸入一個(gè)大于2的整數(shù)："))

Forn=2To【】

f2＝【】

f0=f1

f1=f2

Nextn

MsgBoxf2

EndSub

9.假定當(dāng)前日期為2002年8月25日，星期日，則執(zhí)行以下語句后，a、b、c和d的值分別是25、8、2002、【】。

a=day(now)

b=month(now)

C=year(now)

d=weekday(now)

10.用向?qū)ЫCCESS數(shù)據(jù)庫：利用數(shù)據(jù)庫模板向?qū)?在D:\\Access目錄下建立一個(gè)ACCESS數(shù)據(jù)庫“資產(chǎn)追蹤.mdb”。要求顯示樣式設(shè)置為"標(biāo)準(zhǔn)",報(bào)表打印樣式為"大膽"。數(shù)據(jù)庫標(biāo)題為“資產(chǎn)追蹤”。

二、基本操作題(10題)11.在考生文件夾中有一個(gè)“Acc1．mdb”數(shù)據(jù)庫。（1）將“基本情況”表以“基本情況．xls”格式導(dǎo)出，并保存到考生文件夾中。（2）在“部門”表中添加“部門簡介”字段，數(shù)據(jù)類型為“文本”，字段大小為“50”。（3）為“部門”表的“部門名稱”字段設(shè)置“無重復(fù)索引”。

12.在“Ace1．mdb”數(shù)據(jù)庫中有“部門”、“基本情況”和“職務(wù)”3張表。(1)將“基本情況”表中的“職務(wù)”字段移動(dòng)到“姓名”和“調(diào)入日期”字段之間。如圖1所示。

(2)將該表的行高設(shè)置為“14”，按照“調(diào)入日期”、“升序”排列。(3)將“職務(wù)”表和“基本情況”表的關(guān)系設(shè)置為“一對多”，“實(shí)施參照完整性”。(4)將“部門”表和“基本情況”表的關(guān)系設(shè)置為“一對多”，“實(shí)施參照完整性”。

13.

14.

15.

16.

17.

18.

19.

20.

三、1.選擇題(10題)21.檢索價(jià)格在30～60萬元的產(chǎn)品，可以設(shè)置條件為

A.>30Not<60

B.>30Or<60

C.>30And<60

D.>30Like<60

22.下列關(guān)于宏操作的敘述錯(cuò)誤的是

A.可以使用宏組來管理相關(guān)的一系列宏

B.使用宏可以啟動(dòng)其他應(yīng)用程序

C.所有宏操作都可以轉(zhuǎn)化為相應(yīng)的模塊代碼

D.宏的關(guān)系表達(dá)式中不能應(yīng)用窗體或報(bào)表的控件值

23.下面關(guān)于模塊的說法中正確的是：()。

A.模塊僅由VisualBASICforApplication聲明、語句作為一個(gè)單元進(jìn)行保存的集合，它們作為一個(gè)已命名的單元存儲在一起，對MicrosoftVisualBASIC代碼進(jìn)行組織

B.有兩種基本模塊，即一質(zhì)潛曜寄？椋硪恢質(zhì)搶嗄？?

C.在模塊中可以執(zhí)行宏，但是宏不能轉(zhuǎn)換為模塊

D.窗體模塊和報(bào)表模塊都是標(biāo)準(zhǔn)模塊

24.VBA程序的多條語句寫在一行中時(shí)其分隔符必須使用符號（）。

A.冒號(：)B.分號(；)C.逗號(,)D.單引號(’)

25.有如下語句：s=Int(100*Rnd)執(zhí)行完畢后，s的值是______。

A.[0,99]的隨機(jī)整數(shù)B.[0,100]的隨機(jī)整數(shù)C.[1,99]的隨機(jī)整數(shù)D.[1,100]的隨機(jī)整數(shù)

26.下列描述中正確的是()。

A.軟件工程只是解決軟件項(xiàng)目的管理問題

B.軟件工程主要解決軟件產(chǎn)品的生產(chǎn)率問題

C.軟件工程的主要思想是強(qiáng)調(diào)在軟件開發(fā)過程中應(yīng)用工程化原則

D.軟件工程只是解決軟件開發(fā)過程中的技術(shù)問題

27.在查詢設(shè)計(jì)視圖中

A.可以添加數(shù)據(jù)庫表，也可以添加查詢B.只能添加數(shù)據(jù)庫表C.只能添加查詢D.以上兩者都不能添加

28.假設(shè)數(shù)據(jù)中表A與表B建立了“一對多”關(guān)系，表B為“多”的一方，則下述說法中正確的是()。

A.表A中的一個(gè)記錄能與表B中的多個(gè)記錄匹配

B.表B中的一個(gè)記錄能與表A中的多個(gè)記錄匹配

C.表A中的一個(gè)字段能與表B中的多個(gè)字段匹配

D.表B中的一個(gè)字段能與表A中的多個(gè)字段匹配

29.運(yùn)行下面的程序段：Fork=5to10Step2k=k*2Nextk則循環(huán)次數(shù)為：______。

A.1B.2C.3D.4

30.用于實(shí)現(xiàn)報(bào)表的分組統(tǒng)計(jì)數(shù)據(jù)的操作區(qū)間的是

A.報(bào)表的主體區(qū)域B.頁面頁眉或頁面頁腳區(qū)域C.報(bào)表頁眉或報(bào)表頁腳區(qū)域D.組頁眉或組頁腳區(qū)域

四、綜合應(yīng)用題(10題)31.

32.

33.

34.

35.

36.

37.

38.

39.

40.

五、綜合操作題(2題)41.

42.

六、簡單應(yīng)用題(2題)43.

44.在“Acc2．mdb”數(shù)據(jù)庫中有“部門人員”、“部門信息”、“訂單”、“訂單明細(xì)”、“產(chǎn)品”和“工資”表。（1）以“產(chǎn)品”和“訂單”表為數(shù)據(jù)源，創(chuàng)建分組統(tǒng)計(jì)查詢“查詢1”，統(tǒng)計(jì)每種產(chǎn)品的訂單數(shù)。結(jié)果顯示“產(chǎn)品名稱”和“訂單數(shù)”字段，訂單數(shù)一訂單ID之Count。（2）以“部門人員”和“訂單”表為數(shù)據(jù)源，創(chuàng)建查詢“查詢2”，查詢“田佳西”經(jīng)手的訂單信息。結(jié)果顯示姓名和訂單ID。

參考答案

1.33解析：本題考查循環(huán)的知識。Exit語句用于中途退出循環(huán)，所以帶有Exit語句的循環(huán)結(jié)束后，一定要判斷清楚到底是因?yàn)椴粷M足循環(huán)條件而退出循環(huán)的，還是由于執(zhí)行到了Exit語句而退出循環(huán)的。本題中不等i循環(huán)到50就會因?yàn)闈M足If語句的條件從而執(zhí)行到ExitFor語句退出循環(huán)，注意到每次循環(huán)時(shí)除了要執(zhí)行i=i+3以外，在本次循環(huán)結(jié)束后還要加上步長1，經(jīng)過計(jì)算在第3次循環(huán)的時(shí)候由于i的值為11而滿足了If語句的條件，執(zhí)行ExitFor后退出循環(huán)，此時(shí)的n值為3。

2.1515解析：本題考查VBA程序中過程調(diào)用的知識。由于VBA中，默認(rèn)情況下，參數(shù)是按地址傳遞(ByRef)，對形參的改變會影響到實(shí)參。本題中z的值等于a+b，這個(gè)z值會返回給實(shí)參c，所以文本框中顯示的內(nèi)容為15。

3.1515解析：本題考查VBA中ForEach…Next循環(huán)的知識。ForEach…Next循環(huán)是一種特殊的循環(huán)，這種循環(huán)只能用在數(shù)組中，用來遍歷數(shù)組中的每一個(gè)元素。本題中的第一個(gè)循環(huán)為數(shù)組的每個(gè)元素賦值，而第二個(gè)循環(huán)中更改了這些值。綜合兩個(gè)循環(huán)來看，實(shí)際上最后arr(i)的值為2*i+1。

4.1、現(xiàn)在D盤下建立一個(gè)空的文件夾，命名為“ACCESS”文件夾。2、打開ACCESS文件夾，單擊鼠標(biāo)的右鍵，找到新建，單擊數(shù)據(jù)庫的程序的相關(guān)圖標(biāo)。3、文件夾下就會出現(xiàn)數(shù)據(jù)庫的圖標(biāo)文件，重命名數(shù)據(jù)庫的名稱即可。注：在命名數(shù)據(jù)庫文件的同時(shí)不允許輸入文件名的擴(kuò)展名。若沒有顯示擴(kuò)展名，則從“工具”打開找到“文件夾選項(xiàng)”，單擊“文件夾選項(xiàng)”，找到隱藏?cái)U(kuò)展名的那一項(xiàng)，把前面的小框去掉，并應(yīng)用即可。

5.36

6.25002500解析：本題考查循環(huán)的知識。這個(gè)問題比較簡單，實(shí)際上就是求1到100之間的奇數(shù)和，最終結(jié)果為2500。

7.第一題：1、打開找到所需要操作的數(shù)據(jù)資料。2、打開“教學(xué)管理”數(shù)據(jù)庫，在數(shù)據(jù)庫對象“表”單擊鼠標(biāo)“右鍵”，找到“導(dǎo)入”并單擊，在彈出的窗口中選擇相關(guān)路徑(一定找到“學(xué)生電子表格”的位置)，尋找所需要的文件所在的文件夾下時(shí)，如果沒有顯示“學(xué)生電子表格”，則單擊“文件類型”的右面的下拉按鈕——三角形。3、在文件類型中選擇“MicrosoftExcel”，出現(xiàn)“學(xué)生電子表格”后，選中“學(xué)生電子表格”，再單擊右下角的“導(dǎo)入”，單擊“下一步”，再單擊“下一步”，若“第一行包含列標(biāo)題”前面的方框打上小勾，則直接單擊“下一步”;若“第一行包含列標(biāo)題”前面的方框沒有打上小勾，則打上小勾后直接單擊“下一步”。再單擊“下一步”，再單擊“下一步”，選擇“我自己選擇主鍵”，再單擊“下一步”，命名為“學(xué)生_從電子表格”，單擊“完成”即可。第二題：1、打開找到所需要操作的數(shù)據(jù)資料。2、打開“教學(xué)管理”數(shù)據(jù)庫，在數(shù)據(jù)庫對象“表”單擊鼠標(biāo)“右鍵”，找到“導(dǎo)入”并單擊，在彈出的窗口中選擇相關(guān)路徑(一定找到“學(xué)生”的位置)，尋找所需要的文件所在的文件夾下時(shí)，如果沒有顯示“學(xué)生.txt”，則單擊“文件類型”的右面的下拉按鈕——三角形。3、在文件類型中選擇“文本文件”，出現(xiàn)“學(xué)生.txt”后，選中“學(xué)生.txt”，再單擊右下角的“導(dǎo)入”，單擊“下一步”，再單擊“下一步”，若“第一行包含列標(biāo)題”前面的方框打上小勾，則直接單擊“下一步”;若“第一行包含列標(biāo)題”前面的方框沒有打上小勾，則打上小勾后直接單擊“下一步”。再單擊“下一步”，再單擊“下一步”，選擇“我自己選擇主鍵”，再單擊“下一步”，命名為“學(xué)生_從文本文件”，單擊“完成”即可。第三題：1、打開找到所需要操作的數(shù)據(jù)資料。2、打開“教學(xué)管理”數(shù)據(jù)庫，在數(shù)據(jù)庫對象“表”單擊鼠標(biāo)“右鍵”，找到“導(dǎo)入”并單擊，在彈出的窗口中選擇相關(guān)路徑(一定找到“教學(xué)管理_原始”的位置)，尋找所需要的文件所在的文件夾下時(shí)，如果沒有顯示“教學(xué)管理_原始”，則單擊“文件類型”的右面的下拉按鈕——三角形。3、在文件類型中選擇“MicrosoftofficeAccess”，出現(xiàn)“教學(xué)管理_原始”后，選中“教學(xué)管理_原始”，再單擊右下角的“導(dǎo)入”，單擊對象“表”中的“學(xué)生”表，然后確定即可。

8.numf0+f1num\r\nf0+f1解析：程序首先需要接受用戶輸入的值，根據(jù)程序代碼可以判斷，使用變量num來存放用戶輸入的值，使用循環(huán)實(shí)現(xiàn)遞推，根據(jù)題面“要求從鍵盤輸入n值，輸出對應(yīng)項(xiàng)的值”，可知循環(huán)從2開始，到用戶輸入的值結(jié)束，也就是“Forn=2Tonum”。根據(jù)題面給出的公式“當(dāng)n＞1時(shí)，f(n)＝f(n-1)+f(n-2)”，可知第n項(xiàng)的值總等于它前兩項(xiàng)(即第n-2項(xiàng)與第n-1項(xiàng))之和，在程序For循環(huán)中，總用f2表示第n項(xiàng)，f0表示第n-2項(xiàng)，f1表示第n-1項(xiàng)，所以f2=f0+f1。

9.11解析：Day(date)，必要的date參數(shù)，可以是任何能夠表示日期的Variant、數(shù)值表達(dá)式、字符串表達(dá)式或它們的組合。如果date包含Null，則返回Null。

weekday(date)返回一個(gè)Variant(Integer)，包含一個(gè)控?cái)?shù)，代表某個(gè)日期是星期幾。

語法：

Weekday(daie),[firstdayofweek])

Firstdayofweek指定一星期第一天的常數(shù)。如果未予指定，則以vbSunday為缺省值，即星期日為1，則星期六為7。

10.1、打開剛剛建立的“教學(xué)管理”數(shù)據(jù)庫，單擊“文件—>新建”，在彈出的窗口右面，找到“本機(jī)上的模板…”并單擊。2、在彈出的模板窗口上選擇“數(shù)據(jù)庫”，找到“資產(chǎn)追蹤”，選中，并單擊“確定”。3、選擇保存數(shù)據(jù)庫的路徑D:\\\\ACCESS，并命文件名為“資產(chǎn)追蹤”，單擊“創(chuàng)建”。4、“下一步→下一步”在數(shù)據(jù)庫向?qū)Ю锩孢x擇“標(biāo)準(zhǔn)”，“下一步→大膽”?！跋乱徊健乱徊健保瑔螕簟巴瓿伞奔纯?。

11.(1)在“Acc1．mdb”數(shù)據(jù)庫窗口中單擊“表”對象。右鍵單擊“基本情況”表，選擇“導(dǎo)出”，在彈出的對話框中選擇“保存類型”為“MicrosoftExcel”，設(shè)置文件名稱為“基本情況”，設(shè)置“保存位置”為考生文件夾對應(yīng)的路徑，單擊對話椹中的“保存”按鈕。

(2)在“Acc1．mdb”數(shù)據(jù)庫窗口中“表”對象下，右鍵單擊“部門”表，選擇“設(shè)計(jì)視圖”。添加“部門簡介”字段，數(shù)據(jù)類型為“文本”，字段大小為“50”。單擊工具欄中的“保存”按鈕，關(guān)閉表設(shè)計(jì)視圖。

(3)在“Acc1．mdb”數(shù)據(jù)庫窗口中的“表”對象下，右鍵單擊“部門”表，選擇“設(shè)計(jì)視圖”。選中“部門名稱”字段，在字段屬性的索引行選擇“有(無重復(fù))”。單擊工具欄中的“保存”按鈕，關(guān)閉表設(shè)計(jì)視圖。

12.(1)在“Accl．mdb”數(shù)據(jù)庫窗口中單擊“表”對象，選擇“基本情況”表，單擊“設(shè)計(jì)”按鈕，打開“基本情況”表的設(shè)計(jì)視圖，選中“職務(wù)”字段，將其拖到“姓名”和“調(diào)入日期”字段之間，保存。(2)執(zhí)行“格式”—“行高”命令，輸入“14”。選擇“調(diào)入日期”列，單擊右鍵，選擇“升序”選項(xiàng)。(3)選擇“工具”—“關(guān)系”，單擊“顯示表”按鈕，添加“職務(wù)”表和“基本情況”表，拖動(dòng)“職務(wù)”表的“職務(wù)”字段到“基本情況”表的“職務(wù)”字段上，在“編輯關(guān)系”對話框中選擇“實(shí)施參照完整性”，選擇關(guān)系類型為“一對多”。(4)執(zhí)行“工具”—“關(guān)系”命令，單擊“顯示表”按鈕，添加“部門”表和“基本情況”表，拖動(dòng)“部門”表的“部門”字段到“基本情況”表的“部門”字段上，在“編輯關(guān)系”對話框中選擇“實(shí)施參照完整性”，選擇關(guān)系類型為“一對多”。

13.

14.

15.

16.

17.

18.

19.

20.

21.C解析：查詢'價(jià)格在30～60萬元'要使用And語句來表示'與'。

22.D解析：宏是一系列操作的集合，用戶可以使用宏組來管理相關(guān)的一系列宏，使用宏也可以啟動(dòng)其他應(yīng)用程序，所有宏操作都可以轉(zhuǎn)化為相應(yīng)的模塊代碼，宏的關(guān)系表達(dá)式中也可以應(yīng)用窗體或報(bào)表的控件值。

23.A

24.AA．【解析】本題考查VBA語句書寫的知識。在VBA中每條語句寫在獨(dú)立的一行上，若將多條語句寫在一行中，需要使用“：”將其分隔開來。

25.A解析：隨機(jī)數(shù)函數(shù)Rnd(＜數(shù)值表達(dá)式＞)用于產(chǎn)生一個(gè)小于1但大于或等于0的值，該數(shù)值為單精度類型。Int(數(shù)值表達(dá)式)是對表達(dá)式進(jìn)行取整操作，它并不做“四舍五入”運(yùn)算，只是取出“數(shù)值表達(dá)式”的整數(shù)部分。

26.C解析：軟件工程是指將工程化的思想應(yīng)用于軟件的開發(fā)、應(yīng)用和維護(hù)的過程，包括軟件開發(fā)技術(shù)和軟件工程管理。

27.A解析：注意在查詢設(shè)計(jì)視圖中既可以添加數(shù)據(jù)庫表也可以添加查詢。

28.A解析：本題考查表之間的關(guān)系。Access中表與表之間的關(guān)系可以分為一對一關(guān)系、一對多關(guān)系和多對多關(guān)系三種。假設(shè)有表A和表B兩個(gè)表，如果表A中的一