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

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

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

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

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

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

6、動變色改為：移動變色提示提示:計時器的計時器的interval設(shè)置為：設(shè)置為：300計時器的計時器的enabled設(shè)置為：設(shè)置為：.f.標(biāo)簽的標(biāo)簽的name改為改為la標(biāo)簽的標(biāo)簽的caption設(shè)置為：太陽出來喜洋洋設(shè)置為：太陽出來喜洋洋計時器計時器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 ：設(shè)計一個幸運七游戲，文件名字為：設(shè)計一個幸運七游戲，文件名字為my_formxy.scx。文本框：文本框：t1t2t3標(biāo)簽：標(biāo)簽：lbl1標(biāo)簽標(biāo)簽lbl1lbl1的主要屬性如下：的主要屬性如下：CaptionCaption設(shè)為空設(shè)為空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： 設(shè)計表單，要求如下：單擊確認(rèn)按鈕判設(shè)計表單，要求如下：單擊確認(rèn)按鈕判斷密碼是否為斷密碼是否為aaa，是執(zhí)行幸運七游戲，否則釋，是執(zhí)行幸運七游戲，否則釋放。要求：放。要求：text1的最大長度為的最大長度為8 ，密碼輸入時顯，密碼輸入時顯示為示為*。標(biāo)簽標(biāo)簽文本框文本框按鈕按鈕確認(rèn)按鈕確認(rèn)按鈕click事件代碼：事件代碼：if thisform.text1.value=a

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

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

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

12、t 指定按鈕個數(shù)指定按鈕個數(shù) value 選擇第幾個按鈕選擇第幾個按鈕按鈕組中按鈕按鈕組中按鈕(option)的主要屬性：的主要屬性： caption 顯示在按鈕邊上的文本顯示在按鈕邊上的文本留意：選項按鈕組為容器類控件，留意：選項按鈕組為容器類控件，“右鍵右鍵-編輯設(shè)編輯設(shè)置按鈕的具體屬性。置按鈕的具體屬性。 例例4：文字變化：文字變化標(biāo)簽標(biāo)簽2.下拉組合框下拉組合框4.選項按鈕組選項按鈕組3.復(fù)選框復(fù)選框1.列表框列表框列表框，屬性設(shè)置如下：列表框，屬性設(shè)置如下： 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復(fù)選框復(fù)選框1的的click事

14、件代碼事件代碼:If this.value=1Thisform.label1.fontunderline=.t.elseThisform.label1.fontunderline=.f.Endif或用或用 thisform.label1. fontunderline =.not.thisform.label1. fontunderline復(fù)選框復(fù)選框2和和3提示提示: 傾斜傾斜: fontitalic 加粗加粗: fontbold3.復(fù)選框復(fù)選框選項按鈕組的選項按鈕組的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、 單擊按鈕所能達(dá)到的最大值；單擊按鈕所能達(dá)到的最大值；Spinnerlowvalue 單擊按鈕所能達(dá)到的最小值；單擊按鈕所能達(dá)到的最小值；例例5：用微調(diào)控制標(biāo)簽文字的字號。：用微調(diào)控制標(biāo)簽文字的字號。（語句寫到微調(diào)的（語句寫到微調(diào)的interactivechange事件中。）事件中。）thisform.label1.fontsize=this.value十十. 微調(diào)控件微調(diào)控件例例6：查閱學(xué)生成績情況三表聯(lián)動）。：查閱學(xué)生成績情況三表聯(lián)動）。學(xué)生學(xué)生成果成果課程課程十一十一. 表格控件表格控件設(shè)計步驟如下：設(shè)計步驟如下：（1右擊表單空白處右擊表單空白處/數(shù)據(jù)環(huán)境，數(shù)據(jù)環(huán)境， 填入學(xué)生、成果、課

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

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

19、的鏈接重點掌握：各控件與數(shù)據(jù)表之間的鏈接設(shè)計界面如下：設(shè)計界面如下：文本框文本框組合框組合框單選鈕單選鈕復(fù)選框復(fù)選框Activex綁定綁定編輯框編輯框按鈕組按鈕組設(shè)計提示：設(shè)計提示：1.設(shè)計界面設(shè)計界面2.進(jìn)入數(shù)據(jù)環(huán)境，填入進(jìn)入數(shù)據(jù)環(huán)境，填入“學(xué)生表學(xué)生表3.分別設(shè)計各控件的分別設(shè)計各控件的controlsource屬性屬性4.組合框還需設(shè)組合框還需設(shè): rowsourcetype 為字段為字段 rowsource為相應(yīng)的字段為相應(yīng)的字段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表中所有字段，表單樣式為陰影式，按鈕表中所有字段，表單樣式為陰影式，按鈕類型為圖片按鈕，排序字段選擇學(xué)號升序類型為圖片按鈕，排序字段選擇學(xué)號升序,表表單標(biāo)題為單標(biāo)題為:學(xué)生數(shù)據(jù)輸入維護(hù)學(xué)生數(shù)據(jù)輸入維護(hù).最后將表單存放最后將表單

21、存放在在D盤下盤下,表單文件名為表單文件名為Xs2。表單練習(xí)表單練習(xí)1設(shè)計一個名為設(shè)計一個名為 my_forma的表單的表單,實現(xiàn)實現(xiàn)加減乘除計算。（再把標(biāo)簽換成文本框?qū)崿F(xiàn)。）加減乘除計算。（再把標(biāo)簽換成文本框?qū)崿F(xiàn)。）標(biāo)簽：名字為：標(biāo)簽：名字為：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(