2013年9月計(jì)算機(jī)等考二級(jí)Access模擬試題及答案(3)

　　二、填空題

　　請(qǐng)將每一個(gè)空的正確答案寫在答題卡序號(hào)的橫線上，答在試卷上不給分。

　　(1)算法的【1】是指執(zhí)行這個(gè)算法所需要的內(nèi)存空間。

　　(2)深度為 5的二叉樹最多有【2】個(gè)結(jié)點(diǎn)。

　　(3)二分法查找僅適用于這樣的表：表中的記錄必須【3】，其存儲(chǔ)結(jié)構(gòu)必須是順序存儲(chǔ)。

　　(4)測(cè)試的目的是暴露錯(cuò)誤，評(píng)價(jià)程序的可靠性;而【4】的目的是發(fā)現(xiàn)錯(cuò)誤的位置并改正錯(cuò)誤。

　　(5)數(shù)據(jù)管理技術(shù)發(fā)展過(guò)程經(jīng)過(guò)人工管理、文件系統(tǒng)和數(shù)據(jù)庫(kù)系統(tǒng)三個(gè)階段，其中數(shù)據(jù)獨(dú)立性最高的階段是【5】。

　　(6)操作查詢共有4種類型，分別是刪除查詢、　【6】　、追加查詢和生成表查詢。

　　(7)在Access中，要在查找條件中與任意一個(gè)數(shù)字字符匹配，可使用的通配符是　【7】　。

　　(8)用于執(zhí)行指定SQL語(yǔ)句的宏操作是　【8】　。

　　(9)在窗體中使用一個(gè)文本框(名為num1)接受輸入值，有一個(gè)命令按鈕run13，事件代碼如下：

　　Private Sub run13_Click()

　　If Me!num1 >= 60 Then

　　result = "及格"

　　ElseIf Me!num1 >= 70 Then

　　Result = "通過(guò)"

　　ElseIf Me!num1 >= 85 Then

　　Result = "合格"

　　End If

　　MsgBox result

　　End Sub

　　打開窗體后，若通過(guò)文本框輸入的值為85，單擊命令按鈕，輸出結(jié)果是　【9】　。

　　(10)運(yùn)行如下程序段：

　　x = 1

　　y = 1

　　z = 1

　　For j = 1 To 3

　　For k = 1 To 3

　　If j = 1 Then

　　x = x + y + z

　　ElseIf j = 2 Then

　　x = 2 * x + 2 * y + 2 * z

　　Else

　　x = 3 * x + 3 * y + 3 * z

　　End If

　　Next k

　　Next j

　　x的值應(yīng)是　【10】　。

　　(11)現(xiàn)有一個(gè)登錄窗體如下圖所示。打開窗體后輸入用戶名和密碼，登錄操作要求在20秒內(nèi)完成，如果在20秒內(nèi)沒(méi)有完成登錄操作，則倒計(jì)時(shí)達(dá)到0秒時(shí)自動(dòng)關(guān)閉登錄窗體，窗體的右上角是顯示倒計(jì)時(shí)的標(biāo)簽Itime。事件代碼如下，要求填空完成事件過(guò)程。

　　Option Compare Database

　　Dim flag As Boolean

　　Dim i As Integer

　　Private Sub Form_Load( )

　　flag =　【11】

　　Me.TimerInterval = 1000

　　i = 0

　　End Sub

　　Private Sub Form_Timer( )

　　If flag = True And i< 20 Then

　　Me!ITime.Caption = 20 - i

　　i =　【12】

　　Else

　　DoCmd.Close

　　End If

　　End Sub

　　Private Sub OK_Click( )

　　' 登錄程序略

　　' 如果用戶名和密碼輸入正確，則：falg=False

　　End Sub

　　(12)以下是一個(gè)競(jìng)賽評(píng)分程序，去掉一個(gè)最高分和一個(gè)最低分，計(jì)算平均分(設(shè)滿分為10分)。請(qǐng)?zhí)羁昭a(bǔ)充完整。

　　Private Sub Form_Click()

　　Dim Max As Integer, Min As Integer

　　Dim i As Integer, x As Integer, s As Integer

　　Dim p As Single

　　Max = 0

　　Min = 10

　　For i = 1 To 8

　　x = Val(InputBox("請(qǐng)輸入分?jǐn)?shù)："))

　　If 　【13】　Then Max = x

　　If 　【14】　Then Min = x

　　s = s + x

　　Next i

　　s = 　【15】

　　p = s / 6

　　MsgBox "最后得分：" & p

　　End Sub