資源描述：
《vb課后習(xí)題答案 陳慶章主編_》由會(huì)員上傳分享，免費(fèi)在線閱讀，更多相關(guān)內(nèi)容在教育資源-天天文庫(kù)。
1、第1章VisualBasic6.0程序設(shè)計(jì)概述一、判斷題1．√2．√3．×說(shuō)明：同類控件（如兩個(gè)標(biāo)簽）相互重疊，設(shè)計(jì)時(shí)可以設(shè)置“置前”、“置后”屬性。4．√5．×6．√7．×8．√9．√10．×11．√12．√13．×14．√15．×16．√17．√18．√19．√20．√二、選擇題1.C2.B3．D4．C5．B6．A7．D8．A9．B10．A11．C12．D三、填空題1．對(duì)象、事件2．屬性、方法、事件3．控件、屏幕（Screen）4．對(duì)象5．Left、Top6．屬性、<對(duì)象名>.<屬性名>=<表達(dá)式>7．網(wǎng)格8．Form19．Load
2、或Initialize或Resize或Activate（自動(dòng)執(zhí)行的先后順序也按此排列）10．Activate、Deactivate四、程序設(shè)計(jì)題程序1．界面設(shè)計(jì)參看圖10-1、10-2以及表10-1。表10-1實(shí)例2各控件的主要屬性設(shè)置控件屬性（屬性值）屬性（屬性值）標(biāo)簽控件1Name(Label1)Caption("我的第一個(gè)VB程序")標(biāo)簽控件2Name(Label2)Caption("請(qǐng)輸入你的姓名")FontUnderLine(True)FontItalic(True)命令按鈕1Name(Command1)Caption("確定
3、(&O)")命令按鈕2Name(Command2)Caption("結(jié)束(&X)")過(guò)程設(shè)計(jì)如下：PrivatesubForm_Click()Command2.Enabled=FalseEenSubPrivateSubCommand1_Click()Label2.Visible=FalseLabel1.Caption=Text1.Text+":歡迎使用"+Label1.CaptionText1.Visible=FalseCommand1.Enabled=False:Command2.Enabled=TrueEndSubPrivateSu
4、bCommand2_Click()EndEndSub程序2．界面設(shè)計(jì)略，過(guò)程設(shè)計(jì)如下：PrivateSubCommand1_Click()'字體變大Form1.FontSize=Form1.FontSize+3Form1.Cls:Print"歡迎使用VB"EndSubPrivateSubCommand2_Click()'字體變小Form1.FontSize=Form1.FontSize-3Form1.Cls:Print"歡迎使用VB"EndSubPrivateSubCommand3_Click()'字體加粗Form1.FontBold=
5、TrueForm1.Cls:Print"歡迎使用VB"EndSubPrivateSubCommand4_Click()'字體不加粗Form1.FontBold=FalseForm1.Cls:Print"歡迎使用VB"EndSub運(yùn)行時(shí)，不得連續(xù)、過(guò)多次單擊“字體變小”按鈕，因?yàn)楫?dāng)FontSize屬性值小于0會(huì)產(chǎn)生適時(shí)錯(cuò)誤。程序3．界面設(shè)計(jì)略，過(guò)程設(shè)計(jì)如下（窗體Height值的計(jì)量包括標(biāo)題、邊框，而ScaleHeight值僅與窗體有效繪圖區(qū)域的高度有關(guān)）：PrivateSubForm_Load()Text1.Text="VisualBas
6、ic程序設(shè)計(jì)"EndSubPrivateSubForm_Resize()Text1.Top=0:Text1.Left=0Text1.Width=Form1.ScaleWidth/2'用Form1.ScaleWidth效果優(yōu)于用Form1.WidthText1.Height=Form1.ScaleHeight/2'用Form1.ScaleHeight優(yōu)于用Form1.HeightCommand1.Top=Form1.ScaleHeight-Command1.HeightCommand1.Left=Form1.ScaleWidth-Comm
7、and1.WidthEndSub第2章程序設(shè)計(jì)基礎(chǔ)一、判斷題1．√2．×3．×4．×5．√6．×7．√8．√9．√10．×二、選擇題1．B2．D3．A4．C5．C6．B7．A8．D9.C10．A三、填空題1．String2．43．"aaa"4．1455．66．37．188．False9．(xMod10)*10+x1010．10+Int(Rnd*90)11．a(chǎn)*bModc12．Log(x)+Sin(3.141593/6)13．ConstPI=3.141592614．日期15．Int(x)+1四、程序設(shè)計(jì)題程序1．界面設(shè)計(jì)略，過(guò)程設(shè)計(jì)如下
8、：方法一、用文本框控件輸入圓的半徑PrivateSubCommand1_Click()DimxAsSinglex=Text1.TextLabel1.Caption=x*x*3.141593EndSub方法二
