沈陽農(nóng)業(yè)大學vf第八章ppt課件

1、文件文件新建新建表單表單留意：留意： 控件窗口和屬性窗口不小心關掉了，怎樣控件窗口和屬性窗口不小心關掉了，怎樣找出？找出？表單文件擴展名：表單文件擴展名：scx一一. 窗體窗體 窗體是面向?qū)ο蟮某绦蛟O計的主窗口。窗體是面向?qū)ο蟮某绦蛟O計的主窗口。窗體默認名字：窗體默認名字：formn (可以通過可以通過name屬性改名屬性改名)captionwidthheightautocenter : 自動居中自動居中 alwaysontop: 總在最前總在最前二二. 標簽控件標簽控件 標簽控件是按一定格式顯示在表單上的文本標簽控件是按一定格式顯示在表單上的文本信息信息,用來顯示表單中各種說明和提示。用來顯

2、示表單中各種說明和提示。標簽默認名字：標簽默認名字：labeln (可以通過可以通過name屬性改名屬性改名)標簽的主要屬性有標簽的主要屬性有:Caption 顯示的內(nèi)容。顯示的內(nèi)容。 Fontsize 字的大小。字的大小。 Autosize 自動調(diào)整標簽大小。自動調(diào)整標簽大小。Fontname 字體。字體。 Forecolor 字的顏色。字的顏色。Fontbold 加粗。加粗。Fontunderline 加下劃線。加下劃線。Fontitalic 傾斜。傾斜。 left 左邊距離。左邊距離。 top 頂部距離。頂部距離。三三. 計時器計時器 “計時器控件主要是利用系統(tǒng)時鐘來控制某些具有規(guī)律性、

3、周期性任務的定時操作。計時器控件默認名字：計時器控件默認名字：timern 1. interval2. enabled設置計時器觸發(fā)的時間間隔。設置計時器觸發(fā)的時間間隔。單位為毫秒。單位為毫秒。取值范圍：取值范圍：065535。.t. 計時器啟動。計時器啟動。.f. 計時器關閉。計時器關閉。 Timer Timer 事件：事件： 指定的時間每經(jīng)過指定的時間每經(jīng)過1 1次，就執(zhí)行該事件次，就執(zhí)行該事件1 1次。次。主要屬性：主要屬性：四四. 命令按鈕控件命令按鈕控件 命令按鈕控件主要用來命令按鈕控件主要用來控制程序的執(zhí)行過程和數(shù)據(jù)控制程序的執(zhí)行過程和數(shù)據(jù)表中數(shù)據(jù)的操作等。表中數(shù)據(jù)的操作等。 默認

4、名字：默認名字：commandn命令按鈕的主要屬性有命令按鈕的主要屬性有:Name 名字。名字。Caption 顯示的內(nèi)容。顯示的內(nèi)容。 Fontsize 字的大小。字的大小。 主要事件：主要事件：Click 單擊單擊五五. 文本框文本框 文本框控件主要用于數(shù)文本框控件主要用于數(shù)據(jù)表中某些字段的輸入、輸據(jù)表中某些字段的輸入、輸出，以及從窗口給內(nèi)存變量出，以及從窗口給內(nèi)存變量賦值等操作。賦值等操作。默認名字：默認名字：textn 文本框的主要屬性有文本框的主要屬性有:Name 名字。名字。Fontsize 字的大小。字的大小。 Value 初始值。初始值。例例1 ：設計一個表單，實現(xiàn)標簽文字邊移

5、：設計一個表單，實現(xiàn)標簽文字邊移動邊變色。動邊變色。 標簽默認名字為：標簽默認名字為：label1名字：名字：la內(nèi)容：太陽出來喜洋洋內(nèi)容：太陽出來喜洋洋（name屬性改名、屬性改名、caption屬性改內(nèi)容）屬性改內(nèi)容）命令按鈕標題分別為：開場、暫停、退出）命令按鈕標題分別為：開場、暫停、退出）退出按鈕的退出按鈕的click事件：事件：thisform.release開始按鈕的開始按鈕的click事件：事件：thisform.timer1.enabled=.t.暫停按鈕的暫停按鈕的click事件：事件：thisform.timer1.enabled=.f.form1的的caption改為：移

