第7VBET程序設(shè)計基礎(chǔ)

1、 數(shù)據(jù)庫技術(shù)及應(yīng)用數(shù)據(jù)庫技術(shù)及應(yīng)用db1第第7章章 vb.net程序設(shè)計基礎(chǔ)程序設(shè)計基礎(chǔ)本章主要內(nèi)容：本章主要內(nèi)容： 介紹介紹vb.net的集成開發(fā)環(huán)境；的集成開發(fā)環(huán)境； 常用控件常用控件(主要屬性主要屬性,方法和事件方法和事件)的使用；的使用； vb.net程序設(shè)計的基礎(chǔ)知識（數(shù)據(jù)類型、程序設(shè)計的基礎(chǔ)知識（數(shù)據(jù)類型、 表達(dá)式、程序控制結(jié)構(gòu)等）。（表達(dá)式、程序控制結(jié)構(gòu)等）。（重點重點） 27.1 vb.net基本概念基本概念7.1.1 vb.net簡介簡介.net開發(fā)平臺：如圖所示。開發(fā)平臺：如圖所示。37.1.1 vb.net簡介簡介vs .net開發(fā)平臺開發(fā)平臺中間語言程序中間語言程序(e

2、xe)在不同的在不同的cpu上運行上運行基礎(chǔ)類庫基礎(chǔ)類庫clr第第1次編譯次編譯第第2次編譯次編譯vs.netvb.net vc+.netvc#.net vj#.netwindows應(yīng)用程序應(yīng)用程序asp.net程序程序數(shù)據(jù)和數(shù)據(jù)和xml類類(ado.net,sql,xml,xslt etc.)47.1.1 vb.net簡介簡介1. .net開發(fā)平臺的特點開發(fā)平臺的特點支持多種語言編程環(huán)境支持多種語言編程環(huán)境。vs.net是一個是一個集成開發(fā)環(huán)境，集成集成開發(fā)環(huán)境，集成vb、vc、c#、j#。 允許它們共享工具并有助于創(chuàng)建混合語言允許它們共享工具并有助于創(chuàng)建混合語言解決方案。解決方案。可以開發(fā)

3、多種應(yīng)用程序可以開發(fā)多種應(yīng)用程序。如。如windows應(yīng)用應(yīng)用程序、程序、asp web 應(yīng)用程序、應(yīng)用程序、xml web services、移動、移動(mobile)應(yīng)用程序等等應(yīng)用程序等等 。57.1.1 vs.net簡介簡介使用同一個基礎(chǔ)類庫使用同一個基礎(chǔ)類庫。在傳統(tǒng)的語言編程。在傳統(tǒng)的語言編程環(huán)境中，不同的語言有不同的函數(shù)庫，而環(huán)境中，不同的語言有不同的函數(shù)庫，而且調(diào)用方式也不同，不同語言的函數(shù)庫是且調(diào)用方式也不同，不同語言的函數(shù)庫是不能通用的。在不能通用的。在vs.net中，大家使用同中，大家使用同一個基礎(chǔ)類庫。一個基礎(chǔ)類庫。67.1.1 vs.net簡介簡介 公共語言運行時庫公共

4、語言運行時庫。 運行時庫運行時庫提供了執(zhí)行程序的服務(wù)，實現(xiàn)了提供了執(zhí)行程序的服務(wù)，實現(xiàn)了編程語言的統(tǒng)一。編程語言的統(tǒng)一。 .net.net程序需要程序需要2 2次編譯才能在次編譯才能在cpucpu上運行。上運行。首先編譯生成與首先編譯生成與cpucpu無關(guān)的中間語言，然無關(guān)的中間語言，然后在公共語言運行時庫后在公共語言運行時庫(clr)(clr)的支持下，的支持下，中間語言程序被編譯成本地中間語言程序被編譯成本地cpucpu指令程序。指令程序。實現(xiàn)了實現(xiàn)了.net.net跨平臺運行的目標(biāo)?？缙脚_運行的目標(biāo)。72. vs.net和和.net框架框架.net框架是與框架是與vs.net緊密相聯(lián)緊密

5、相聯(lián), vs.net依依賴于賴于.net框架提供的服務(wù)?？蚣芴峁┑姆?wù)。7.1.1 vs.net簡介簡介. vs.net和和.net框架的關(guān)系如下圖所示?？蚣艿年P(guān)系如下圖所示。8調(diào)用調(diào)用.net框架服務(wù)框架服務(wù)調(diào)用編譯器的服務(wù)調(diào)用編譯器的服務(wù)運行時調(diào)試支持運行時調(diào)試支持工具窗口工具窗口代碼編輯器代碼編輯器可視化設(shè)計器可視化設(shè)計器集成開發(fā)環(huán)境集成開發(fā)環(huán)境vs.net公共類型系統(tǒng)公共類型系統(tǒng)公共語言規(guī)范公共語言規(guī)范just in time編譯器編譯器執(zhí)行管理執(zhí)行管理.net框架類庫框架類庫公共語言運行庫公共語言運行庫第方語言第方語言+c#vb.netvj#編譯器編譯器.net框架框架9. vb.n

6、et和和vs.netvb.net是是vs.net支持的多種語言之一。是微軟支持的多種語言之一。是微軟推出的第個基于推出的第個基于.net框架的開發(fā)工具，是完全框架的開發(fā)工具，是完全面向?qū)ο蟮木幊陶Z言，支持繼承、重載、構(gòu)造等面向?qū)ο蟮木幊陶Z言，支持繼承、重載、構(gòu)造等面向?qū)ο蠓椒āＣ嫦驅(qū)ο蠓椒ā?.1.1 vs.net簡介簡介107.1.2 vb.net集成開發(fā)環(huán)境集成開發(fā)環(huán)境1. 進入進入vb.net2. 主要窗口介紹主要窗口介紹vb.net主窗口主窗口 窗體設(shè)計器窗口窗體設(shè)計器窗口代碼設(shè)計代碼設(shè)計 屬性窗口屬性窗口解決方案資源管理器窗口解決方案資源管理器窗口工具箱窗口工具箱窗口 其它窗口（在其

