一、選擇題

　　（1）下列關(guān)于棧敘述正確的是
　　A）棧頂元素最先能被刪除
　　B）棧頂元素最后才能被刪除
　　C）棧底元素永遠不能被刪除
　　D）以上三種說法都不對

　　（2）下列敘述中正確的是
　　A）有一個以上根結(jié)點的數(shù)據(jù)結(jié)構(gòu)不一定是非線性結(jié)構(gòu)
　　B）只有一個根結(jié)點的數(shù)據(jù)結(jié)構(gòu)不一定是線性結(jié)構(gòu)
　　C）循環(huán)鏈表是非線性結(jié)構(gòu)
　　D）雙向鏈表是非線性結(jié)構(gòu)

　　（3）某二叉樹共有7個結(jié)點，其中葉子結(jié)點只有1個，則該二叉樹的深度為（假設(shè)根結(jié)點在第1層）
　　A）3         
　　B）4         
　　C）6         
　　D）7

　　（4）在軟件開發(fā)中，需求分析階段產(chǎn)生的主要文檔是
　　A）軟件集成測試計劃        
　　B）軟件詳細設(shè)計說明書
　　C）用戶手冊                
　　D）軟件需求規(guī)格說明書

　　（5）結(jié)構(gòu)化程序所要求的基本結(jié)構(gòu)不包括
　　A）順序結(jié)構(gòu)                
　　B）GOTO跳轉(zhuǎn)
　　C）選擇（分支）結(jié)構(gòu)        
　　D）重復(fù)（循環(huán)）結(jié)構(gòu)

　　（6）下面描述中錯誤的是
　　A）系統(tǒng)總體結(jié)構(gòu)圖支持軟件系統(tǒng)的詳細設(shè)計
　　B）軟件設(shè)計是將軟件需求轉(zhuǎn)換為軟件表示的過程
　　C）數(shù)據(jù)結(jié)構(gòu)與數(shù)據(jù)庫設(shè)計是軟件設(shè)計的任務(wù)之一
　　D）PAD圖是軟件詳細設(shè)計的表示工具

　　（7）負責(zé)數(shù)據(jù)庫中查詢操作的數(shù)據(jù)庫語言是
　　A）數(shù)據(jù)定義語言
　　B）數(shù)據(jù)管理語言
　　C）數(shù)據(jù)操縱語言
　　D）數(shù)據(jù)控制語言

　　（8）一個教師可講授多門課程，一門課程可由多個教師講授。則實體教師和課程間的聯(lián)系是
　　A）1:1聯(lián)系   
　　B）1:m聯(lián)系
　　C）m:1聯(lián)系   
　　D）m:n聯(lián)系

　　（9）有三個關(guān)系R、S和T如下：

　　則由關(guān)系R和S得到關(guān)系T的操作是
　　A）自然連接  
　　B）交        
　　C）除         
　　D）并

　　（10）定義無符號整數(shù)類為UInt,下面可以作為類UInt實例化值的是
　　A）-369      
　　B）369       
　　C）0.369     
　　D）整數(shù)集合{1,2,3,4,5}
　　
　　（11）在學(xué)生表中要查找所有年齡大于30歲姓王的男同學(xué)，應(yīng)該采用的關(guān)系運算是
　　A）選擇                    
　　B）投影
　　C）聯(lián)接                    
　　D）自然聯(lián)接　

　　（12）下列可以建立索引的數(shù)據(jù)類型是
　　A）文本                    
　　B）超級鏈接
　　C）備注                    
　　D）OLE對象

　　（13）下列關(guān)于字段屬性的敘述中，正確的是
　　A）可對任意類型的字段設(shè)置“默認值”屬性
　　B）定義字段默認值的含義是該字段值不允許為空
　　C）只有“文本”型數(shù)據(jù)能夠使用“輸入掩碼向?qū)А?br />　　D）“有效性規(guī)則”屬性只允許定義一個條件表達式

　　（14）查詢“書名”字段中包含“等級考試”字樣的記錄，應(yīng)該使用的條件是
　　A）Like "等級考試"
　　B）Like "*等級考試。
　　C）Like "等級考試*"
　　D）Like "*等級考試*"

