黄色在线观看视频-黄色在线免费看-黄色在线视频免费-黄色在线视频免费看-免费啪啪网-免费啪啪网站

首頁 考試吧論壇 Exam8視線 考試商城 網絡課程 模擬考試 考友錄 實用文檔 求職招聘 論文下載
2011中考 | 2011高考 | 2012考研 | 考研培訓 | 在職研 | 自學考試 | 成人高考 | 法律碩士 | MBA考試
MPA考試 | 中科院
四六級 | 職稱英語 | 商務英語 | 公共英語 | 托福 | 雅思 | 專四專八 | 口譯筆譯 | 博思 | GRE GMAT
新概念英語 | 成人英語三級 | 申碩英語 | 攻碩英語 | 職稱日語 | 日語學習 | 法語 | 德語 | 韓語
計算機等級考試 | 軟件水平考試 | 職稱計算機 | 微軟認證 | 思科認證 | Oracle認證 | Linux認證
華為認證 | Java認證
公務員 | 報關員 | 銀行從業資格 | 證券從業資格 | 期貨從業資格 | 司法考試 | 法律顧問 | 導游資格
報檢員 | 教師資格 | 社會工作者 | 外銷員 | 國際商務師 | 跟單員 | 單證員 | 物流師 | 價格鑒證師
人力資源 | 管理咨詢師考試 | 秘書資格 | 心理咨詢師考試 | 出版專業資格 | 廣告師職業水平
駕駛員 | 網絡編輯
衛生資格 | 執業醫師 | 執業藥師 | 執業護士
會計從業資格考試會計證) | 經濟師 | 會計職稱 | 注冊會計師 | 審計師 | 注冊稅務師
注冊資產評估師 | 高級會計師 | ACCA | 統計師 | 精算師 | 理財規劃師 | 國際內審師
一級建造師 | 二級建造師 | 造價工程師 | 造價員 | 咨詢工程師 | 監理工程師 | 安全工程師
質量工程師 | 物業管理師 | 招標師 | 結構工程師 | 建筑師 | 房地產估價師 | 土地估價師 | 巖土師
設備監理師 | 房地產經紀人 | 投資項目管理師 | 土地登記代理人 | 環境影響評價師 | 環保工程師
城市規劃師 | 公路監理師 | 公路造價師 | 安全評價師 | 電氣工程師 | 注冊測繪師 | 注冊計量師
繽紛校園 | 實用文檔 | 英語學習 | 作文大全 | 求職招聘 | 論文下載 | 訪談 | 游戲
您現在的位置: 考試吧(Exam8.com) > 計算機等級考試 > 計算機二級 > VB > 模擬試題 > 正文

2007年9月計算機二級VB模擬試題(3)及答案



二、填空題:共15空,每空2分,共30分。

(1) 棧和隊列通常采用的存儲結構是 【1】 。
(2) 在程序設計階段應該采取 【2】 和逐步求精的方法,把一個模塊的功能逐步分解,細化為一系列具體的步驟,進而用某種程序設計語言寫成程序。
(3) 軟件結構是以 【3】 為基礎而組成的一種控制層次結構。
(4) 數據庫系統階段的數據具有較高獨立性,數據獨立性包括物理獨立性和 【4】 兩個含義。
(5) 數據庫保護分為:安全性控制 、 【5】 、并發性控制和數據的恢復。
(6) 為了選擇多個控件,可以按住 【6】 鍵,然后單擊每個控件。
(7) 浮點數由3部分組成,即符號、 【7】 和尾數。
(8) 下面程序運行后,單擊命令按鈕,輸出的結果是 【8】
Private Sub Command1_Click()
   Dim a%(1 To 4) , b%(2 To 6) , i%, str1#, str2#
   For i=1 To 4
      a(i) =i
   Next i
   For i=2 To 6
      b(i) =i
   Next i
   str1=YAG(A)
   str2=YAG(b)
   Print "str1="; str1; "str2="; str2
End Sub
Function YAG(a() As Integer)
   Dim t#, i%
   t=1
   For i=LBound(A) To UBound(A)
     t=t * a(i)
   Next i
   YAG=t
