word版可編輯-月全國計算機等級考試二級access數據庫程序設計筆試真題精心整理-資料下載頁
2025-03-24 05:14本頁面
【正文】 =【11_______】。Option Compare DatabaseDim x As IntegerPrivate Sub Form_Load()x=3End SubPrivate Sub Command11_Click()Static a As IntegerDim b As Integerb=x^2fun1 x,bfun1 x,bMsgBox x=＆xEnd SubSub fun1(ByRef y As Integer,ByVal z As Integer)y=y+zz=yzEnd Sub答案：【11】2112. “秒表”窗體中有兩個按鈕（“開始/停止”按鈕bOK,“暫停/繼續(xù)”按鈕bPus）；一個顯示計時的標簽lNum；窗體的“計時器間隔”設為100,。要求：打開窗體如圖1所示；第一次單擊“開始/停止”按鈕，從0開始滾動顯示計時（見圖2）；10秒時單擊“暫停/繼續(xù)”按鈕，顯示暫停（見圖3），但計時還在繼續(xù)；若20秒后再次單擊“暫停/繼續(xù)”按鈕，計時會從30秒開始繼續(xù)滾動顯示；第二次單擊“開始/停止”按鈕，計時停止，顯示最終時間（見圖4）。若再次單擊“開始/停止”按鈕可重新從0開始計時。相關的事件程序如下。請在空白處填入適當的語句，使程序可以完成指定的功能。Option Compare DatabaseDim flag,pause As BooleanPrivate Sub bOK_Click()flag=【12_______】Me!=TrueMe!=flagEnd SubPrivate Sub bPus_Click()pause=Not pauseMe!=Not Me!End SubPrivate Sub Form_Open(Cancel As Integer)flag=Falsepause=FalseMe!=TrueMe!=FalseEnd SubPrivate Sub Form_Timer()Static count As SingleIf flag=True ThenIf pause=False ThenMe!=Round(count,1)End Ifcount=【13_______】Elsecount=0End IfEnd Sub答案：【12】Not flag【13】count+【解析】。13. 數據庫中有“學生成績表”，包括“姓名”、“平時成績”、“考試成績”和“期末總評”等字段，現要根據“平時成績”和“考試成績”對學生進行“期末總評”。規(guī)定：“平時成績”加“考試成績”大于等于85分，則期末總評為“優(yōu)”，“平時成績”加“考試成績”小于60分，則期末總評為“不及格”，其他情況期末總評為“合格”。下面的程序按照上述要求計算每名學生的期末總評。請在空白處填入適當的語句,使程序可以完成指定的功能。Private Sub Command0_Click()Dim db As Dim rs As Dim pscj,kscj,qmzp As Dim count As IntegerSet db=CurrentDb()Set rs=d(學生成績表）Set pscj=(平時成績)Set kscj=(考試成績)Set qmzp=(期末總評)count=0Do While Not 【14_______】If pscj+kscj＞=85 Thenqmzp=優(yōu)ElseIf pscj+kscj＜60 Thenqmzp=不及格Elseqmzp=合格End Ifcount=count+1【15_______】LoopdSet rs=NothingSet db=NothingMsgBox 學生人數：＆countEnd Sub答案：【14】【解析】表示設置為編輯狀態(tài)。
醫(yī)療健康相關推薦
鄂ICP備17016276號-1