7、它窗口（在“視圖視圖”菜單中選擇）菜單中選擇）一個應(yīng)用程序由項目構(gòu)成，一個項目對應(yīng)一個項目一個應(yīng)用程序由項目構(gòu)成，一個項目對應(yīng)一個項目文件夾，其中包括項目涉及的所有文件。文件夾，其中包括項目涉及的所有文件。117.1.3 建立簡單的應(yīng)用程序建立簡單的應(yīng)用程序本節(jié)我們通過本節(jié)我們通過2個簡單例子說明完整個簡單例子說明完整vb.net應(yīng)用程序的建立過程。應(yīng)用程序的建立過程。建立一個應(yīng)用程序分以下幾步進行建立一個應(yīng)用程序分以下幾步進行: 建立用戶界面的各個對象建立用戶界面的各個對象; 對象屬性的可視化設(shè)置對象屬性的可視化設(shè)置; 對象事件過程編碼對象事件過程編碼; 保存、調(diào)試和運行程序。保存、調(diào)試和運

8、行程序。127.1.3 建立簡單的應(yīng)用程序建立簡單的應(yīng)用程序例例7.1 界面見下頁圖所示。界面見下頁圖所示。137.1.3 建立簡單的應(yīng)用程序建立簡單的應(yīng)用程序例例7.2 界面見下頁。通過按鈕操作讓界面見下頁。通過按鈕操作讓“歡歡迎使用迎使用vb.net”在窗口中移動。步驟：在窗口中移動。步驟：設(shè)計用戶界面并設(shè)置控件屬性設(shè)計用戶界面并設(shè)置控件屬性編寫事件過程編寫事件過程147.1.3 建立簡單的應(yīng)用程序建立簡單的應(yīng)用程序 private sub timer1_tick(byval sender , byval e as ) if label1.left me.width then label1

9、.left = -200 else label1.left = label1.left + 8 end if end sub private sub button2_click( ) . 手動移動手動移動 timer1.enabled = false timer1_tick(sender, e) 調(diào)用一次調(diào)用一次timer1_ticktimer1_tick end sub private sub button1_click( ) . 自動移動自動移動 timer1.enabled = trueend sub157.1.4 如何使用幫助系統(tǒng)如何使用幫助系統(tǒng) vs.net中聯(lián)機幫助系統(tǒng)是基于中聯(lián)機

10、幫助系統(tǒng)是基于msdn library。vs.net的的msdn library可以隨可以隨其安裝時一起安裝，也可以以后安裝。其安裝時一起安裝，也可以以后安裝。 幫助有下面常用的四種方式。幫助有下面常用的四種方式。1. 動態(tài)幫助動態(tài)幫助 動態(tài)幫助跟蹤用戶的動作，并自動地顯示動態(tài)幫助跟蹤用戶的動作，并自動地顯示一系列幫助主題。一系列幫助主題。選擇選擇“幫助幫助/動態(tài)幫助動態(tài)幫助”菜單項，打開動態(tài)幫助窗口。菜單項，打開動態(tài)幫助窗口。16 鼠標(biāo)指向哪，幫助就到哪！鼠標(biāo)指向哪，幫助就到哪！7.1.4 如何使用幫助系統(tǒng)如何使用幫助系統(tǒng)172. 索引索引 選擇選擇“幫助幫助/索引索引”菜單項，打開索引幫菜

11、單項，打開索引幫助窗口。助窗口。7.1.4 如何使用幫助系統(tǒng)如何使用幫助系統(tǒng)183. 使用上下文相關(guān)幫助使用上下文相關(guān)幫助 按按“f1”鍵使用上下文相關(guān)幫助。鍵使用上下文相關(guān)幫助。它可以它可以根據(jù)當(dāng)前選定的內(nèi)容直接定位幫助內(nèi)容。根據(jù)當(dāng)前選定的內(nèi)容直接定位幫助內(nèi)容。（電腦操作演示電腦操作演示）4. 網(wǎng)絡(luò)資源網(wǎng)絡(luò)資源 可通過可通過http:/www.microsoft.con/china/msdn網(wǎng)址，獲得最新、最及時的有關(guān)幫助信息。網(wǎng)址，獲得最新、最及時的有關(guān)幫助信息。7.1.4 如何使用幫助系統(tǒng)如何使用幫助系統(tǒng)197.2 vb.net可視界面設(shè)計可視界面設(shè)計本節(jié)主要分以下幾方面內(nèi)容本節(jié)主要分以

12、下幾方面內(nèi)容： 面向?qū)ο笤O(shè)計的基本概念。面向?qū)ο笤O(shè)計的基本概念。 介紹若干常用控件的使用。介紹若干常用控件的使用。207.2 .1 vb.net對象概念對象概念1. 對象和類對象和類對象對象：是對客觀世界中的事物的抽象。用事是對客觀世界中的事物的抽象。用事物的特征物的特征( (屬性屬性) )和行為和行為( (方法方法) )來描述。來描述。 例如例如: :一個人一個人, ,一扇一扇窗口窗口, ,一個按鈕等都是一個按鈕等都是對象。對象。 對象是面向?qū)ο缶幊痰幕驹貙ο笫敲嫦驅(qū)ο缶幊痰幕驹? .21 類：類：是對一組相似對象的抽象描述，這些是對一組相似對象的抽象描述，這些對象具有相同種類的屬性

13、和方法。對象具有相同種類的屬性和方法。 類與對象的關(guān)系：類與對象的關(guān)系：類是抽象的，對象是具類是抽象的，對象是具體的。類是對象的抽象，對象是類的實例體的。類是對象的抽象，對象是類的實例。類是創(chuàng)建對象實例的模板。類是創(chuàng)建對象實例的模板。 例如例如：“橋梁橋梁”是抽象的類，則具體的橋是抽象的類，則具體的橋梁，如楊浦大橋、南京長江大橋等則是對梁，如楊浦大橋、南京長江大橋等則是對象。象。 7.2 .1 vb.net對象概念對象概念22 在在vb.net中，工具箱中的各種圖標(biāo)就是中，工具箱中的各種圖標(biāo)就是系統(tǒng)設(shè)計好的標(biāo)準(zhǔn)控件類。系統(tǒng)設(shè)計好的標(biāo)準(zhǔn)控件類。 當(dāng)我們把所要的控件從工具箱中拿到窗體當(dāng)我們把所要的

