vb實(shí)用案例50例

1、實(shí)驗(yàn)報告11實(shí)驗(yàn)報告2：實(shí)驗(yàn)題目實(shí)驗(yàn)題目1：設(shè)計(jì)窗體。參考界面如下：運(yùn)行前運(yùn)行后要求：1）在窗體上添加一個標(biāo)簽，通過屬性窗囗設(shè)置標(biāo)簽格式：Caption：字體格式Alignment：2—Center（居中）BderStyle：1—FixedSingle（有邊框）Backstyle：0—Tansparent（背景透明）2）運(yùn)行時，單擊“字號”，將標(biāo)簽內(nèi)容的字號設(shè)置為30；單擊“加粗”，將標(biāo)簽內(nèi)容加粗；單擊“下劃線”，則在標(biāo)簽內(nèi)容下加下劃線

2、。提示：字號FontSize、加粗FontBold、下劃線FontUnderline實(shí)驗(yàn)題目實(shí)驗(yàn)題目1源程序代碼：源程序代碼：PrivateSubComm1_Click()Label1.FontSize=30EndSubPrivateSubComm2_Click()Label1.FontBold=trueEndSubPrivateSubComm3_Click()Label1.FontUnderline=TrueEndSub實(shí)驗(yàn)題目實(shí)驗(yàn)題

3、目2：設(shè)計(jì)一個計(jì)算器。參考界面如下：下：要求：沒有計(jì)算出總分前，計(jì)算均分的命令按鈕不可用，計(jì)算出總分后，計(jì)算均分的命令按鈕才可用。說明：設(shè)計(jì)時先將計(jì)算均分的命令按鈕的Enabled屬性設(shè)置為false。實(shí)驗(yàn)題目實(shí)驗(yàn)題目3源程序代碼：源程序代碼：PrivateSubComm1_Click()Text4.Text=Val(Text1.Text)Val(Text2.Text)Val(Text3.Text)Comm2.Enabled=TrueE

4、ndSubPrivateSubComm2_Click()Text5.Text=Val(Text4.Text)3EndSubPrivateSubComm3_Click()Text1.Text=““Text2.Text=““Text3.Text=““Text4.Text=““Text5.Text=““EndSub實(shí)驗(yàn)題目實(shí)驗(yàn)題目4：設(shè)計(jì)界面，編寫程序計(jì)算圓的周長和面積。參考界面如下：要求：①設(shè)置窗體的標(biāo)題為“計(jì)算圓的周長和面積”。②“計(jì)算”