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

2012年計(jì)算機(jī)等級考試二級VB重點(diǎn)知識(十一)

  ★重點(diǎn)掌握結(jié)構(gòu)程序設(shè)計(jì)的方法和思想;

  ★理解和掌握VB中常用算法的思想和設(shè)計(jì)方法;

  一、計(jì)數(shù)、求和、求階乘等簡單算法

  此類問題都要使用循環(huán),要注意根據(jù)問題確定循環(huán)變量的初值、終值或結(jié)束條件,更要注意用來表示計(jì)數(shù)、和、階乘的變量的初值。

  例:用隨機(jī)函數(shù)產(chǎn)生100個(gè)[0,99]范圍內(nèi)的隨機(jī)整數(shù),統(tǒng)計(jì)個(gè)位上的數(shù)字分別為1,2,3,4,5,6,7,8,9,0的數(shù)的個(gè)數(shù)并打印出來。

  本題使用數(shù)組來處理,用數(shù)組a(1 to 100)存放產(chǎn)生的確100個(gè)隨機(jī)整數(shù),數(shù)組x(1 to 10)來存放個(gè)位上的數(shù)字分別為1,2,3,4,5,6,7,8,9,0的數(shù)的個(gè)數(shù)。即個(gè)位是1的個(gè)數(shù)存放在x(1)中,個(gè)位是2的個(gè)數(shù)存放在x(2)中,……個(gè)位是0的個(gè)數(shù)存放在x(10)。

  將程序編寫在一個(gè)GetTJput過程中,代碼如下:

  Public Sub GetTJput()

  Dim a(1 To 100) As Integer

  Dim x(1 To 10) As Integer

  Dim i As Integer, p As Integer

  '產(chǎn)生100個(gè)[0,99]范圍內(nèi)的隨機(jī)整數(shù),每行10個(gè)打印出來

  For i = 1 To 100

  a(i) = Int(Rnd * 100)

  If a(i) < 10 Then

  Form1.Print Space(2); a(i);

  Else

  Form1.Print Space(1); a(i);

  End If

  If i Mod 10 = 0 Then Form1.Print

  Next i

  '統(tǒng)計(jì)個(gè)位上的數(shù)字分別為1,2,3,4,5,6,7,8,9,0的數(shù)的個(gè)數(shù),并將統(tǒng)計(jì)結(jié)果保存在數(shù)組x(1),x(2),…,x(10)中,將統(tǒng)計(jì)結(jié)果打印出來

  For i = 1 To 100

  p = a(i) Mod 10 ' 求個(gè)位上的數(shù)字

  If p = 0 Then p = 10

  x(p) = x(p) + 1

  Next i

  Form1.Print "統(tǒng)計(jì)結(jié)果"

  For i = 1 To 10

  p = i

  If i = 10 Then p = 0

  Form1.Print "個(gè)位數(shù)為" + Str(p) + "共" + Str(x(i)) + "個(gè)"

  Next i

  End Sub

1 2 3 4 5 6 7 8 下一頁

  相關(guān)推薦:

  2012年下半年計(jì)算機(jī)等級考試報(bào)名時(shí)間及入口匯總

  計(jì)算機(jī)等級考試三級PC技術(shù)過關(guān)心得技巧

  2012年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)容,請注明出處。