visual basic 手把手教程 第1章

第1章VisualBasic簡單程序

1.1 VB集成開發(fā)環(huán)境1.2 設計簡單的VB應用程序1.3 小結實例實例1.1實例1.2實例1.3實例1.4本章實例1.1VB集成開發(fā)環(huán)境1.1.1Hello程序1.1.2改進的Hello程序P1【實例1.1】窗體中有一幅圖片，同時添加 1個標簽和2個命令按鈕。單擊1.1.1Hello程序

單擊結束程序P1操作步驟（1）啟動VisualBasic集成環(huán)境【開始】|【程序】|【MicrosoftVisualBasic6.0中文版】|【MicrosoftVisualBasic6.0中文版】第1步第2步第3步窗體設計器工具箱工程資源管理器對象屬性窗口查看對象查看代碼單擊命令按鈕（CommandButton）圖標，添加命令按鈕（2）設計用戶界面單擊標簽（Label）圖標，添加標簽（3）設置對象屬性屬性名屬性值對象名對象屬性屬性值窗體（名稱）CaptionPicturefrmEx1_1歡迎界面選取一圖形文件標簽（名稱）CaptionlblInfo（置空）命令按鈕1（名稱）CaptioncmdDisplay顯示命令按鈕2（名稱）CaptioncmdExit退出（4）編寫代碼雙擊控件或單擊工程窗口的“查看代碼”按鈕，進入代碼窗口在對象框中選擇cmdDisplay對象在過程框中選擇Click事件PrivateSubcmdDisplay_Click()EndSublblInfo.Caption="歡迎進入VisualBasic..."在對象框中選擇cmdExit對象在過程框中選擇Click事件PrivateSubcmdExit

_Click()EndSubEnd

（5）保存文件分別保存窗體文件(frm)、工程文件(vbp)

單擊【啟動】按鈕運行程序單擊【結束】按鈕停止工程運行（6）運行程序技能要點界面設計要簡潔、美觀，控件布局要合理。代碼框架最好由系統(tǒng)自動生成。建議將同一工程的所有類型的文件存放在同一文件夾中。適當加入一些注釋，一般采用注釋符“'”。1.1.2改進的Hello程序

【實例1.2】修改實例1.1，為窗體設置圖標，且無最大化、最小化按鈕，將標簽設置為“透明”狀態(tài)。在窗體上再增加1個命令按鈕。程序運行時，“顯示”命令按鈕呈“可用”狀態(tài)，而“清除”命令按鈕置為“禁用”狀態(tài)。單擊單擊P6【文件】/【打開工程】操作步驟（1）打開已有工程文件（2）設計用戶界面在窗體中增加一個命令按鈕

（3）設置對象屬性對象屬

性屬性值窗體（名稱）CaptionIconMaxButtonMinButtonPicturefrmEx1_2歡迎界面選取一圖標文件FalseFalse選取一圖形文件對象屬

性屬性值標簽（名稱）CaptionBackStyleForeColorFontlblInfo（置空）0-Transparent紅色楷體、小四命令按鈕1（名稱）CaptionEnabledcmdDisplay顯示True命令按鈕2（名稱）CaptionEnabledcmdCls清除False命令按鈕3（名稱）CaptioncmdExit退出（4）編寫代碼PrivateSubcmdDisplay_Click()

lblInfo.Caption="歡迎進入VisualBasic..."EndSub

PrivateSubcmdExit_Click()EndEndSubcmdDisplay.Enabled=FalsecmdCls.Enabled=TruePrivateSubcmdCls_Click()

lblInfo.Caption=""

cmdCls.Enabled=False

cmdDisplay.Enabled=TrueEndSub（5）保存文件【文件】/【frmEx1_2.frm另存為…】【文件】/【工程另存為…】技能要點很多屬性可在設計階段設置，也可在運行階段設置。但有些屬性只能在設計階段或只能在運行階段才能設置。輸入“cmdCls.”后，出現成員列表。若不出現，說明該對象的名稱有錯，應檢查?！皹祟}（Caption）”和“名稱（Name）”是兩個不同屬性。合理設置命令按鈕的“可用”與“禁用”狀態(tài)。編寫事件過程時，采用逐個編寫、調試的方式。1.2設計簡單的VB應用程序

1.2.1文本信息的顯示1.2.2窗體中顯示圖片和文字P91.2.1文本信息的顯示

【實例1.3】在窗體上添加2個標簽，標簽的內容分別是“HappyNewYear”和“新年快樂”，文字的字體和顏色不同。程序運行時，單擊窗體，交換兩個標簽的內容。雙擊窗體，結束程序的運行。P9（1）屬性設置對象屬

性屬性值窗體（名稱）CaptionPicturefrmEx1_3賀詞互換選取一圖形文件標簽1（名稱）CaptionBackStyleFontForeColorlblWish1HappyNewYear0-Transparent華文行楷、二號紅色標簽2（名稱）CaptionBackStyleFontForeColorlblWish2新年快樂0-Transparent華文彩云、二號蘭色PrivateSubForm_Click()temp=lblWish1.Caption lblWish1.Caption=lblWish2.CaptionlblWish2.Caption=tempEndSubPrivateSubForm_DblClick()EndEndSub（2）代碼交換算法技能要點一定要明確編寫代碼的位置。不要將所有代碼編寫完畢再運行。標簽的BackStyle（背景風格）屬性為“0-Transparent”時，產生透明效果。要實現A和B的交換功能，必須使用中間變量T。1.2.2窗體中顯示圖片和文字

【實例1.4】窗體中有4個命令按鈕。程序運行時，窗體顯示出一幅圖（作為背景圖），單擊“春”、“夏”、“秋”和“冬”4個命令按鈕，在窗體中分別顯示不同的圖片；單擊窗體，清除顯示的圖片，同時在窗體上直接輸出“要顯示的圖是什么？”；雙擊窗體，清除窗體上顯示的文字，重新顯示出背景圖。P12（1）屬性設置對象屬

性屬性值窗體（名稱）CaptionfrmEx1_4四季圖命令按鈕1（名稱）CaptioncmdSpring春命令按鈕2（名稱）CaptioncmdSummer夏命令按鈕3（名稱）CaptioncmdAutumn秋命令按鈕4（名稱）CaptioncmdWinter冬PrivateSubForm_Load()frmEx1_4.Picture=LoadPicture("d:\vb\

background.jpg")EndSub（2）代碼PrivateSubcmdSpring_Click()frmEx1_4.Picture=LoadPicture("d:\vb\

scn_spring.wmf")EndSub“夏”、“秋”、“冬”命令按鈕的Click事件過程類似注意路徑PrivateSubForm_Click() frmEx1_4.Picture=LoadPicture("") Print"要顯示的圖是什么？"EndSubPrivateSubForm_DblClick()

Cls frmEx1_4.Picture=LoadPicture("d:\vb\

background.jpg")EndSub技能要點使用LoadPicture函數裝載圖形時一定要寫明文件的完整路徑和文件名全稱（含擴展名）。在運行時要刪除已裝載的圖形，應使用“LoadPicture("")”形式，若在設計時刪除圖形，則選中Picture的屬性值后，按“Delete”鍵。