6、動變色改為：移動變色提示提示:計時器的計時器的interval設置為：設置為：300計時器的計時器的enabled設置為：設置為：.f.標簽的標簽的name改為改為la標簽的標簽的caption設置為：太陽出來喜洋洋設置為：太陽出來喜洋洋計時器計時器timer事件代碼事件代碼: if thisform.la.left=0 thisform.la.left=thisform.width else thisform.la.left=thisform.la.left-20 endifa=int(rand( )*256)b=int(rand( )*256)c=int(rand( )*256) this

7、form.la.forecolor=rgb(a,b,c)變色變色挪動挪動例例2 ：設計一個幸運七游戲，文件名字為：設計一個幸運七游戲，文件名字為my_formxy.scx。文本框：文本框：t1t2t3標簽：標簽：lbl1標簽標簽lbl1lbl1的主要屬性如下：的主要屬性如下：CaptionCaption設為空設為空thisform.t1.value=int(rand( )*10)thisform.t2.value=int(rand( )*10)thisform.t3.value=int(rand( )*10)if thisform.t1.value=7.or.thisform.t2.value

8、=7.or.thisform.t3.value=7thisform.lbl1.caption=贏贏elsethisform.lbl1.caption=輸輸endif開始按鈕開始按鈕click事件代碼如下：事件代碼如下：例例3： 設計表單，要求如下：單擊確認按鈕判設計表單，要求如下：單擊確認按鈕判斷密碼是否為斷密碼是否為aaa，是執(zhí)行幸運七游戲，否則釋，是執(zhí)行幸運七游戲，否則釋放。要求：放。要求：text1的最大長度為的最大長度為8 ，密碼輸入時顯，密碼輸入時顯示為示為*。標簽標簽文本框文本框按鈕按鈕確認按鈕確認按鈕click事件代碼：事件代碼：if thisform.text1.value=a

9、aaDo form 表單名表單名elsethisform.releaseEndif 文本框最大長度：文本框最大長度：maxlength 密碼輸入顯示密碼輸入顯示*: passwordchar提示：提示：六六. 列表框列表框列表框默認名字：列表框默認名字：listn 主要用來顯示選擇項，用戶可以從中選擇一主要用來顯示選擇項，用戶可以從中選擇一個或多個數(shù)據(jù)項。個或多個數(shù)據(jù)項。 主要屬性：主要屬性： Rowsource Rowsourcetype 當當rowsourcetype = 1 表示值源類型為值。表示值源類型為值。 通過通過rowsource寫出具體值，之間逗號相隔。寫出具體值，之間逗號相隔

