資源描述:
《第2章visualbasic編程基礎(chǔ)》由會員上傳分享,免費在線閱讀,更多相關(guān)內(nèi)容在教育資源-天天文庫。
1、第2章VisualBasic編程基礎(chǔ)1臺州學院計算機系應建健編本章內(nèi)容2.1窗體2.1.1窗體的構(gòu)造2.1.2窗體的屬性2.1.3窗體的事件2.1.4窗體的方法2.1.5多窗體2.1.6窗體加載與卸載時觸發(fā)的事件2.2數(shù)據(jù)類型、常量與變量2.3Print語句和賦值語句2.4運算符、表達式、常用內(nèi)部函數(shù)2.5編程實例2臺州學院計算機系應建健編2.1窗體2.1.1窗體的構(gòu)造2.1.2窗體的屬性2.1.3窗體的事件2.1.4窗體的方法2.1.5多窗體2.1.6窗體加載與卸載時觸發(fā)的事件3臺州學院計算機系應建健編2.1.1窗體的構(gòu)造同普通應用程序的窗口一樣,
2、用VisualBasic設計的窗體也具有控制菜單、標題、最大化按鈕、最小化按鈕、關(guān)閉按鈕、邊框、窗體最小化圖標等。下頁的圖2-1是我們在上一章的實例中編制出來的程序窗體,圖中標出了窗體的這些構(gòu)造,并在括號中標注了與這些構(gòu)造相關(guān)的屬性名稱,你可以在窗體設計時,通過修改這些屬性值來改變窗體的外觀。4臺州學院計算機系應建健編2.1.1窗體的構(gòu)造圖2-1窗體的構(gòu)造和對應的屬性5臺州學院計算機系應建健編2.1.2窗體的屬性窗體的常用屬性有:Name、Left、Top、Width、Height、ScaleWidth、ScaleHeight、Caption、Fon
3、t、ForeColor、BackColor、AutoRedraw、BorderStyle、ControlBox、Icon等。6臺州學院計算機系應建健編2.1.2窗體的屬性1.窗體的名稱屬性(Name屬性)屬性窗體列表中的“(名稱)”屬性,它指示了窗體的內(nèi)部名稱。VisualBasic中的任何對象都有Name屬性,每個對象的名稱各不相同,它是一個對象區(qū)別于另一個對象的標識,程序員在設計代碼時,需要用對象的名稱來引用對象。第一個窗體新建時的缺省名稱是Form1,你可以對其重命名,賦予它更加體現(xiàn)實際意義的名稱,如“MainForm”等。注意:Name屬性值
4、不會反映到界面上,但它被用于代碼中,如果在編程過程中,對象的名稱被修改,很可能使原來運用舊名稱編寫的代碼出錯,因此,改對象的名稱一般放在編制代碼前進行,在本書的大多數(shù)例程中,我們將不對對象名稱進行修改,而是使用系統(tǒng)提供的默認名稱。7臺州學院計算機系應建健編2.1.2窗體的屬性2.窗體的位置和大小屬性(Left、Top、Width、Height)如圖2-2(下頁)所示,窗體在屏幕上的位置由窗體左上角在屏幕上的坐標決定,即窗體左邊距離屏幕左邊的距離,以及窗體上邊距離屏幕上邊的距離,這兩個屬性分別是窗體的Left屬性和Top屬性。而窗體的大小則由窗體的寬和
5、窗體的高來決定,它們分別是窗體的Width屬性和Height屬性。另外,在VisualBasic中,屏幕也被當作對象來處理,它的對象名稱為Screen,屏幕具有寬和高的屬性。注意:在VisualBasic中,長度的缺省單位是twip。在缺省情況下,1twip=1/15像素=1/1440inch=1/567cm。8臺州學院計算機系應建健編2.1.2窗體的屬性圖2-2窗體在屏幕的位置和大小9臺州學院計算機系應建健編2.1.2窗體的屬性【例2-1】窗口位置和大小的設置演練:設計一個窗體,上面有兩個命令按鈕Command1和Command2,為這兩個按鈕添加
6、Click事件代碼,使得運行時單擊第一個命令按鈕,能將窗體移到屏幕的左上角,單擊第二個命令按鈕,能將窗體移到屏幕的中間,并改變窗體的大小為屏幕大小的一半。10臺州學院計算機系應建健編步驟一,界面設計。新建工程,在新窗體Form1上添加兩個命令按鈕,采用默認名稱Command1和Command2(圖2-3)。圖2-3例2-1的界面設計11臺州學院計算機系應建健編2.1.2窗體的屬性步驟二,添加事件代碼。雙擊Command1,為Command1的Click事件添加以下代碼:PrivateSubCommand1_Click()Form1.Left=0'設置
7、窗體Form1到屏幕左邊的距離為0Form1.Top=0'設置窗體Form1到屏幕上邊的距離為0EndSub注:上面代碼的單引號后的文字是對程序的注釋,以便于你理解代碼,可不用輸入。12臺州學院計算機系應建健編2.1.2窗體的屬性雙擊Command2,為Command2的Click事件添加以下代碼:PrivateSubCommand2_Click()Form1.Width=Screen.Width/2'設置窗體Form1的寬度為屏幕寬的一半Form1.Height=Screen.Height/2'設置窗體Form1的高度為屏幕高的一半Form1.Le
8、ft=(Screen.Width-Form1.Width)/2'使Form1水平居中Form1.Top=(S