1、自主學(xué)習(xí)包課程,VB程序設(shè)計(jì),關(guān)于Visual Basic,Visual Basic是在Windows平臺(tái)上廣泛使用的可視化的高級(jí)程序設(shè)計(jì)語(yǔ)言和開發(fā)工具。 現(xiàn)在應(yīng)用較多的版本是Visual Basic 6.0。 Visual：可視化。 Basic：BASIC(Beginners All-Purpose Symbolit Instruction Code)通用語(yǔ)言代碼。,啟動(dòng)VB 6.0的3種方法,在“開始”菜單中選擇“程序Microsoft Visual Basic6.0 中文版Microsoft Visual Basic6.0 中文版”選項(xiàng)。 在桌面上建立快捷方式，雙擊該圖標(biāo)。 雙擊已建立的

2、VB應(yīng)用程序圖標(biāo)。,VB 6.0的集成開發(fā)環(huán)境,啟動(dòng)后，屏幕顯示集成開發(fā)環(huán)境界面（P3）: 三個(gè)工作欄：標(biāo)題欄、菜單欄、工具欄 六個(gè)基本窗口： 主窗口（Main） 窗體窗口（Form） 工具箱窗口（Tool Box） 工程窗口（Project） 屬性窗口（Properties） 窗體布局窗口（Form Layout） 思考：關(guān)閉后的窗口如何重新打開？,圖1-2集成開發(fā)環(huán)境窗口,VB 6.0的集成開發(fā)環(huán)境,VB6.0的窗口的操作初步,1、窗體窗口（窗體）是建立VB應(yīng)用程序的主體部分。 2、利用工具箱在窗體設(shè)置控件。 3、利用屬性窗口設(shè)置窗體和控件的屬性。 4、工程窗口的工具按鈕 注：帶有控件的窗

3、體將成為應(yīng)用程序的界面，通過(guò)窗體上的控件可得到程序的運(yùn)行結(jié)果。,圖1-4屬性窗口,VB6.0的窗口的操作初步,圖1-5工程窗口,VB6.0的窗口的操作初步,圖1-7代碼窗口,VB6.0的窗口的操作初步,圖1-8 工具箱窗口,VB6.0的窗口的操作初步,例1完成下列操作：,1、 啟動(dòng)Visual Basic 60集成環(huán)境，說(shuō)出集成環(huán)境各組成部分的名稱。 2、 分別關(guān)閉工具欄、屬性窗口、工程窗口(工程資源管理器窗口)、工具箱窗口、窗體布局窗口。 3、 分別打開工具欄、屬性窗口、工程窗口(工程資源管理器窗口)、工具箱窗口、窗體布局窗口。 4、 在窗體中設(shè)置一個(gè)命令按鈕控件，名稱為Command1,顯

4、示文本為“確定”。 5、 在窗體中設(shè)置一個(gè)文本框控件，名稱為Text1,顯示文本為“我的文本”。 6、 在窗體中設(shè)置一個(gè)標(biāo)簽控件，名稱為L(zhǎng)abel1,顯示文本為“我的標(biāo)簽”。 7、 在窗體中設(shè)置一個(gè)圖形框控件，名稱為Picture1,顯示圖形為“D:VBIMG2312.jpg”。 8、把此窗體以“form1”為名保存到“D:1”文件夾，把此工程以“工程1”為名保存到“D:1”文件夾。 9、退出Visual Basic 60集成環(huán)境。,VB6.0操作實(shí)戰(zhàn)一,創(chuàng)建VB應(yīng)用程序的基本步驟,1、設(shè)計(jì)應(yīng)用程序界面：界面由窗體和控件組成，控件放在窗體上。 2、設(shè)置對(duì)象屬性：在屬性窗口設(shè)置對(duì)象(窗體和控件)

5、的屬性。 3、編寫程序代碼：在代碼編輯器窗口中進(jìn)行。代碼由語(yǔ)句、常數(shù)和聲明部分組成。 4、調(diào)試運(yùn)行程序： 5、保存工程：把窗體文件和工程文件保存在磁盤上。窗體文件的擴(kuò)展名為*.frm，工程文件的擴(kuò)展名為*.vbp。,例2編程上機(jī)：設(shè)計(jì)一個(gè)“開學(xué)致詞”窗體，由一個(gè)文本框控件和兩個(gè)命令按鈕組成。運(yùn)行程序時(shí)，若單擊“顯示”按鈕，則文本框顯示：“滿懷豪情投入程序設(shè)計(jì)的學(xué)習(xí)!”；若單擊“結(jié)束”按鈕，則退出程序運(yùn)行。,VB6.0操作實(shí)戰(zhàn)二,第一步： 創(chuàng)建新窗體,在新窗體Form1上創(chuàng)建3個(gè)控件： 命令按扭Command1 命令按扭Command2 文本框Text1。,第二步：設(shè)置對(duì)象的屬性,第三步：補(bǔ)充完成代碼編寫,Private Sub Command1_Click() Text1.text=“滿懷豪情地投入程序設(shè)計(jì)的學(xué)習(xí)!” End Sub Private Sub Command2_Click() end End Sub,第四步：調(diào)試運(yùn)行程序,第五步：保存工程 把此窗體以“form2”為