　　（15）在Access中對表進行“篩選”操作的結(jié)果是
　　A）從數(shù)據(jù)中挑選出滿足條件的記錄
　　B）從數(shù)據(jù)中挑選出滿足條件的記錄并生成一個新表
　　C）從數(shù)據(jù)中挑選出滿足條件的記錄并輸出到一個報表中
　　D）從數(shù)據(jù)中挑選出滿足條件的記錄并顯示在一個窗體中

　　（16）在學(xué)生表中使用“照片”字段存放相片，當使用向?qū)�為該表�?chuàng)建窗體時，照片字段使用的默認控件是
　　A）圖形                    
　　B）圖像
　　C）綁定對象框              
　　D）未綁定對象框

　　（17）下列表達式計算結(jié)果為日期類型的是
　　A）#2012-1-23#-#2011-2-3#  
　　B）year(#2011-2-3#)
　　C）DateValue("2011-2-3")   
　　D）Len("2011-2-3")

　　（18）若要將“產(chǎn)品”表中所有供貨商是“ABC”的產(chǎn)品單價下調(diào)50，則正確的SQL語句是
　　A）UPDATE 產(chǎn)品 SET 單價=50 WHERE 供貨商="ABC"
　　B）UPDATE 產(chǎn)品 SET 單價＝單價-50 WHERE 供貨商="ABC"
　　C）UPDATE FROM 產(chǎn)品 SET單價=50 WHERE 供貨商="ABC"
　　D）UPDATE FROM 產(chǎn)品 SET單價=單價-50 WHERE 供貨商="ABC"

　　（19）若查詢的設(shè)計如下，則查詢的功能是

　　A）設(shè)計尚未完成，無法進行統(tǒng)計
　　B）統(tǒng)計班級信息僅含Null（空）值的記錄個數(shù)
　　C）統(tǒng)計班級信息不包括Null（空）值的記錄個數(shù)
　　D）統(tǒng)計班級信息包括Null（空）值全部記錄個數(shù)

　　（20）在教師信息輸入窗體中,為職稱字段提供“教授”、“副教授”、“講師”等選項供用戶直接選擇，應(yīng)使用的控件是
　　A）標簽                    
　　B）復(fù)選框
　　C）文本框                  
　　D）組合框

　　（21）在報表中要顯示格式為“共N頁，第N頁”的頁碼,正確的頁碼格式設(shè)置是
　　A）="共"+Pages+"頁，第"+Page+"頁"
　　B）="共"+[Pages]+"頁，第"++"頁"
　　C）="共"&Pages&"頁，第"&Page&"頁"
　　D）="共"&[Pages]&"頁，第"&"頁"

　　（22）某窗體上有一個命令按鈕,要求單擊該按鈕后調(diào)用宏打開應(yīng)用程序Word，則設(shè)計該宏時應(yīng)選擇的宏命令是
　　A）RunApp       
　　B）RunCode
　　C）RunMacro     
　　D）RunCommand

　　（23）下列表達式中,能正確表示條件“x和y都是奇數(shù)”的是
　　A）x Mod 2=0 And y Mod 2=0
　　B）x Mod 2=0 Or y Mod 2=0
　　C）x Mod 2=1 And y Mod 2=1
　　D）x Mod 2=1 Or y Mod 2=1

　　（24）若在窗體設(shè)計過程中，命令按鈕Command0的事件屬性設(shè)置如下圖所示，則含義是

　　A）只能為"進入"事件和"單擊"事件編寫事件過程
　　B）不能為"進入"事件和"單擊"事件編寫事件過程
　　C）“進入”事件和“單擊”事件執(zhí)行的是同一事件過程
　　D）已經(jīng)為“進入”事件和“單擊”事件編寫了事件過程

　　（25）若窗體Frm1中有一個命令按鈕Cmd1，則窗體和命令按鈕的Click事件過程名分別為
　　A）Form_Click()      Command1_Click()
　　B）Frm1_Click()      Command1_Click()
　　C）Form_Click()      Cmd1_Click()
　　D) Frm1_Click()      Cmd1_Click()

　　（26）在VBA中，能自動檢查出來的錯誤是
　　A）語法錯誤   
　　B）邏輯錯誤
　　C）運行錯誤   
　　D）注釋錯誤

　　（27）下列給出的選項中，非法的變量名是
　　A）Sum        
　　B）Integer_2
　　C）Rem        
　　D）Form1

