《Visual Basic.NET程序設(shè)計(jì)》 苗國義 課后習(xí)題答案 第2章

第2章1.答：整型Integer2字節(jié)長(zhǎng)整型Long4字節(jié)單精度型Single4字節(jié)雙精度型Double8字節(jié)貨幣型Currency8字節(jié)字節(jié)型Byte1字節(jié)字符串型String1~65535字節(jié)布爾型Boolean2字節(jié)日期型Date8字節(jié)對(duì)象型Object4字節(jié)可變類型Variant2.答：Do循環(huán)結(jié)構(gòu)使用Do循環(huán)語句執(zhí)行不確定次數(shù)的循環(huán)。“Do循環(huán)”的語法格式如下：Do語句塊[ExitDo]語句塊LoopWhile|Until條件While循環(huán)結(jié)構(gòu)可使用While循環(huán)語句執(zhí)行不確定次數(shù)的循環(huán)，While循環(huán)也稱為“當(dāng)型”循環(huán)?！爱?dāng)型”循環(huán)結(jié)構(gòu)的語法格式如下：While條件語句塊[ExitWhile]語句塊EndWhile“當(dāng)型”循環(huán)的步驟：執(zhí)行While循環(huán)時(shí)首先測(cè)試條件，如果條件為True就執(zhí)行語句塊，然后循環(huán)執(zhí)行While語句測(cè)試條件；如果條件為False，則跳過所有語句到循環(huán)體外。For循環(huán)結(jié)構(gòu)For循環(huán)結(jié)構(gòu)使用一個(gè)計(jì)數(shù)器，每循環(huán)一次，計(jì)數(shù)器變量的值就會(huì)增加或減少。其語法格式如下：For計(jì)數(shù)器=初始值To終止值[Step步長(zhǎng)]語句塊[ExitFor]Next[計(jì)數(shù)器]3.答：FalseFalseTrueTrueFalse4.答：PrivateSubCommand1_Click()DimYearAsLong,SAsLong,nStrAsStringnStr=InputBox("請(qǐng)輸入年份：","輸入年份",2000)IfnStr=""ThenExitSubYear=Val(nStr)S=DateDiff("d",Year&"-2-1",Year&"-3-1")'獲取二月份的天數(shù)IfS=29ThennStr="閏年"ElsenStr="不閏年"MsgBoxYear&"："&nStr,vbInformation,"閏年判斷"EndSub5.答：(1)Dimaa=Int((99*Rnd)+11)(2)PrivateSubForm_Load()DimaAsIntegerDimbAsIntegera=15b=(aMod10)*10+a\10MsgBoxbEndSub(3)Right(String1,4)6.答：Dima(9)asvariantDimiasintegeri=0j=9Whilei<jt=a(j)a(i)=a(j)a(j