10、。 當當rowsourcetype = 6 表示值源類型為字段。表示值源類型為字段。 通過通過rowsource選擇所需字段。選擇所需字段。七七. 組合框組合框 組合框組合框(combon)用于在列表框中選取數(shù)據(jù)并顯示在編輯窗口。用于在列表框中選取數(shù)據(jù)并顯示在編輯窗口。它有兩種形式它有兩種形式style): (下拉組合框可手寫下拉組合框可手寫(默許默許) (下拉列表框只能選擇下拉列表框只能選擇) 其它主要屬性：其它主要屬性： rowsourcetype和和 rowsource listindex ：指定索引值：指定索引值八八. 復選框復選框 默認名稱：默認名稱：checkn。 可以通過單擊改變

11、它的狀態(tài)?？梢酝ㄟ^單擊改變它的狀態(tài)。 復選框的主要屬性是復選框的主要屬性是: caption 顯示在復選框邊上的文本。顯示在復選框邊上的文本。 controlsource 指定數(shù)據(jù)來源。指定數(shù)據(jù)來源。 alignment 文本的位置左或右。文本的位置左或右。 value =0 表示沒有選擇復選框。表示沒有選擇復選框。 value =1 表示選中了復選框。表示選中了復選框。九九. 選項按鈕組選項按鈕組默認名字：默認名字：optiongroupn作用：它可以包含多個選項，通常用于從多項作用：它可以包含多個選項，通常用于從多項選擇中選擇其一。選擇中選擇其一。主要屬性：主要屬性： buttoncoun

12、t 指定按鈕個數(shù)指定按鈕個數(shù) value 選擇第幾個按鈕選擇第幾個按鈕按鈕組中按鈕按鈕組中按鈕(option)的主要屬性：的主要屬性： caption 顯示在按鈕邊上的文本顯示在按鈕邊上的文本留意：選項按鈕組為容器類控件，留意：選項按鈕組為容器類控件，“右鍵右鍵-編輯設編輯設置按鈕的具體屬性。置按鈕的具體屬性。 例例4：文字變化：文字變化標簽標簽2.下拉組合框下拉組合框4.選項按鈕組選項按鈕組3.復選框復選框1.列表框列表框列表框，屬性設置如下：列表框，屬性設置如下： Rowsourcetype =1 Rowsource = 黑體黑體,宋體宋體,華文行楷華文行楷,隸書隸書列表框的單擊事件列表框

13、的單擊事件(click)代碼代碼:thisform.label1.fontname= this.value1.列表框列表框?qū)傩裕簩傩裕?style=0 Rowsourcetype = 1 Rowsource = 紅紅,黃黃,綠綠,黑黑2.下拉組合框下拉組合框輸入輸入form1的的init事件代碼：事件代碼： thisformbo1.listindex=1下拉組合框下拉組合框(combo1)的的click事件代碼事件代碼:do case case this.value=紅紅 thisform.label1.forecolor=rgb(255,0,0) endcase復選框復選框1的的click事

14、件代碼事件代碼:If this.value=1Thisform.label1.fontunderline=.t.elseThisform.label1.fontunderline=.f.Endif或用或用 thisform.label1. fontunderline =.not.thisform.label1. fontunderline復選框復選框2和和3提示提示: 傾斜傾斜: fontitalic 加粗加粗: fontbold3.復選框復選框選項按鈕組的選項按鈕組的click事件代碼事件代碼:do case case this.value=1 thisform.label1.fontsiz

15、e=10 case this.value=2 thisform.label1.fontsize=20 case this.value=3 thisform.label1.fontsize=30 case this.value=4 thisform.label1.fontsize=40endcase4.選項按鈕組選項按鈕組屬性主要包括：屬性主要包括：Keyboardhighvalue 輸入的最大值；輸入的最大值；Keyboardlowvalue 輸入的最小值；輸入的最小值；Increment 每次單擊按鈕的增減值；每次單擊按鈕的增減值；Value 初始值；初始值；Spinnerhighvalue

16、 單擊按鈕所能達到的最大值；單擊按鈕所能達到的最大值；Spinnerlowvalue 單擊按鈕所能達到的最小值；單擊按鈕所能達到的最小值；例例5：用微調(diào)控制標簽文字的字號。：用微調(diào)控制標簽文字的字號。（語句寫到微調(diào)的（語句寫到微調(diào)的interactivechange事件中。）事件中。）thisform.label1.fontsize=this.value十十. 微調(diào)控件微調(diào)控件例例6：查閱學生成績情況三表聯(lián)動）。：查閱學生成績情況三表聯(lián)動）。學生學生成果成果課程課程十一十一. 表格控件表格控件設計步驟如下：設計步驟如下：（1右擊表單空白處右擊表單空白處/數(shù)據(jù)環(huán)境，數(shù)據(jù)環(huán)境， 填入學生、成果、課