　　（28）如果在被調(diào)用的過程中改變了形參變量的值；但又不影響實參變量本身，這種參數(shù)傳遞方式稱為
　　A）按值傳遞   
　　B）按地址傳遞
　　C）ByRef傳遞  
　　D）按形參傳遞
　　
　　（29）表達式“B=INT(A+0.5)”的功能是
　　A）將變量A保留小數(shù)點后1位  
　　B）將變量A四舍五入取整
　　C）將變量A保留小數(shù)點后5位  
　　D）舍去變量A的小數(shù)部分
　　
　　（30）VBA語句“Dim NewArray(10) as Integer”的含義是
　　A）定義10個整型數(shù)構(gòu)成的數(shù)組NewArray
　　B）定義11個整型數(shù)構(gòu)成的數(shù)組NewArray
　　C）定義1個值為整型數(shù)的變量NewArray(10)
　　D）定義1個值為10的變量NewArray

　　（31）運行下列程序段，結(jié)果是
　　For m=10 to 1 step 0
　　k=k+3
　　Next m
　　A）形成死循環(huán)              
　　B）循環(huán)體不執(zhí)行即結(jié)束循環(huán)
　　C）出現(xiàn)語法錯誤            
　　D）循環(huán)體執(zhí)行一次后結(jié)束循環(huán)

　　（32）運行下列程序，結(jié)果是
　　Private Sub Command32_Click()
　　f0=1:f1=1:k=1
　　Do While k<=5
　　f=f0+f1
　　f0=f1
　　f1=f
　　k=k+1
　　Loop
　　MsgBox "f="&f
　　End Sub
　　A）f=5                     
　　B）f=7
　　C）f=8                     
　　D）f=13

　　（33）有如下事件程序，運行該程序后輸出結(jié)果是
　　Private Sub Command33_Click()
　　Dim x As Integer,y As Integer
　　x=1:y=0
　　Do Until y<=25
　　y=y+x*x
　　x=x+1
　　Loop
　　MsgBox "x="&x&",y="&y
　　End Sub
　　A）x=1,y=0                 
　　B） x=4,y=25
　　C）x=5,y=30                
　　D）輸出其他結(jié)果

　　（34）下列程序的功能是計算sum=1+(1+3)+(1+3+5)+……+(1+3+5+……+39)
　　Private Sub Command34_Click()
　　t=0
　　m=1
　　sum=0
　　Do
　　t=t+m
　　sum=sum+t
　　m=______
　　Loop While m<=39
　　MsgBox "Sum="&sum
　　End Sub
　　為保證程序正確完成上述功能，空白處應(yīng)填入的語句是
　　A）m+1                     
　　B）m+2
　　C）t+1                     
　　D）t+2

　　（35）下列程序的功能是返回當前窗體的記錄集
　　Sub GetRecNum()
　　Dim rs As Object
　　Set rs=______
　　MsgBox rs.RecordCount
　　End Sub
　　為保證程序輸出記錄集（窗體記錄源）的記錄數(shù)，空白處應(yīng)填入的語句是
　　A）Recordset               
　　B）Me.Recordset
　　C）RecordSource            
　　D）Me.RecordSource

　　二、填空題

　　（1）有序線性表能進行二分查找的前提是該線性表必須是 【1】 存儲的。

　　（2）一棵二叉樹的中序遍歷結(jié)果為DBEAFC，前序遍歷結(jié)果為ABDECF，則后序遍歷結(jié)果為 【2】 。

　　（3）對軟件設(shè)計的最小單位（模塊或程序單元）進行的測試通常稱為 【3】 測試。

　　（4）實體完整性約束要求關(guān)系數(shù)據(jù)庫中元組的 【4】 屬性值不能為空。

　　（5）在關(guān)系A(chǔ)(S,SN,D)和關(guān)系B(D,CN,NM)中，A的主關(guān)鍵字是S，B的主關(guān)鍵字是D，則稱 【5】 是關(guān)系A(chǔ)的外碼。

　　（6）在Access查詢的條件表達式中要表示任意單個字符，應(yīng)使用通配符 【6】 。

　　（7）在SELECT語句中，HAVING子句必須與 【7】 子句一起使用。

　　（8）若要在宏中打開某個數(shù)據(jù)表，應(yīng)使用的宏命令是 【8】 。

　　（9）在VBA中要將數(shù)值表達式的值轉(zhuǎn)換為字符串，應(yīng)使用函數(shù) 【9】 。

　　（10）運行下列程序，輸入如下兩行：