14、控件從工具箱中拿到窗體中時，就是創(chuàng)建了這個控件類的一個對象。中時，就是創(chuàng)建了這個控件類的一個對象。該對象繼承了類的所有屬性和方法，當(dāng)然該對象繼承了類的所有屬性和方法，當(dāng)然用戶可根據(jù)需要修改屬性的值。用戶可根據(jù)需要修改屬性的值。7.2 .1 vb.net對象概念對象概念232. 2. 對象的屬性、事件和方法對象的屬性、事件和方法 vb.net的控件對象具有自己的屬性、方的控件對象具有自己的屬性、方法和事件。法和事件。(1)(1)屬性屬性: : 標(biāo)識了對象的特征。標(biāo)識了對象的特征。例如例如: :一個一個”按鈕按鈕”對象對象, ,有屬性有屬性: : 字體字體( (font)、前景顏色、前景顏色(fo

15、recolor)、背、背景顏色景顏色(backcolor)、文本、文本(text)、是否、是否可操作可操作(enabled)等等。等等。7.2 .1 vb.net對象概念對象概念24(2)(2)方法方法: : 附屬于對象的行為和動作附屬于對象的行為和動作。 例如例如: :一個一個“窗體窗體”(form)對象，方法有：對象，方法有： add( (往窗體中加入控件對象往窗體中加入控件對象) )、close(窗窗口關(guān)閉口關(guān)閉) )等等。等等。 “ “方法方法”是指使對象行動的命令，它是通過是指使對象行動的命令，它是通過調(diào)用來使用的。調(diào)用來使用的。 對象方法的調(diào)用格式：對象方法的調(diào)用格式： 對象名對象

16、名. .方法方法(參數(shù)參數(shù))例如：例如：textbox1.focus() textbox1.focus() textbox1textbox1獲得焦點獲得焦點7.2 .1 vb.net對象概念對象概念25(3)(3)事件事件事件事件即發(fā)生的事情。即發(fā)生的事情。是指對象可以識別和是指對象可以識別和響應(yīng)的操作響應(yīng)的操作。事件是觸發(fā)執(zhí)行的。事件是觸發(fā)執(zhí)行的。如：如：單擊鼠標(biāo)左鍵單擊鼠標(biāo)左鍵(click),雙擊鼠標(biāo)左鍵雙擊鼠標(biāo)左鍵(doubleclick)等等.事件可以由用戶操作觸發(fā)事件可以由用戶操作觸發(fā), ,也可以由系統(tǒng)也可以由系統(tǒng)自動觸發(fā)自動觸發(fā)( (例如例如, ,出錯出錯).).當(dāng)事件發(fā)生之后當(dāng)事

17、件發(fā)生之后, ,需要觸發(fā)一些操作需要觸發(fā)一些操作, ,這就需要這就需要用戶編寫相用戶編寫相應(yīng)的代碼對此進行響應(yīng)應(yīng)的代碼對此進行響應(yīng)。這些代碼就構(gòu)成。這些代碼就構(gòu)成了了“事件過程事件過程”。7.2 .1 vb.net對象概念對象概念26vb.net是采用是采用事件驅(qū)動程序設(shè)計方法。事件驅(qū)動程序設(shè)計方法。程序執(zhí)行后系統(tǒng)等待某個事件的發(fā)生，程序執(zhí)行后系統(tǒng)等待某個事件的發(fā)生，然后去執(zhí)行處理此事件的事件過程，待然后去執(zhí)行處理此事件的事件過程，待事件過程執(zhí)行完后，系統(tǒng)又處于等待某事件過程執(zhí)行完后，系統(tǒng)又處于等待某事件發(fā)生狀態(tài)，這就是事件驅(qū)動程序設(shè)事件發(fā)生狀態(tài)，這就是事件驅(qū)動程序設(shè)計方法。計方法。7.2 .

18、1 vb.net對象概念對象概念對象、事件和事件過程之間的關(guān)系如下圖。對象、事件和事件過程之間的關(guān)系如下圖。對象對象事件過程事件過程觸發(fā)觸發(fā)執(zhí)行執(zhí)行事件事件27.對象的通用屬性對象的通用屬性1. 主要屬性：主要屬性：(1) name(對象名稱對象名稱)：每個對象都有一個唯一每個對象都有一個唯一標(biāo)識標(biāo)識名字。對象創(chuàng)建時，系統(tǒng)自動給它名字。對象創(chuàng)建時，系統(tǒng)自動給它默認(rèn)名，如默認(rèn)名，如form1、textbox1等，但用戶等，但用戶可修改?？尚薷?。(2) text(對象顯示文本對象顯示文本):form, textbox, button, label等大多數(shù)控件都有此屬性等大多數(shù)控件都有此屬性.7.2

19、 .1 vb.net對象概念對象概念28(3) location(控件對象的位置控件對象的位置)： 控件左上角相對容器的位置，由一對整數(shù)控件左上角相對容器的位置，由一對整數(shù)表示，單位為像素。表示，單位為像素。 （可以用（可以用left和和top表示）表示） 例如：例如：button1.location=new point(88,48)注：注：newnew表示創(chuàng)建一個新的表示創(chuàng)建一個新的pointpoint類的對象。類的對象。等價于等價于： button1.left=88, button1.top=48 7.2.1 vb.net對象概念對象概念884829(4) size(控件對象的大小控件對象

20、的大小)： 也由一對整數(shù)表示，單位為像素。也由一對整數(shù)表示，單位為像素。 （可（可以用以用width和和height表示）表示） 例如：例如：button1.size=new size(80,32)等價于：等價于： button1.width=80 button1.height=32 7.2.2 窗體和常用控件窗體和常用控件 8032point, size, colorpoint, size, color都是結(jié)構(gòu)都是結(jié)構(gòu)30(5) font(字體字體)：設(shè)置對象顯示文字的字體。設(shè)置對象顯示文字的字體。 label1.font=new font(“隸書隸書”, 14)(6) forecolor、

