(4)選擇“文件”/“保存工程”命令。運(yùn)行程序,查看效果。
照貓畫虎:新建一個(gè)工程,執(zhí)行時(shí)讓窗體最大化、窗體標(biāo)題欄只包含關(guān)閉按鈕。(20分)(實(shí)例位置:光盤\mr\01\zmhh\02_zmhh)
1.8.3 基本功訓(xùn)練3——手動(dòng)計(jì)數(shù)器
視頻講解:光盤\mr\01\lx\手動(dòng)計(jì)數(shù)器.exe
實(shí)例位置:光盤\mr\01\zmhh\03
下面制作一個(gè)手動(dòng)計(jì)數(shù)器,每單擊一次按鈕,文本框中的數(shù)字就會(huì)加1。實(shí)現(xiàn)過程為:新建一個(gè)工程,在窗體上添加一個(gè)CommandButton控件和一個(gè)TextBox控件,雙擊CommandButton控件,自動(dòng)生成如下代碼:
Private Sub Command1_Click()
End Sub
設(shè)置TextBox控件的初始值為0,在“屬性”窗口中找到Text屬性,在其右側(cè)的文本框中輸入0,然后在上面的代碼中加入如下代碼:
Text1.Text = Text1.Text + 1 '設(shè)置Text的值加1
提示:可使用MSDN了解代碼中有關(guān)Text屬性的用法。
照貓畫虎:編寫代碼,實(shí)現(xiàn)每雙擊一次TextBox控件,其中的數(shù)字就會(huì)加1。(20分)(實(shí)例位置:光盤\mr\01\zmhh\03_zmhh)
1.8.4 基本功訓(xùn)練4——設(shè)置工具欄
視頻講解:光盤\mr\01\lx\設(shè)置工具欄.exe
實(shí)例位置:光盤\mr\01\zmhh\04
Visual Basic提供了豐富的工具,但有些工具并沒有顯示在工具欄上,但也經(jīng)常會(huì)被用到,如“編輯”工具欄,下面就將其添加到工具欄中。首先右鍵單擊工具欄空白處,在彈出的菜單中選擇“編輯”命令,如圖1.46所示。
圖1.46 設(shè)置工具欄
照貓畫虎:如果工具欄上工具太多,會(huì)顯得雜亂無章。現(xiàn)在將前面練習(xí)中不需要的工具欄取消。(15分)(實(shí)例位置:光盤\mr\01\zmhh\04_zmhh)
1.8.5 基本功訓(xùn)練5——顯示文字
視頻講解:光盤\mr\01\lx\顯示文字.exe
實(shí)例位置:光盤\mr\01\zmhh\05
下面在窗體上顯示一行文字,效果如圖1.47所示。實(shí)現(xiàn)過程為:新建一個(gè)工程,在窗體上添加一個(gè)Label控件,在“屬性”窗口中找到Caption屬性,在其右側(cè)的文本框中輸入“我愛Visual Basic”,如圖1.48所示。然后找到ForeColor屬性,單擊其右側(cè)的下拉按鈕,選擇“調(diào)色板”選項(xiàng)卡,在其中選擇“紅色”,如圖1.49所示。最后設(shè)置透明,找到BackStyle屬性,在其右側(cè)的下拉列表框中選擇0-Transparent選項(xiàng)。
圖1.48 設(shè)置Caption屬性 圖1.49 設(shè)置ForeColor屬性
照貓畫虎:復(fù)制基本功訓(xùn)練5中的Label控件,將其前景色ForeColor屬性改為黃色,然后將這兩個(gè)控件重疊并稍微錯(cuò)開一點(diǎn),看會(huì)達(dá)到什么效果,是不是陰影文字的效果?(25分)(實(shí)例位置:光盤\mr\01\zmhh\05_zmhh)
照貓畫虎欄目分?jǐn)?shù)統(tǒng)計(jì):