End Function
(9) 下面程序的作用是用InputBox函數輸入一個整數,然后判斷能否同時被2,5和7整除,如果能則輸出該數及平方值。請填空。
Private Sub Command1_Click()
   Dim numX As Integer
   numX=Val(InputBox("請輸入一個整數") )
   If 【9】 Then
      Form1.Print 【10】
   End If
End Sub
(10) 下列程序計算Sn的值。Sn=a+aa+aaa+…+aaa…a,其中最后一項為n個。
例如: a=5 , n=4時,則Sn=5+55+555+5555。請在空白處填入適當的內容,將程序補充完整。
Private Sub Command1_Click()
   Dim a As Integer, n As Integer, Cout As Integer
   Dim Sn As Long, Tn As Long
   Cout=1
   Sn=0
   Tn=0
   a=InputBox("請輸入a的值:")
    【11】
   Do
      Tn=Tn * 10 + a
      Sn=Sn + Tn
      Cout=Cout + 1
     【12】
    Debug.Print a, n, Sn
End Sub
(11) 在窗體上有一個"背景色變換"按鈕和一個"結束"按鈕。單擊"背景色變換"按鈕,背景色變為紅色;再單擊,背景色變為綠色;再單擊,背景色變為藍色;再單擊背景色變為紅色……如此循環。單擊"結束" 按鈕,程序運行結束。請填空。
Private Sub cmdChange_Click()
   If Mark=0 Then
       【13】
      Mark=1
      ElseIf 【14】 Then
      Form1.BackColor=vbGreen
      Mark=2
      ElseIf Mark=2 Then
      Form1.BackColor=vbBlue
       【15】
   End If
End Sub
Private Sub cmdExit_Click()
   End
End Sub

填空題參考答案:

1、鏈式存儲或順序存儲
2、自頂而下
3、模塊
4、邏輯獨立性
5、完整性控制
6、Shift或Ctrl
7、指數
8、strX=24  str2=720
9、numX Mod 2 = 0 And numX Mod 5 = 0 And numX Mod 7 = 0;numX, numX ^ 2
10、(n=InputBox("請輸入n的值!")),(Loop While Cout<=n或Loop)
11、Form1.BackColor = vbRed,Mark = 1,Mark = 0

希望與更多計算機等級考試的網友交流,請進入計算機等級考試論壇

更多信息請訪問:考試吧計算機等級考試欄目

上一頁  1 2 3 4 5 6 7  下一頁
文章搜索
版權聲明:如果計算機等級考試網所轉載內容不慎侵犯了您的權益,請與我們聯系800@exam8.com,我們將會及時處理。如轉載本計算機等級考試網內容,請注明出處。
主站蜘蛛池模板: 国产一级毛片午夜福 | 天天干在线影院 | 99热精品国产麻豆 | 在线看片黄 | 夜夜穞狠狠穞 | 亚洲va欧美va国产综合久久 | 国产小视频免费 | 天天狠狠色噜噜 | 亚洲欧美日韩精品香蕉 | 国产精品尹人在线观看免费 | 日本不卡三级 | 殴美在线| a级片免费网站 | 男人下面疯狂进女人下部视频 | 最新日韩在线观看 | 欧美午夜免费观看福利片 | 国内精品免费视频精选在线观看 | 午夜高清在线 | a视频在线 | 欧美一区二区三区四区视频 | 理伦片免费理论片 | 日韩精品福利视频一区二区三区 | 亚洲视频中文 | 国产精品美女视视频专区 | 天天爱夜夜操 | 亚洲成人高清 | 国产在线视频国产永久视频 | 91亚洲精品自在在线观看 | 天堂伊人| vktk视频| 欧美一级性视频 | 日韩高清在线免费看 | 午夜影湿院| 国产精品日本一区二区不卡视频 | 不卡视频国产 | 日韩免费高清一级毛片在线 | 免费成人小视频 | 国产精选在线播放 | 丁香激情综合网 | 永久福利盒子日韩日韩免费看 | 成年视频网站免费观看 |