21、backcolor(前景顏色和背景顏前景顏色和背景顏色色):設(shè)置對象顯示文字的顏色和背景顏色設(shè)置對象顯示文字的顏色和背景顏色 label1. forecolor=color.blue(7) cursor(光標(biāo)光標(biāo))：給出鼠標(biāo)位于對象上時顯：給出鼠標(biāo)位于對象上時顯示的光標(biāo)。示的光標(biāo)。 button1.cursor=new cursor(“光標(biāo)文件名光標(biāo)文件名”)7.2.2 窗體和常用控件窗體和常用控件 31(8) enabled:設(shè)置對象是否可操作設(shè)置對象是否可操作true或或false。(9) visible：設(shè)置對象是否可見：設(shè)置對象是否可見true或或false。(10) tabindex

22、:決定程序運行時，按決定程序運行時，按tab鍵，鍵，焦點在控件移動的順序。焦點在控件移動的順序。7.2.2 窗體和常用控件窗體和常用控件 32窗體對象就是窗體對象就是form對象。對象。1.主要屬性：主要屬性：controlbox(窗體控制框窗體控制框true或或false)、backgroundimage(背景圖片背景圖片)7.2.2 窗體窗體windowsstate：設(shè)置程序運行時：設(shè)置程序運行時, 窗體是正窗體是正 常常(normal)、最大化、最小化、最大化、最小化maximizebox(最大化按鈕要否？默認(rèn)最大化按鈕要否？默認(rèn)true)minimizebox (最小化按鈕要否？默認(rèn)最

23、小化按鈕要否？默認(rèn)true)332. 常用事件：常用事件：load事件事件:當(dāng)窗體被裝入工作區(qū)時觸發(fā)。當(dāng)窗體被裝入工作區(qū)時觸發(fā)。一般該事件代碼中，對變量或?qū)ο蟮膶僖话阍撌录a中，對變量或?qū)ο蟮膶傩栽O(shè)初值。性設(shè)初值。click(單擊鼠標(biāo)事件單擊鼠標(biāo)事件)、dblclick(雙擊鼠標(biāo)事件雙擊鼠標(biāo)事件)、activated(窗口被激活時觸發(fā)窗口被激活時觸發(fā))7.2.2 窗體和常用控件窗體和常用控件 34例例7.2：見見p172。7.2.2 窗體和常用控件窗體和常用控件 單擊窗體雙擊窗體357.2.2 窗體和常用控件窗體和常用控件 private sub form1_load() me.formbo

24、rderstyle = formborderstyle.fixed3d me.text = 例例7.3 me.maximizebox = false me.minimizebox = false me.backgroundimage = nothing 去掉背景圖片去掉背景圖片end sub 36 private sub form1_click() me.text = 單擊窗體單擊窗體 me.backgroundimage = _ image.fromfile(“tongji2.jpg) me.windowstate = _ formwindowstate.maximizedend sub 7

25、.2.2 窗體和常用控件窗體和常用控件 37 private sub form1_doubleclick() me.text = “雙擊窗體雙擊窗體” me.windowstate = _ formwindowstate.normal me.size = new size(264, 256) me.backgroundimage = _image.fromfile(“tongji1.gif)end sub7.2.2 窗體和常用控件窗體和常用控件 383. 常用方法常用方法 show(顯示顯示)、 hide(隱藏隱藏)、 showdialog (以對話框模式顯示窗體，即控制以對話框模式顯示窗體，

26、即控制用戶只能對該窗體操作，對窗體之外的東西用戶只能對該窗體操作，對窗體之外的東西無法操作，直到用戶關(guān)閉該窗體無法操作，直到用戶關(guān)閉該窗體)。7.2.2 窗體和常用控件窗體和常用控件 394. 多重窗體多重窗體 對于較復(fù)雜應(yīng)用程序，往往需要多個窗對于較復(fù)雜應(yīng)用程序，往往需要多個窗體來實現(xiàn)。在多重窗體中，每個窗體可體來實現(xiàn)。在多重窗體中，每個窗體可以有自己的界面和程序代碼，完成各自以有自己的界面和程序代碼，完成各自的功能。的功能。7.2.2 窗體和常用控件窗體和常用控件 vb.netvb.net創(chuàng)建的窗體是類，必須通過創(chuàng)建的窗體是類，必須通過newnew實例實例化為對象?；癁閷ο?。40添加窗體添

27、加窗體 選擇選擇“項目項目/添加添加windows窗體窗體”命令命令.在對在對話框中選擇話框中選擇“windows窗體窗體”即可即可.啟動窗體的設(shè)置啟動窗體的設(shè)置 系統(tǒng)默認(rèn)系統(tǒng)默認(rèn)form1為程序運行時的啟動窗體，為程序運行時的啟動窗體，可以修改設(shè)置，將其他窗體（如可以修改設(shè)置，將其他窗體（如form2）設(shè)置為啟動窗體。設(shè)置為啟動窗體。7.2.2 窗體和常用控件窗體和常用控件 417.2.2 窗體和常用控件窗體和常用控件 (2) 窗體實例化和顯示窗體實例化和顯示 在多重窗體程序中在多重窗體程序中,只有啟動窗體只有啟動窗體(假定為假定為form1)的實例化是的實例化是自動完成的自動完成的. 其他

28、所有窗體都是通過代碼實例化并顯示其他所有窗體都是通過代碼實例化并顯示的的. 例如顯示窗體例如顯示窗體form2要使用下列語句要使用下列語句: dim f2 as new form2 定義定義f2f2為類為類form2form2的對象的對象 f2.show( ) 或或 f2.showdialog()42(3). 不同窗體間數(shù)據(jù)的訪問不同窗體間數(shù)據(jù)的訪問 兩個窗體之間數(shù)據(jù)的訪問有下列兩個窗體之間數(shù)據(jù)的訪問有下列2 2種形式種形式. . a. 窗體實例化后，窗體數(shù)據(jù)的互訪窗體實例化后，窗體數(shù)據(jù)的互訪 窗體窗體form1訪問窗體訪問窗體form2上的數(shù)據(jù)上的數(shù)據(jù). form1中代碼形式如下中代碼形式如