　　Hi,

　　I am here．

　　彈出的窗體中的顯示結(jié)果是 【10】 。

　　Private Sub Command11_Click()

　　Dim abc As String, sum As string

　　sum=""

　　Do

　　abc=InputBox("輸入abc")

　　If Right(abc,1)="." Then Exit Do

　　sum=sum+abc

　　Loop

　　MsgBox sum

　　End Sub

　　（11）運行下列程序，窗體中的顯示結(jié)果是：x= 【11】 。

　　Option Compare Database

　　Dim x As Integer

　　Private Sub Form_Load()

　　x=3

　　End Sub

　　Private Sub Command11_Click()

　　Static a As Integer

　　Dim b As Integer

　　b=x^2

　　fun1 x,b

　　fun1 x,b

　　MsgBox "x="&x

　　End Sub

　　Sub fun1(ByRef y As Integer,ByVal z As Integer）

　　y=y+z

　　z=y-z

　　End Sub

　　（12）“秒表”窗體中有兩個按鈕（“開始/停止”按鈕bOK,“暫停/繼續(xù)”按鈕bPus）；一個顯示計時的標簽1Num；窗體的“計時器間隔”設(shè)為100計時精度為0.1秒。

　　要求：打開窗體如圖1所示；第一次單擊“開始婷止”按鈕，從0開始滾動顯示計時（見圖2)；10秒時單擊“暫停/繼續(xù)”按鈕，顯示暫停（見圖3），但計時還在繼續(xù)；若20秒后再次單擊“暫停/繼續(xù)”按鈕，計時會從30秒開始繼續(xù)滾動顯示；第二次單擊“開始/停止”按鈕，計時停止，顯示最終時間（見圖4）。若再次單擊“開始/停止”按鈕可重新從0開始計時。

　　相關(guān)的事件程序如下。請在空白處填入適當?shù)恼Z句，使程序可以完成指定的功能。
　　Option Compare Database
　　Dim flag,pause As Boolean
　　Private Sub bOK Click()
　　flag= 【12】
　　Me!bOK.Enabled=True
　　Me!bPus.Enabled=flag
　　End Sub
　　Private Sub bPus_Click()
　　pause=Not pause
　　Me!bOK.Enabled=Not Me!bOK.Enabled
　　End Sub
　　Private Sub Form Open(Cancel As Integer)
　　flag=False
　　pause=False
　　Me!bOK.Enabled=True
　　Me!bPus.Enabled=False
　　End Sub
　　Private Sub Form Timer()
　　Static count As Single
　　If flag=True Then
　　If pause=False Then
　　Me!1Num.Caption=Round(count,1)
　　End If
　　count= 【13】
　　Else
　　count=0
　　End If
　　End Sub

　　（13）數(shù)據(jù)庫中有“學(xué)生成績表”，包括“姓名”、“平時成績”、“考試成績”和“期末總評”等字段。現(xiàn)要根據(jù)“平時成績”和“考試成績”對學(xué)生進行“期末總評”。規(guī)定：
　　“平時成績”加“考試成績”大于等于85分，則期末總評為“優(yōu)”，“平時成績”加“考試成績”小于60分，則期末總評為“不及格”，其他情況期末總評為“合格”。
　　下面的程序按照上述要求計算每名學(xué)生的期末總評。請在空白處填入適當?shù)恼Z句，使程序可以完成指定的功能。
　　Private Sub Command0_Click()
　　Dim db As DAO.Database
　　Dim rs As DAO.Recordset
　　Dim pscj,kscj,qmzp As DAO.Field
　　Dim count As Integer
　　Set db=CurrentDb()
　　Set rs=db.OpenRecordset("學(xué)生成績表")
　　Set pscj=rs.Fields("平時成績")
　　Set kscj=rs.Fields("考試成績")
　　Set qmzp=rs.Fields("期末總評")
　　count=0
　　Do While Not rs.EOF
　　【14】
　　If pscj+kscj>=85 Then
　　qmzp="優(yōu)"
　　ElseIf pscj+kscj<60 Then
　　qmzp="不及格"
　　Else
　　qmzp="合格"
　　End If
　　rs.Update
　　count=count+1
　　【15】
　　Loop
　　rs.Close
　　db.Close
　　Set rs=Nothing
　　Set db=Nothing
　　MsgBox "學(xué)生人數(shù)："&count
　　End Sub