17、填入學生、成果、課程三個數(shù)據(jù)表，程三個數(shù)據(jù)表， 并連線。并連線。（2將三個數(shù)據(jù)表分別拖入表單中。將三個數(shù)據(jù)表分別拖入表單中。（3適當調(diào)整三個表格的寬度，運轉(zhuǎn)。適當調(diào)整三個表格的寬度，運轉(zhuǎn)。默認名字：默認名字： pageframen頁框控件主要屬性頁框控件主要屬性: pagecount 頁數(shù)頁數(shù)頁框中每一頁如第一頁為頁框中每一頁如第一頁為: pageframe1.page1對于每一頁主要屬性對于每一頁主要屬性: caption 頁標題頁標題留意留意:頁框控件為容器類控件，頁框控件為容器類控件，需按右鍵需按右鍵編輯進入每一頁。編輯進入每一頁。十二十二. 頁框控件頁框控件默認名字：默認名字：imag

18、en主要屬性主要屬性: 1. picture 圖片圖片 2. stretch 填充方式填充方式 十三十三. 圖像控件圖像控件例例7：制作美景欣賞。：制作美景欣賞。一般用于數(shù)據(jù)表中備注型字段的顯示。一般用于數(shù)據(jù)表中備注型字段的顯示。一般用于數(shù)據(jù)表中通用型字段的顯示。一般用于數(shù)據(jù)表中通用型字段的顯示。是包含一組命令按扭的容器，其作用與命令按扭是包含一組命令按扭的容器，其作用與命令按扭相同。相同。十四十四. 編輯框編輯框(editn)十五十五. Activex綁定綁定十六十六.命令按鈕組命令按鈕組(commandgroupn)例例8小型學生信息管理系統(tǒng)小型學生信息管理系統(tǒng)重點掌握：各控件與數(shù)據(jù)表之間

19、的鏈接重點掌握：各控件與數(shù)據(jù)表之間的鏈接設計界面如下：設計界面如下：文本框文本框組合框組合框單選鈕單選鈕復選框復選框Activex綁定綁定編輯框編輯框按鈕組按鈕組設計提示：設計提示：1.設計界面設計界面2.進入數(shù)據(jù)環(huán)境，填入進入數(shù)據(jù)環(huán)境，填入“學生表學生表3.分別設計各控件的分別設計各控件的controlsource屬性屬性4.組合框還需設組合框還需設: rowsourcetype 為字段為字段 rowsource為相應的字段為相應的字段5.按鈕組的單擊事件為按鈕組的單擊事件為: do case case this.value=1 go 1 case this.value=2 skip -1

20、if bof( ) go 1 endifcase this.value=3 skip if eof( ) go bottom endifcase this.value=4 go bottom endcase Thisform.refresh向?qū)П韱?利用表單向?qū)?chuàng)建表單利用表單向?qū)?chuàng)建表單例例9:利用表單向?qū)е谱饕粋€表單，要求選擇利用表單向?qū)е谱饕粋€表單，要求選擇xsda表中所有字段，表單樣式為陰影式，按鈕表中所有字段，表單樣式為陰影式，按鈕類型為圖片按鈕，排序字段選擇學號升序類型為圖片按鈕，排序字段選擇學號升序,表表單標題為單標題為:學生數(shù)據(jù)輸入維護學生數(shù)據(jù)輸入維護.最后將表單存放最后將表單

21、存放在在D盤下盤下,表單文件名為表單文件名為Xs2。表單練習表單練習1設計一個名為設計一個名為 my_forma的表單的表單,實現(xiàn)實現(xiàn)加減乘除計算。（再把標簽換成文本框?qū)崿F(xiàn)。）加減乘除計算。（再把標簽換成文本框?qū)崿F(xiàn)。）標簽：名字為：標簽：名字為：la autosize=.t.微調(diào)：微調(diào)：名字分別為：名字分別為：s1、s2 ，初值：，初值：10，最小值最小值1，最大值，最大值100。 do casecase this.value=1thisform.la.caption=str(thisform.s1.value+thisform.s2.value)case this.value=2thisform.la.caption=str(