29、下: 7.2.2 窗體和常用控件窗體和常用控件 dim frm2 as new from2 frm2.showdialog() 顯示窗體顯示窗體frm2frm2 me.textbox1.text=frm2.textbox1.text注意寫法注意寫法: 不能寫為不能寫為form2437.2.2 窗體和常用控件窗體和常用控件 窗體窗體form2訪問窗體訪問窗體form1上的數(shù)據(jù)上的數(shù)據(jù). form2中某事件代碼形式如下中某事件代碼形式如下: dim frm1 as new from1 me.textbox1.text=frm1.textbox1.text frm1.show() 顯示窗體顯示窗體f

30、rm1form2中中, text1box1.text=form1.textbox.text錯誤錯誤44b. 通過在模塊中定義公共變量實現(xiàn)相互訪問通過在模塊中定義公共變量實現(xiàn)相互訪問.如：建立一個模塊如：建立一個模塊module1。在其中定義公共。在其中定義公共變量：變量： public x as imteger7.2.2 窗體和常用控件窗體和常用控件 例例7.3(p175)：多重窗體應(yīng)用多重窗體應(yīng)用示例。示例。45 標(biāo)簽控件用于顯示文本信息，不能輸入文標(biāo)簽控件用于顯示文本信息，不能輸入文本信息（輸入用文本框）。本信息（輸入用文本框）。 1. label（標(biāo)簽控件）（標(biāo)簽控件）(1) (1) 主

31、要屬性主要屬性name、text、 location、forecolor、size 、backcolor 、visible 、font(字體字體)、borderstyle(邊框風(fēng)格邊框風(fēng)格) 、7.2.3 常用控件常用控件 46(2) (2) 主要事件主要事件click、doubleclick、change（改變）（改變）contextmenu(快捷菜單快捷菜單),textalign(文字在標(biāo)簽中的對齊方式文字在標(biāo)簽中的對齊方式)、 image(背景圖片背景圖片)、autosize(自動大小自動大小)7.2.3 常用控件常用控件 47 文本框是一個文本編輯框，用戶可以在該文本框是一個文本編輯框

32、，用戶可以在該框中輸入、編輯、修改和顯示文本內(nèi)容?？蛑休斎?、編輯、修改和顯示文本內(nèi)容。 2. textbox（文本框）（文本框）(1) (1) 主要屬性主要屬性name、location、forecolor、size 、backcolor 、visible 、 font(字體字體)、borderstyle(邊框風(fēng)格邊框風(fēng)格) 其他屬性見下頁其他屬性見下頁7.2.3 常用控件常用控件 48屬性屬性類型類型意義意義text字符串字符串框中編輯內(nèi)容框中編輯內(nèi)容maxlength整型整型允許輸入最多字符數(shù)允許輸入最多字符數(shù)multiline邏輯邏輯允許多行輸入否，允許多行輸入否，falsescroll

33、bars枚舉枚舉選擇滾動條選擇滾動條,multiline為為true時時passwordchar字符字符文本框用于輸入口令時，顯示的文本框用于輸入口令時，顯示的字符字符readonly邏輯邏輯只讀，只讀，falseselectionstart整型整型選定的正文開始的位置，第選定的正文開始的位置，第1個字個字符位置為符位置為0selectionlength 整型整型選定的正文長度選定的正文長度selectedtext字符串字符串選定的正文內(nèi)容選定的正文內(nèi)容7.2.3 常用控件常用控件 49(2) (2) 主要事件主要事件textchanged:文本框中內(nèi)容改變時觸發(fā)文本框中內(nèi)容改變時觸發(fā). ke

34、ypress/keydown：當(dāng)焦點在文本框上時，用戶：當(dāng)焦點在文本框上時，用戶按了鍵時觸發(fā)。按了鍵時觸發(fā)。lostfocus：當(dāng)文本框失去焦點時觸發(fā)：當(dāng)文本框失去焦點時觸發(fā).gotfocus: 當(dāng)文本框得到焦點時觸發(fā)當(dāng)文本框得到焦點時觸發(fā).(3) (3) 主要方法主要方法focus: 將光標(biāo)移到文本框上將光標(biāo)移到文本框上. 例如例如: textbox1.focus() 7.2.3 常用控件常用控件 507.2.2 窗體和常用控件窗體和常用控件 例如例如: :sub textbox1_sub textbox1_keypresskeypress( (,byval e ,byval e ) ) i

35、f asc(e.keychar)=13 then if asc(e.keychar)=13 then endif endifend subend sub或或 if e.keychar=chr(13) then .513. button（命令按鈕）（命令按鈕）(1) (1) 主要屬性主要屬性name、text、 location、forecolor、size 、backcolor 、visible 、font(字體字體)、enabled、borderstyle(邊框風(fēng)格邊框風(fēng)格)、 textalign image(圖片圖片, 建圖形按鈕時用建圖形按鈕時用)、7.2.3 常用控件常用控件 52例例

