首頁 - 網(wǎng)校 - 題庫 - 直播 - 雄鷹 - 團(tuán)購 - 書城 - 模考 - 論壇 - 導(dǎo)航 - 510 -
首頁考試吧網(wǎng)校題庫直播雄鷹510團(tuán)購書城模考論壇實(shí)用文檔作文大全寶寶起名
2014中考
法律碩士
2014高考
MBA考試
2014考研
MPA考試
在職研
中科院
考研培訓(xùn) 自學(xué)考試 成人高考
四 六 級
GRE考試
攻碩英語
零起點(diǎn)日語
職稱英語
口譯筆譯
申碩英語
零起點(diǎn)韓語
商務(wù)英語
日語等級
GMAT考試
公共英語
職稱日語
新概念英語
專四專八
博思考試
零起點(diǎn)英語
托?荚
托業(yè)考試
零起點(diǎn)法語
雅思考試
成人英語三級
零起點(diǎn)德語
等級考試
華為認(rèn)證
水平考試
Java認(rèn)證
職稱計(jì)算機(jī) 微軟認(rèn)證 思科認(rèn)證 Oracle認(rèn)證 Linux認(rèn)證
公 務(wù) 員
導(dǎo)游考試
物 流 師
出版資格
單 證 員
報(bào) 關(guān) 員
外 銷 員
價(jià)格鑒證
網(wǎng)絡(luò)編輯
駕 駛 員
報(bào)檢員
法律顧問
管理咨詢
企業(yè)培訓(xùn)
社會(huì)工作者
銀行從業(yè)
教師資格
營養(yǎng)師
保險(xiǎn)從業(yè)
普 通 話
證券從業(yè)
跟 單 員
秘書資格
電子商務(wù)
期貨考試
國際商務(wù)
心理咨詢
營 銷 師
司法考試
國際貨運(yùn)代理人
人力資源管理師
廣告師職業(yè)水平
衛(wèi)生資格 執(zhí)業(yè)醫(yī)師 執(zhí)業(yè)藥師 執(zhí)業(yè)護(hù)士
會(huì)計(jì)從業(yè)資格
基金從業(yè)資格
統(tǒng)計(jì)從業(yè)資格
經(jīng)濟(jì)師
精算師
統(tǒng)計(jì)師
會(huì)計(jì)職稱
法律顧問
ACCA考試
注冊會(huì)計(jì)師
資產(chǎn)評估師
高級經(jīng)濟(jì)師
審計(jì)師考試
高級會(huì)計(jì)師
注冊稅務(wù)師
國際內(nèi)審師
理財(cái)規(guī)劃師
美國注冊會(huì)計(jì)師
一級建造師
安全工程師
設(shè)備監(jiān)理師
公路監(jiān)理師
公路造價(jià)師
二級建造師
招標(biāo)師考試
物業(yè)管理師
電氣工程師
建筑師考試
造價(jià)工程師
注冊測繪師
質(zhì)量工程師
巖土工程師
注冊給排水
造價(jià)員考試
注冊計(jì)量師
環(huán)保工程師
化工工程師
暖通工程師
咨詢工程師
結(jié)構(gòu)工程師
城市規(guī)劃師
材料員考試
監(jiān)理工程師
房地產(chǎn)估價(jià)
土地估價(jià)師
安全評價(jià)師
房地產(chǎn)經(jīng)紀(jì)人
投資項(xiàng)目管理師
環(huán)境影響評價(jià)師
土地登記代理人
寶寶起名
繽紛校園
實(shí)用文檔
入黨申請
英語學(xué)習(xí)
思想?yún)R報(bào)
作文大全
工作總結(jié)
求職招聘 論文下載 直播課堂
您現(xiàn)在的位置: 考試吧 > 計(jì)算機(jī)等級考試 > 計(jì)算機(jī)二級考試 > VF > 模擬試題 > 正文

2014年3月計(jì)算機(jī)二級考試VF臨考預(yù)測試卷及答案8

“2014年3月計(jì)算機(jī)二級考試VF臨考預(yù)測試卷及答案”提供給各位考生沖刺備考,預(yù)祝大家取得好成績!
第 1 頁:單選題
第 5 頁:操作題
第 6 頁:參考答案

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

  素?cái)?shù)的判斷準(zhǔn)則就是看該數(shù)是否除了1及其本身以外別無其他約數(shù),若是則該數(shù)就是素?cái)?shù),否則就不是素?cái)?shù)。本題判斷素?cái)?shù)的標(biāo)準(zhǔn)模塊mode.bas已經(jīng)寫好了,只要將它添加到工程中即可。在“工程”窗口中 單擊右鍵,在彈出的快捷菜單中選擇“添加”一“添加模塊”,然后在彈出對話框的“現(xiàn)存”選項(xiàng)卡中選擇“mode.bas”,單擊“確定”按鈕即添加成功。補(bǔ)充后的代碼如下:

  Private Sub Command1_Click()

  Dim min As Integer

  Dim max As Integer

  Dim i As Integer

  If Option1.Value=True Then

  ’根據(jù)選中的Option來設(shè)置For循環(huán)上下限

  min=50

  max=150

  Else

  min=200

  max=350

  End If

  total=0

  For i=min To max

  If isPrimeNum(i)=True Then

  ’調(diào)用mode.bas的isPrimeNum函數(shù)判斷素?cái)?shù)

  total=total+i

  End If

  Next i

  Text1.Text=total

  End Sub

  Private Sub Command2 Click()

  writeData(total)

  ’調(diào)用mode.bas的writeData來進(jìn)行數(shù)據(jù)保存

  End Sub

  標(biāo)準(zhǔn)模塊mode.bas中的代碼如下:

  Function isPrimeNum(num As Integer)As Boolean

  isPrimeNum=True

  Dim i As Inleger

  For i=2 To num-1.

  If num Mod i=0 Then

  isPrimeNum=False

  Exit For

  End If

  Next i

  End Function

  Function writel)ata(total As Long)

  Open"App.Path&out5.txt"For Output As。#1

  Write#1,total

  Close#1

  End Function

  單擊 按鈕運(yùn)行程序,并按要求保存:

上一頁  1 2 3 4 5 6 7 8 9 10  下一頁

  相關(guān)推薦:

  2014年全國計(jì)算機(jī)二級考試VF上機(jī)沖刺試卷匯總

  考試吧考后首發(fā)2014年3月計(jì)算機(jī)二級真題及答案通知

  考試吧推薦:2014年3月計(jì)算機(jī)二級考前沖刺備考專題

文章搜索
版權(quán)聲明:如果計(jì)算機(jī)等級考試網(wǎng)所轉(zhuǎn)載內(nèi)容不慎侵犯了您的權(quán)益,請與我們聯(lián)系800@exam8.com,我們將會(huì)及時(shí)處理。如轉(zhuǎn)載本計(jì)算機(jī)等級考試網(wǎng)內(nèi)容,請注明出處。
Copyright © 2004- 考試吧計(jì)算機(jī)等級考試網(wǎng) All Rights Reserved 
中國科學(xué)院研究生院權(quán)威支持(北京) 電 話:010-62168566 傳 真:010-62192699