資源描述：
《《visual basic程序設(shè)計基礎(chǔ)》陳慶章 課后習(xí)題參考答案》由會員上傳分享，免費在線閱讀，更多相關(guān)內(nèi)容在教育資源-天天文庫。
1、《VisualBasic程序設(shè)計基礎(chǔ)》教材習(xí)題參考答案第1章VisualBasic6.0程序設(shè)計概述一、判斷題1．√2．√3．×說明：同類控件（如兩個標(biāo)簽）相互重疊，設(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．對象、事件2．屬性、方法、事件3．控件、屏幕（Screen）4．對象5
2、．Left、Top6．屬性、<對象名>.<屬性名>=<表達式>7．網(wǎng)格8．Form19．Load或Initialize或Resize或Activate（自動執(zhí)行的先后順序也按此排列）10．Activate、Deactivate四、程序設(shè)計題程序1．界面設(shè)計參看圖10-1、10-2以及表10-1。表10-1實例2各控件的主要屬性設(shè)置控件屬性（屬性值）屬性（屬性值）標(biāo)簽控件1Name(Label1)Caption("我的第一個VB程序")標(biāo)簽控件2Name(Label2)Caption("請輸入你的
3、姓名")FontUnderLine(True)FontItalic(True)命令按鈕1Name(Command1)Caption("確定(&O)")命令按鈕2Name(Command2)Caption("結(jié)束(&X)")過程設(shè)計如下：PrivatesubForm_Click()Command2.Enabled=FalseEenSubPrivateSubCommand1_Click()Label2.Visible=FalseLabel1.Caption=Text1.Text+":歡迎使用"+La
4、bel1.CaptionText1.Visible=FalseCommand1.Enabled=False:Command2.Enabled=TrueEndSubPrivateSubCommand2_Click()EndEndSub程序2．界面設(shè)計略，過程設(shè)計如下：PrivateSubCommand1_Click()'字體變大Form1.FontSize=Form1.FontSize+3Form1.Cls:Print"歡迎使用VB"EndSubPrivateSubCommand2_Click()
5、'字體變小Form1.FontSize=Form1.FontSize-3Form1.Cls:Print"歡迎使用VB"EndSubPrivateSubCommand3_Click()'字體加粗Form1.FontBold=TrueForm1.Cls:Print"歡迎使用VB"EndSubPrivateSubCommand4_Click()'字體不加粗Form1.FontBold=FalseForm1.Cls:Print"歡迎使用VB"EndSub運行時，不得連續(xù)、過多次單擊“字體變小”按鈕，因為
6、當(dāng)FontSize屬性值小于0會產(chǎn)生適時錯誤。程序3．界面設(shè)計略，過程設(shè)計如下（窗體Height值的計量包括標(biāo)題、邊框，而ScaleHeight值僅與窗體有效繪圖區(qū)域的高度有關(guān)）：PrivateSubForm_Load()Text1.Text="VisualBasic程序設(shè)計"EndSubPrivateSubForm_Resize()Text1.Top=0:Text1.Left=0Text1.Width=Form1.ScaleWidth/2'用Form1.ScaleWidth效果優(yōu)于用Form1
7、.WidthText1.Height=Form1.ScaleHeight/2'用Form1.ScaleHeight優(yōu)于用Form1.HeightCommand1.Top=Form1.ScaleHeight-Command1.HeightCommand1.Left=Form1.ScaleWidth-Command1.WidthEndSub第2章程序設(shè)計基礎(chǔ)一、判斷題1．√2．×3．×4．×5．√6．×7．√8．√9．√10．×二、選擇題1．B2．D3．A4．C5．C6．B7．A8．D9.C10．A
8、三、填空題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è)計題程序1．界面設(shè)計略，過程設(shè)計如下：方法一、用文本框控件輸入圓的半徑PrivateSubCommand1_Click()DimxAsSinglex=Text1.TextLabel1.Ca