36、7.4 按鈕應(yīng)用。界面、功能如下圖所示。按鈕應(yīng)用。界面、功能如下圖所示。textbox1.font = new font(隸書隸書, 16, fontstyle.italic)7.2.2 窗體和常用控件窗體和常用控件 演示演示收集收集3 3個圖片，個圖片，存放在項目的存放在項目的binbin文件夾下。文件夾下。534. 單選單選按鈕、復(fù)選框和分組框按鈕、復(fù)選框和分組框 單選單選按鈕按鈕(radiobutton) 與復(fù)選框與復(fù)選框(chekbox)的區(qū)別的區(qū)別： 單選單選按鈕任何時候最多只能選擇一項按鈕任何時候最多只能選擇一項, 一一般利用般利用panel(面板面板)或或groupbox(分組框

37、分組框)將將相同性質(zhì)按鈕歸類在一組；復(fù)選框列出多相同性質(zhì)按鈕歸類在一組；復(fù)選框列出多項，用戶可從中選擇一項或多項。項，用戶可從中選擇一項或多項。見下頁見下頁圖所示圖所示。7.2.2 窗體和常用控件窗體和常用控件 547.2.2 窗體和常用控件窗體和常用控件 單選按鈕復(fù)選框55(1) (1) 主要屬性主要屬性 name、font(字體字體)、forecolor、 visible 、enabled、 text、 checked: 邏輯值，表示單選按鈕或復(fù)選框邏輯值，表示單選按鈕或復(fù)選框選中否。選中否。(2) 主要事件主要事件 click、 checkedchanged(對象值改變時對象值改變時觸發(fā)

38、觸發(fā))7.2.3 常用控件常用控件 56panel(面板面板)與與groupbox(分組框分組框) 都是用于都是用于將相同性質(zhì)的對象歸類。當(dāng)我們移動分組將相同性質(zhì)的對象歸類。當(dāng)我們移動分組框或面板時，其中的對象也會跟著移動。框或面板時，其中的對象也會跟著移動。分組框的主要屬性分組框的主要屬性： text, backgroundimage , font面板的主要屬性面板的主要屬性: borderstyle , backcolor, backgroundimage7.2.3 常用控件常用控件 575. 列表框和組合框列表框和組合框 列表框列表框(listbox)：在框中提供若干選項供用戶選擇。：在

39、框中提供若干選項供用戶選擇。只允許用戶選擇，不能輸入。只允許用戶選擇，不能輸入。 組合框組合框(combobox)：由文本框和下拉列表框組合：由文本框和下拉列表框組合而成。用戶即可以在文本框中輸入又可在下拉列表而成。用戶即可以在文本框中輸入又可在下拉列表中選擇。中選擇。7.2.3 常用控件常用控件 列表框組合框58(1) 主要屬性主要屬性items: 集合。存儲列表框或組合框中的所有選項。集合。存儲列表框或組合框中的所有選項。selectedindex: 整型。程序運行時被選定的項的序整型。程序運行時被選定的項的序號。第號。第1項的序號為項的序號為0。selecteditem:字符。被選定的項

40、的內(nèi)容。字符。被選定的項的內(nèi)容。text：用戶輸入或：用戶輸入或選擇的值。選擇的值。 items.count: 整型。程序中引用，值為列表框或組整型。程序中引用，值為列表框或組合框中的項數(shù)。合框中的項數(shù)。sorted:邏輯。列表框或組合框的選項是否按字母邏輯。列表框或組合框的選項是否按字母表順序排序表順序排序.7.2.3 常用控件常用控件 59dropdownstyle: 設(shè)置組合框外觀和功能。設(shè)置組合框外觀和功能。當(dāng)當(dāng)combobox1.dropdownstyle= comboboxstyle. dropdownlist時時組合框只能通過選擇得到文本。組合框只能通過選擇得到文本。當(dāng)當(dāng)comb

41、obox1.dropdownstyle= comboboxstyle. dropdown時時組合框即可通過輸入又可選擇得到文本。組合框即可通過輸入又可選擇得到文本。 組合框?qū)Ｓ袑傩裕航M合框?qū)Ｓ袑傩裕?.2.3 常用控件常用控件 60當(dāng)當(dāng)combobox1.dropdownstyle= comboboxstyle. simple時時組合框即可輸入也可選擇得到文本。但外觀有改變。組合框即可輸入也可選擇得到文本。但外觀有改變。下拉列表將不折起。如下圖所示。下拉列表將不折起。如下圖所示。7.2.3 常用控件常用控件 simple61(2) 常用方法常用方法items.add: 把一個選項加入到列表框或

42、組合框。把一個選項加入到列表框或組合框。 listbox1.items.add(“computer”)items.remove : 從列表框或組合框中刪除指定從列表框或組合框中刪除指定的選項。的選項。listbox1.items.remove(“computer”)items.removeat(index):刪除列表框或組合框刪除列表框或組合框中指定位置上的選項。中指定位置上的選項。 listbox1.items.removeat(1)items.clear:清除列表框或組合框中的所有選項。清除列表框或組合框中的所有選項。7.2.3 常用控件常用控件 62(3) 常用事件常用事件click、d

43、oubleclick、selectedindexchanged(selectedindex屬性值屬性值改變后觸發(fā)改變后觸發(fā))例例7.5 列表框控件程序列表框控件程序。界面如圖。界面如圖。7.2.3 常用控件常用控件 636. 滾動條和進度條滾動條和進度條 滾動條滾動條(scrollbar)：通常附在窗體上協(xié)助：通常附在窗體上協(xié)助觀察數(shù)據(jù)或確定位置，也可用來作為數(shù)據(jù)觀察數(shù)據(jù)或確定位置，也可用來作為數(shù)據(jù)的輸入工具。的輸入工具。 滾動條有垂直滾動條滾動條有垂直滾動條(vscrollbar)和水平和水平滾動條滾動條(hscrollbar) 2種。種。 進度條進度條(progressbar)：通常指示事

44、務(wù)處理：通常指示事務(wù)處理的進度。的進度。7.2.3 常用控件常用控件 64(1) 主要屬性主要屬性value:滑塊當(dāng)前位置所代表的值，缺省值為滑塊當(dāng)前位置所代表的值，缺省值為0。minimun、maximun :滾動條可以調(diào)整的最小值和滾動條可以調(diào)整的最小值和最大值。最大值。smallchange:滾動條兩端的箭頭為微調(diào)箭頭，用戶滾動條兩端的箭頭為微調(diào)箭頭，用戶單擊微調(diào)箭頭時，單擊微調(diào)箭頭時，value屬性增加或減少的值。屬性增加或減少的值。(相當(dāng)于步長相當(dāng)于步長)largechange:按下中間快卷區(qū)域時的移動量。按下中間快卷區(qū)域時的移動量。7.2.3 常用控件常用控件 65(2) 主要事件

45、主要事件scroll、valuechange:當(dāng)滾動條內(nèi)滑塊位置發(fā)生變當(dāng)滾動條內(nèi)滑塊位置發(fā)生變化時，化時，valuechange的值隨之改變時，觸發(fā)這的值隨之改變時，觸發(fā)這兩個事件。兩個事件。例例滾動條程序滾動條程序。三個滾動條分別控制。三個滾動條分別控制picturebox1的背景顏色（的背景顏色（red、green、 blue）。）。minimun=0, maximun=255, largechange=10,smallchange=1 . 見下圖。見下圖。7.2.2 窗體和常用控件窗體和常用控件 66 private sub hscrollbar1_scroll()picturebox1

46、.backcolor = color.fromargb(hscrollbar1.value, hscrollbar2.value, hscrollbar3.value)end sub7.2.3 常用控件常用控件 677. 定時器定時器 timer(1) 主要屬性主要屬性enabled: 為為false 時，定時器不起作用。時，定時器不起作用。interval: 兩次觸發(fā)兩次觸發(fā)tick事件的時間間隔。事件的時間間隔。其值以其值以ms（0.001s）為單位。即）為單位。即1000為為1秒。秒。(2) 主要事件主要事件tick: 時間間隔一到觸發(fā)該事件。時間間隔一到觸發(fā)該事件。7.2.3 常用控件

47、常用控件 68例例7.6 ：用定時器控制蝴蝶在窗體內(nèi)飛舞。：用定時器控制蝴蝶在窗體內(nèi)飛舞。 窗體中放三個窗體中放三個picturebox控件。設(shè)計時，只控件。設(shè)計時，只有有picturebox1的的visible=true。通過定時器。通過定時器控制在控制在picturebox1中裝入中裝入picturebox2 和和picturebox3的圖像來實現(xiàn)。的圖像來實現(xiàn)。7.2.2 窗體和常用控件窗體和常用控件 697.2.2 窗體和常用控件窗體和常用控件 事先收集事先收集2 2個不同蝴蝶圖片，存放在項目的個不同蝴蝶圖片，存放在項目的binbin文件夾下。文件夾下。708、日期挑選控件、日期挑選控

48、件 datetimepicker控件控件: 用戶不想輸入日期（或時用戶不想輸入日期（或時間），可以通過該控件選擇一個日期（時間）。間），可以通過該控件選擇一個日期（時間）。7.2.3 常用控件常用控件 71(1) 主要屬性：主要屬性： value: 對象的當(dāng)前值。對象的當(dāng)前值。 format：顯示日期的格式。：顯示日期的格式。 long(2008年年2月月25日日) short(2008/2/25) time(僅顯示時間僅顯示時間) custom(用戶所給格式用戶所給格式) showupdown：控制顯示的樣式：控制顯示的樣式 flase/trueflasetrue7.2.3 常用控件常用控件

49、 72例例7.7 程序界面如圖所示。程序界面如圖所示。private sub datetimepicker1_valuechanged () messagebox.show( datetimepicker1.value.date.tostring）end sub7.2.3 常用控件常用控件 73richtextbox控件用于顯示、輸入和操作控件用于顯示、輸入和操作格式化的格式化的文本文本?？丶俗觥？丶俗?textbox 控件所做的每件事控件所做的每件事外，還可以顯示字體、顏色和鏈接，從文件加外，還可以顯示字體、顏色和鏈接，從文件加載文本和加載嵌入的圖像，以及查找指定的字載文本和加載嵌入

50、的圖像，以及查找指定的字符符(find方法方法)。richtextbox 控件通常用于提供控件通常用于提供類似字處理應(yīng)用程序（如類似字處理應(yīng)用程序（如 microsoft word）的）的文本操作和顯示功能。文本操作和顯示功能。7.2.3 常用控件常用控件 9. richtextbox控件控件74richtextbox沒有沒有passwordchar屬性，但比屬性，但比textbox功能強大，主要有：功能強大，主要有：(1) 文本的長度沒有文本的長度沒有64k限制；限制；(2) 可對選中的文本設(shè)置格式，如可對選中的文本設(shè)置格式，如selectionbackcolor、selectioncolo

51、r、selectionfont等等(3) 可方便用可方便用loadfile和和savefile直接讀寫文件。直接讀寫文件。7.2.3 常用控件常用控件 757.2.3 常用控件常用控件 richtextbox常用的常用的2個方法：個方法： savefile: 將將richtextbox 控件中內(nèi)容保存到文件中控件中內(nèi)容保存到文件中 loadfile:將文件內(nèi)容加載到將文件內(nèi)容加載到 richtextbox 控件中控件中 用法：用法：richtextbox1. loadfile(路徑文件名路徑文件名,流類型流類型) richtextbox1. savefile(路徑文件名路徑文件名,流類型流類型

52、) 功能功能：將將 rtf 格式文件或標(biāo)準(zhǔn)格式文件或標(biāo)準(zhǔn) ascii 文本文件加載到文本文件加載到richtextbox 控件中控件中(或或 反之反之)。767.2.3 常用控件常用控件 if openfiledialog1.showdialog() = dialogresult.ok then richtextbox1.loadfile(openfiledialog1.filename, richtextboxstreamtype.plaintext ) end if if savefiledialog1.showdialog() = dialogresult.ok then richtex

53、tbox1.savefile(savefiledialog1.filename,richtextboxstreamtype.plaintext) end if 路徑和文件名路徑和文件名77. 菜單設(shè)計菜單設(shè)計 有種形式的菜單：有種形式的菜單：mainmenu（主菜單）和（主菜單）和contextmenu（彈出式菜單，或稱快捷菜單）。（彈出式菜單，或稱快捷菜單）。7.2.4 菜單和對話框菜單和對話框 (1) 菜單建菜單建立：立： 選擇工具箱中的選擇工具箱中的“mainmenu”控件，并在窗口控件，并在窗口中拖曳出合適的大?。恢型弦烦龊线m的大?。?此時此時mainmenu對象出現(xiàn)在窗體外的區(qū)域?qū)ο?/p>

54、出現(xiàn)在窗體外的區(qū)域 直接在直接在“請在此處輸入請在此處輸入”的虛框中輸入所要的菜的虛框中輸入所要的菜單數(shù)據(jù)。單數(shù)據(jù)。 見下圖。見下圖。787.2.4 菜單和對話框菜單和對話框 797.2.4 菜單和對話框菜單和對話框 (2) 主要屬性主要屬性name: 菜單或菜單項名。菜單或菜單項名。text：菜單顯示的文本。字母前有表示該字母是：菜單顯示的文本。字母前有表示該字母是熱鍵，熱鍵，“-”顯示菜單項分割線。顯示菜單項分割線。shortcut：快捷鍵。：快捷鍵。checked：文本前有：文本前有“”，表示被選中。，表示被選中。(3) 菜單項事件菜單項事件: 主要是主要是click事件事件807.2.

55、4 菜單和對話框菜單和對話框 (4) 彈出菜單彈出菜單設(shè)計方法類似設(shè)計方法類似mainmenu。為某個對象的為某個對象的contextmenu屬性指定快捷菜單屬性指定快捷菜單contextmenu 1。當(dāng)鼠標(biāo)移到對象上，按鼠標(biāo)右鍵打。當(dāng)鼠標(biāo)移到對象上，按鼠標(biāo)右鍵打開此菜單。開此菜單。81. 輸入和顯示對話框輸入和顯示對話框7.2.4 菜單和對話框菜單和對話框 輸入和輸出對話框不是控件，是由系統(tǒng)提供的函數(shù)輸入和輸出對話框不是控件，是由系統(tǒng)提供的函數(shù)實現(xiàn)。實現(xiàn)。(1) inputbox輸入函數(shù)輸入函數(shù)： inputbox(提示提示,標(biāo)題標(biāo)題,默認(rèn)值默認(rèn)值,xpos,ypos ) 函數(shù)返回用戶輸入的

56、值，函數(shù)值類型是字符串。函數(shù)返回用戶輸入的值，函數(shù)值類型是字符串。82提示提示默認(rèn)值默認(rèn)值標(biāo)題標(biāo)題x,y坐標(biāo)坐標(biāo)取消，則返回長度為取消，則返回長度為0的字符串的字符串7.2.4 菜單和對話框菜單和對話框 inputbox對話框?qū)υ捒?3例如：例如：dim an as string, gz as decimal =0an=inputbox(“請輸入工資請輸入工資:”,“計算工資計算工資”,0)if an.trim.length0 then gz=cdec(an) textbox1.text=gzend if注：注： inputboxinputbox函數(shù)值是字符串型，上例中系統(tǒng)會函數(shù)值是字符串型，

57、上例中系統(tǒng)會將字符串型強制轉(zhuǎn)換為將字符串型強制轉(zhuǎn)換為decimal.decimal.7.2.4 菜單和對話框菜單和對話框 84(2) msgbox輸出函數(shù)輸出函數(shù)功能功能：打開一個信息窗口，等待用戶選擇一個按打開一個信息窗口，等待用戶選擇一個按鈕鈕。函數(shù)返回值是一個整數(shù)，不同整數(shù)代表用戶。函數(shù)返回值是一個整數(shù)，不同整數(shù)代表用戶按了不同按鈕。按了不同按鈕。 若不需要返回值，可作為一個獨立的語句使用。若不需要返回值，可作為一個獨立的語句使用。 格式：格式： msgbox(“提示提示”，按鈕，按鈕，“標(biāo)題標(biāo)題”) messagebox.show(“提示提示”, “標(biāo)題標(biāo)題”, 按鈕按鈕)7.2.4

58、菜單和對話框菜單和對話框 85msgbox(“提示提示”，按鈕，按鈕，“標(biāo)題標(biāo)題”)例例：msgbox(“真的要刪除嗎真的要刪除嗎?”, msgboxstyle.yesno + msgboxstyle.question , “信息提示信息提示”)或或 msgbox(“真的要刪除嗎真的要刪除嗎?”, 4+32 , “信息提示信息提示”)7.2.4 菜單和對話框菜單和對話框 86分組分組枚舉值枚舉值按鈕值按鈕值對話框中心是的按鈕對話框中心是的按鈕按鈕按鈕個數(shù)個數(shù)okonly0“確定確定” okcancel1“確定確定”、“取消取消”abortretryignore2“終止終止”、“重試重試”、“忽

59、忽略略”yesnocancel3“是是”、“否否”、“取消取消”yesno4“是是”、“否否”retrycancel5“重試重試”、 “取消取消”圖標(biāo)圖標(biāo)類型類型critical16關(guān)鍵信息圖標(biāo)關(guān)鍵信息圖標(biāo)question32問號圖標(biāo)問號圖標(biāo)exclamation48警告圖標(biāo)警告圖標(biāo) information64信息圖標(biāo)信息圖標(biāo)按鈕設(shè)置值及其意義按鈕設(shè)置值及其意義7.2.4 菜單和對話框菜單和對話框 87枚舉值枚舉值內(nèi)部常數(shù)內(nèi)部常數(shù)返回值返回值被單擊的按鈕按鈕被單擊的按鈕按鈕okvbok1“確定確定” cancelvbcancel2“取消取消”abortvbabort3“終止終止”retryvb

60、retry4“重試重試”ignorevbignore5 “忽略忽略”yesvbyes6“是是”novbno7“否否”函數(shù)返回與所選按鈕的關(guān)系函數(shù)返回與所選按鈕的關(guān)系7.2.4 菜單和對話框菜單和對話框 88例例7.8編寫一個賬號和密碼輸入檢查程序。編寫一個賬號和密碼輸入檢查程序。p186msgbox(密碼錯誤密碼錯誤, msgboxstyle.retrycancel + msgboxstyle.exclamation, 警告警告)7.2.4 菜單和對話框菜單和對話框 89. 通用對話框通用對話框 通用對話框控件包括：通用對話框控件包括： 打開文件對話框打開文件對話框(openfiledialog) 保