表單的設(shè)計基礎(chǔ)課件

第九章表單設(shè)計基礎(chǔ)11/24/20221第九章表單設(shè)計基礎(chǔ)10/11/20221向?qū)ο蟮幕靖拍?．對象(Object)對象可以是現(xiàn)實世界中的任何物體，例如一扇窗戶可以作為對象，一輛汽車可以作為對象，一臺計算機(jī)可以作為對象。對象都具有一定的屬性、特征，并可以產(chǎn)生一定的行為。2.類(Class)類是對一組相似對象的性質(zhì)描述，這些對象具有相同種類的屬性和方法。類決定了對象的特征，所有對象的屬性、事件和方法程序在定義類時被指定。有了類的定義后，就可以基于類生成這類對象的任何一個對象。11/24/20222向?qū)ο蟮幕靖拍?0/11/202223.屬性屬性即對象的特性，是對象的外觀及行為的特征。在VisualFoxPro中，各種對象具有70多個屬性。對象的屬性可以在建立對象時由其所屬的類(或子類)中繼承，也可以在對象創(chuàng)建或運(yùn)行時進(jìn)行修改與設(shè)置。11/24/202233.屬性10/11/202234.事件事件是對象可以識別和響應(yīng)的行為與操作，用戶可以編寫相應(yīng)的代碼對此進(jìn)行響應(yīng)。某一個對象發(fā)生什么事情的時候,執(zhí)行相應(yīng)的代碼面向?qū)ο蟮某绦蛟O(shè)計林一凡(對象)電話響了(事件)---林一凡.接電話(代碼)按紐(對象)被左鍵點擊(click事件)—this.release彈出窗口(代碼)

11/24/202244.事件10/11/202245.方法方法是對象可以執(zhí)行的動作，是封裝在對象內(nèi)部的，在任何時候都不能獨(dú)立存在于對象之外。在VisualFoxPro中提供了50多種不同的方法，每種方法都有自己的名稱，稱為方法名。VisualFoxPro中不同的對象具有不同的方法，與事件不同的是，方法程序集合可以無限擴(kuò)展，除了在各個類中已定義的方法外，可以根據(jù)需要自定義方法(向類中添加新方法)，以完成相應(yīng)的操作，新建的方法屬于表單或表單集。11/24/202255.方法10/11/202259.2表單的設(shè)計與運(yùn)行

表單(Form)是VisualFoxPro提供的用于建立應(yīng)用程序界面的最主要的工具之一。表單相當(dāng)于WINDOWS應(yīng)用程序的窗口

9.2.2利用表單向?qū)?chuàng)建表單表單有兩個擴(kuò)展名，一個為.SCX（表單文件），另一個為.SCT（表單備注文件）。在VisualFoxPro中，新建表單一般可以通過以下兩種方法：使用表單向?qū)АＪ褂谩氨韱卧O(shè)計器”。11/24/202269.2表單的設(shè)計與運(yùn)行表單(Form1.使用表單向?qū)?chuàng)建單表表單：（1）單擊工具欄上的“新建”按鈕，或選擇“文件”菜單中的“新建”命令，打開新建對話框，在新建對話框中的“文件類型”中選擇表單，單擊“向?qū)А卑粹o。（2）在“向?qū)нx取”對話框中選擇“表單向?qū)А保瑔螕簟按_定”按鈕。

11/24/2022710/11/20227（3）使用“表單向?qū)А钡谝徊?，選取字段。（4）使用“表單向?qū)А钡诙?，選取表單樣式。（5）使用“表單向?qū)А钡谌?，選擇排序字段。（6）使用“表單向?qū)А钡谒牟?，輸入表單?biāo)題。（7）用“表單向?qū)А痹O(shè)計的表單如圖所示。11/24/20228（3）使用“表單向?qū)А钡谝徊?，選取字段。10/11/20222.使用表單向?qū)?chuàng)建一對多多表表單：（1）單擊工具欄上的“新建”按鈕，或選擇“文件”菜單中的“新建”命令，打開新建對話框，在新建對話框中的“文件類型”中選擇表單，單擊“向?qū)А卑粹o。（2）在“向?qū)нx取”對話框中選擇“一對多表單向?qū)А?，單擊“確定”按鈕。

11/24/202292.使用表單向?qū)?chuàng)建一對多多表表單：10/11/20229（3）使用“表單向?qū)А钡谝徊?，選取父表字段。（4）使用“表單向?qū)А钡诙?，選取子表字段。（5）使用“表單向?qū)А钡谌?，關(guān)聯(lián)兩個表，選取匹配字段（5）使用“表單向?qū)А钡谒牟?，選取樣式。（5）使用“表單向?qū)А钡谖宀?，選擇排序字段。（6）使用“表單向?qū)А钡诹?，輸入表單?biāo)題。（7）用“表單向?qū)А痹O(shè)計的表單如圖所示。11/24/202210（3）使用“表單向?qū)А钡谝徊?，選取父表字段。10/11/209.2.3利用表單設(shè)計器設(shè)計表單1.使用表單設(shè)計器創(chuàng)建表單：單擊工具欄上的“新建”按鈕，或選擇“文件”菜單中的“新建”命令，打開新建對話框，在新建對話框中的“文件類型”中選擇表單，單擊“新建文件”按鈕。打開表單設(shè)計器窗口,里面生成一張空白的表單11/24/2022119.2.3利用表單設(shè)計器設(shè)計表單1.使用表單設(shè)計器創(chuàng)建表單２．表單設(shè)計器工具欄11/24/202212２．表單設(shè)計器工具欄10/11/2022123.屬性窗口在VisualFoxPro中，每個對象都可以用一組屬性來刻畫其特征，每個屬性都有屬性值，改變屬性值就相當(dāng)于改變了對象的特征。屬性值的設(shè)置可以通過屬性窗口來進(jìn)行，也可以在程序運(yùn)行時動態(tài)設(shè)置。如果屏幕上沒有顯示屬性窗口，可以單擊表單設(shè)計工具欄中的“屬性窗口”按鈕，或者在表單中選定某個對象，然后在該對象上右擊鼠標(biāo)，從彈出的快捷菜單中選擇“屬性”命令，就會出現(xiàn)屬性窗口。11/24/2022133.屬性窗口10/11/202213屬性窗口包含對象框、選項卡、屬性設(shè)置框、屬性、方法、事件列表框和屬性描述等部分：11/24/202214屬性窗口包含對象框、選項卡、屬性設(shè)置框、屬性、方法、事件列表例9.2通過屬性窗口設(shè)置屬性，建立如圖所示的表單。設(shè)置屬性過程如下：(1)在表單設(shè)計器中單擊表單，使其成為當(dāng)前對象，從屬性窗口的屬性列表中選擇Caption屬性，將其值設(shè)為“歡迎表單”。(2)在表單中新建一個標(biāo)簽(顯示文本)使其成為當(dāng)前對象，從屬性窗口的屬性列表中選擇Caption屬性，將其值設(shè)為“武漢歡迎你們！”選擇FontSize屬性，將其值設(shè)為28；選擇FontName屬性，將其值設(shè)為“華文彩云”。

11/24/202215例9.2通過屬性窗口設(shè)置屬性，建立如圖所示的表單。10/4.代碼窗口VisualFoxPro是一種面向?qū)ο蟮木幊陶Z言，它支持事件響應(yīng)編程方法，通過代碼窗口來幫助程序員編寫各個對象的事件代碼。每個對象都能響應(yīng)的事件，例如：一個按鈕，當(dāng)被鼠標(biāo)坐鍵點擊這個事件，做什么？選擇該按鈕—代碼窗口—click事件——寫入要做什么的代碼，例如：thisform.release表單中的每個控件對象都有自己的代碼窗口，用于響應(yīng)各種事件。打開對象的代碼窗口有多種方法：在對象上雙擊鼠標(biāo)，或者單擊表單設(shè)計器工具欄上的代碼窗口的圖標(biāo)，都可彈出代碼窗口，代碼窗口如圖所示。11/24/2022164.代碼窗口10/11/20221611/24/20221710/11/202217代碼窗口包括對象列表框、過程列表框、事件編輯框三個部分（1）“對象”列表框此列表框中列出當(dāng)前表單或表單集的所有對象，選中某個對象就切換到該對象的代碼事件。（2）“過程”列表框此列表框列出了所選對象的全部事件，當(dāng)用戶從“列表框”中選中一個事件后編寫代碼，這編好的代碼就屬于該時間。（3）代碼編輯框代碼窗口的主體部分是代碼編輯框，用戶在此編輯框中編寫相應(yīng)事件的代碼。

11/24/202218代碼窗口包括對象列表框、過程列表框、事件編輯框三個部分10/例9.3在代碼窗口設(shè)置標(biāo)簽控件的屬性執(zhí)行:在代碼窗口選擇對象為標(biāo)簽label1,事件為init在里面寫入以下代碼:ThisForm.Label1.Caption=“武漢歡迎你們”ThisForm.Label1.FontName=“華文彩云”ThisForm.Label1.FontSize=28此代碼寫在click事件的里的效果如何?11/24/202219例9.3在代碼窗口設(shè)置標(biāo)簽控件的屬性執(zhí)行:10/11/202例9.4根據(jù)程序運(yùn)行情況動態(tài)改變控件屬性執(zhí)行:

在當(dāng)前表單中新建一個文本框Text1(可以輸入,顯示文本,連接數(shù)據(jù)源),把標(biāo)簽Label1的Caption屬性值設(shè)置成為文本框的當(dāng)前值value.在代碼窗口選擇對象為標(biāo)簽label1的click事件在里面寫入以下代碼:ThisForm.Label1.Caption=ThisForm.text1.Value11/24/202220例9.4根據(jù)程序運(yùn)行情況動態(tài)改變控件屬性執(zhí)行:10/11/2例9.5在運(yùn)行時調(diào)用方法程序執(zhí)行:在代碼窗口里選擇表單form1為對象,事件click里寫入代碼:ThisForm.HideThisform.releaseThisform.showThisform.refreshThisform.setfocusHide方法,對象的行為11/24/202221例9.5在運(yùn)行時調(diào)用方法程序執(zhí)行:10/11/2022215.表單控件工具欄6.調(diào)色板工具欄11/24/2022225.表單控件工具欄10/11/2022227.布局工具欄8.表單菜單布局工具欄表單菜單11/24/2022237.布局工具欄布局工具欄9.數(shù)據(jù)環(huán)境設(shè)計器利用表單設(shè)計器設(shè)計操作數(shù)據(jù)庫或數(shù)據(jù)表中的數(shù)據(jù)表單時，需要為所設(shè)計的表單設(shè)置相關(guān)的數(shù)據(jù)源，而數(shù)據(jù)環(huán)境就包含了與表單有聯(lián)系的數(shù)據(jù)表以及表之間的關(guān)系。在通常情況下，數(shù)據(jù)環(huán)境中的表會隨著表單的打開或運(yùn)行而打開，并隨著表單的關(guān)閉或釋放而關(guān)閉。11/24/2022249.數(shù)據(jù)環(huán)境設(shè)計器10/11/202224設(shè)置如下表單：返回11/24/202225設(shè)置如下表單：返回10/11/2022251、打開數(shù)據(jù)環(huán)境打開數(shù)據(jù)環(huán)境有多種方式在表單設(shè)計窗口中右擊鼠標(biāo)，從出現(xiàn)的快捷菜單中選擇“數(shù)據(jù)環(huán)境”單擊表單設(shè)計器工具欄上的“數(shù)據(jù)環(huán)境”按鈕，11/24/2022261、打開數(shù)據(jù)環(huán)境10/11/202226在數(shù)據(jù)環(huán)境中添加表（1）在數(shù)據(jù)環(huán)境設(shè)計器窗口中單擊右鍵，在快捷菜單中選擇“添加”命令，選擇要添加的表。（2）單擊對話框中的“添加”按鈕，就將表添加到數(shù)據(jù)環(huán)境窗口中。也可以選擇“其他”，在“打開”對話框中選擇要添加的表，再按“確定”按鈕就可以添加其它數(shù)據(jù)庫中的表或其它自由表。按同樣方法添加多個表或視圖，添加完畢后。單擊“關(guān)閉”按鈕在數(shù)據(jù)環(huán)境窗口就會顯示選定的表和視圖及表中的字段和索引。11/24/202227在數(shù)據(jù)環(huán)境中添加表10/11/202227移去表或視圖（1）在“數(shù)據(jù)環(huán)境”窗口中，單擊準(zhǔn)備移去的表或視圖，被選中的表或視圖呈高亮度顯示。（2）單擊右鍵，選擇“移去”命令，即從數(shù)據(jù)環(huán)境中移去該表或視圖。注意：當(dāng)表從數(shù)據(jù)環(huán)境中移去后，與該表相關(guān)的所有關(guān)系也隨之消失。11/24/202228移去表或視圖10/11/2022282.在數(shù)據(jù)環(huán)境中設(shè)置關(guān)系若添加到數(shù)據(jù)環(huán)境中的表是數(shù)據(jù)庫表且已經(jīng)建立了表間的永久關(guān)系，則這些永久關(guān)系將自動添加到數(shù)據(jù)環(huán)境中。若數(shù)據(jù)表之間永久關(guān)系不存在，則可在數(shù)據(jù)環(huán)境設(shè)計器中建立關(guān)系方法：在數(shù)據(jù)環(huán)境設(shè)計器中父表的連接字段拖動到子表與其匹配字段的索引標(biāo)記上。11/24/2022292.在數(shù)據(jù)環(huán)境中設(shè)置關(guān)系若添加到數(shù)據(jù)環(huán)境中的表是數(shù)據(jù)庫表且已3．向表單添加字段VisualFoxPro允許用戶直接從數(shù)據(jù)環(huán)境中把表、視圖或字段拖到表單上，系統(tǒng)會根據(jù)字段類型自動創(chuàng)建相應(yīng)的控件，同時還添加一個說明性的標(biāo)簽控件。如果拖到表單上的字段為字符型，系統(tǒng)將產(chǎn)生一個文本框控件；如果是邏輯型字段，系統(tǒng)會產(chǎn)生一個復(fù)選框控件；如果是備注型字段，系統(tǒng)會產(chǎn)生一個編輯框控件；如果是表，系統(tǒng)會產(chǎn)生一個表格控件

11/24/2022303．向表單添加字段10/11/202230查看字段控件屬性和表屬性同時系統(tǒng)設(shè)置數(shù)據(jù)源屬性:將控件和相應(yīng)的數(shù)據(jù)源綁定在一起.字段控件ControlSource屬性為:學(xué)生.學(xué)號表控件RecordSource屬性為:成績11/24/202231查看字段控件屬性和表屬性同時系統(tǒng)設(shè)置數(shù)據(jù)源屬性:將控件和相應(yīng)給表單添加按鈕瀏覽表記錄（圖）（1）在表單上新建三個按鈕command1，command2，command3（2）修改三個按鈕的caption屬性為“上一條”，“下一條”“退出”（3）在command2按鈕（即下一條）的代碼窗口click事件里寫入：ifeof()messagebox(“這是最后一條記錄”)elseskip1endifThisform.refresh11/24/202232給表單添加按鈕瀏覽表記錄（圖）Thisform.refre(4)在command1按鈕（即上一條）的代碼窗口click事件里寫入：ifbof()messagebox(“這是第一條記錄”)elseskip–1thisform.refreshendif(5)在command3按鈕（即退出）的代碼窗口click事件里寫入：thisform.release11/24/202233(4)在command1按鈕（即上一條）的代碼窗口clic控件類對象表單中有兩類控件，綁定型控件和非綁定型控件。綁定型控件通過設(shè)置數(shù)據(jù)源屬性與數(shù)據(jù)綁定，數(shù)據(jù)源可以是表中的一個字段、臨時表的字段、一個變量或表中的一列，可以在屬性窗口設(shè)置相應(yīng)控件的數(shù)據(jù)源屬性，也可以通過對數(shù)據(jù)環(huán)境的操作自動綁定數(shù)據(jù)源。

11/24/202234控件類對象10/11/2022341標(biāo)簽(Label)標(biāo)簽是最常用的一種控件，用來顯示文本。可以在程序代碼中通過重新設(shè)置Caption屬性修改標(biāo)簽顯示的文本。標(biāo)簽顯示的文本最多能容納256個字符。標(biāo)簽控件的常用屬性：11/24/2022351標(biāo)簽(Label)10/11/202235Thisform.label1.caption=“歡迎使用VFP”如果代碼窗口當(dāng)前對象即是label1,也可以:This.caption=“歡迎使用VFP”11/24/202236Thisform.label1.caption=“歡迎使用V2文本框(Text)與標(biāo)簽不同，文本框有自己的數(shù)據(jù)源，并可以進(jìn)行輸入和修改。文本框通常以表的一個字段或一個內(nèi)存變量作為自己的數(shù)據(jù)源。文本框一般只包含單行數(shù)據(jù)。文本框幾乎可以編輯任何類型的數(shù)據(jù)，如數(shù)值型、字符型、邏輯型、日期型等。11/24/2022372文本框(Text)10/11/202237文本框的常用屬性：11/24/202238文本框的常用屬性：10/11/202238Alignment屬性指定了文本在控件中的對齊方式：Inputmask屬性指定在一個文本框中如何輸入和顯示數(shù)據(jù)X允許輸入任何字符9允許輸入數(shù)字和正符號#允許輸入數(shù)字,空格和正負(fù)號.指定小數(shù)點的位置11/24/202239Alignment屬性指定了文本在控件中的對齊方式：文本框常用事件和方法11/24/202240文本框常用事件和方法10/11/202240例:用表單設(shè)計一個登陸界面,當(dāng)用戶輸入用戶名和口令按確認(rèn)按鈕后,驗證若正確,就顯示”歡迎使用本系統(tǒng)”,然后關(guān)閉表單,若不正確,則顯示”用戶口令不對,請重新輸入”,如三次輸入不正確,就顯示”用戶口令不對,登錄失敗”關(guān)閉表單.(口令為6位數(shù)字,輸入時顯示為*)

11/24/202241例:用表單設(shè)計一個登陸界面,當(dāng)用戶輸入用戶名和口令按確認(rèn)按鈕執(zhí)行:1.設(shè)置label1,label2,command1的caption屬性為”用戶名:”,”口令:”,”確認(rèn)”2.設(shè)置text2的Inputmask屬性為999999,Passwordchar屬性為*3.設(shè)置command1的Default屬性為.T.(回車相當(dāng)與單擊該按鈕).4.給Form1新建一個屬性num（表單菜單—新建屬性）,修改該屬性的默認(rèn)值為0，用于存放登錄輸入的次數(shù)(該屬性在Form1創(chuàng)建時分配空間,釋放時釋放空間,類似于普通的內(nèi)存變量)使用:thisform.num11/24/202242執(zhí)行:1.設(shè)置label1,label2,command15.在按鈕command1的click事件寫入:ifthisform.text1.value="alice"andthisform.text2.value="971105"wait"歡迎使用本系統(tǒng)"windowtimeout3thisform.releaseelsethisform.num=thisform.num+1

ifthisform.num=3wait"用戶名不對，登陸失??！"windowtimeout3thisform.release

elsewait"用戶名或口令不正確，請重新輸入！"windowtimeout3

endifendif11/24/2022435.在按鈕command1的click事件寫入:10/11/5.7.3編輯框(Edit)文本框只能編輯一行文本，在使用上有一定的局限性，在編輯框中允許編輯長字段或備注字段文本，允許自動換行并能用方向鍵、PageUp鍵和PageDown鍵以及滾動條來瀏覽文本。編輯框的與文本框的使用方法基本一致。屬性value存放編輯框當(dāng)前的值位置從0開始11/24/2022445.7.3編輯框(Edit)位置從10/11/20224例:設(shè)計一個表單,單擊按鈕在編輯框里文字里搜索單詞”example”

1.編輯框edit1的Hideselection屬性值為.F.(選定的字符串會顯示成選定狀態(tài))11/24/202245例:設(shè)計一個表單,單擊按鈕在編輯框里文字里搜索單詞”exam2.在命令按鈕command1的click事件里寫入代碼:n=at("example",thisform.edit1.value)ifn!=0thisform.edit1.selstart=n-1thisform.edit1.sellength=7elsemessagebox("nothisword",0,"auction")endif11/24/2022462.在命令按鈕command1的click事件里寫入代碼:15.7.4命令按鈕(Command)命令按鈕通常用來進(jìn)行某一個操作，執(zhí)行某個事件代碼，完成特定的功能，如確定、退出、計算、查詢等，是最常用的控件之一。命令按鈕的常用屬性：11/24/2022475.7.4命令按鈕(Command)10/11/20225.7.5復(fù)選框(check)復(fù)選框可以用來指定一個邏輯狀態(tài)，可以提供兩個值的選擇，“真”或“假”，復(fù)選框被選中時在方框內(nèi)顯示一個“”，否則方框內(nèi)為空。但有時問題不能簡單地分為“真”或“假”，如不確定，可以用NULL來表示，此時復(fù)選框變?yōu)榛疑?1/24/2022485.7.5復(fù)選框(check)10/11/202248Value屬性的設(shè)置值屬性值說明0或.F.復(fù)選框未選中,默認(rèn)值1或.T.復(fù)選框選中2或.NULL.不確定,只在代碼中有效11/24/202249Value屬性的設(shè)置值屬性值說明0或.F.復(fù)選框未選中,默認(rèn)例5.19設(shè)計一個可以設(shè)置文本框字體大小和字體格式的表單.

1.創(chuàng)建兩個形狀shape1和shape2控件,specialeffect屬性設(shè)置為0-3維11/24/202250例5.19設(shè)計一個可以設(shè)置文本框字體大小和字體格式的表單.

2.編寫代碼(1)在復(fù)選框check1的click事件里寫入:ifthis.value=1thisform.text1.fontbold=.t.elsethisform.text1.fontbold=.f.endif11/24/2022512.編寫代碼10/11/202251(2)在復(fù)選框check2的click事件里寫入:ifthis.value=1thisform.text1.fontitalic=.t.elsethisform.text1.fontitalic=.f.endif11/24/202252(2)在復(fù)選框check2的click事件里寫入:10/11(3)在復(fù)選框check3的click事件里寫入:ifthis.value=1thisform.text1.fontunderline=.t.elsethisform.text1.fontunderline=.f.endif11/24/202253(3)在復(fù)選框check3的click事件里寫入:10/11(4)命令按鈕command1的click事件寫入:thisform.text1.fontsize=thisform.text1.fontsize+1thisform.refresh(5)命令按鈕command2的click事件寫入:thisform.text1.fontsize=thisform.text1.fontsize+1thisform.refresh11/24/202254(4)命令按鈕command1的click事件寫入:10/15.7.6列表框(list)列表框可以為用戶提供一組預(yù)先設(shè)定的選項。列表框能夠同時顯示的項數(shù)受列表區(qū)域大小的限制，通過垂直滾動條可以瀏覽所有條目

11/24/2022555.7.6列表框(list)10/11/202255列表框常用屬性

11/24/202256列表框常用屬性

10/11/202256Rowsourcetype屬性的設(shè)置值11/24/202257Rowsourcetype屬性的設(shè)置值10/11/20225列表框的事件和方法11/24/202258列表框的事件和方法10/11/202258例5.20顯示學(xué)生所有的信息11/24/202259例5.20顯示學(xué)生所有的信息10/11/2022591.List1的Rowsourcetype屬性設(shè)為6,Rowsource屬性設(shè)為學(xué)生.姓名2.List1的Interactivechange事件代碼:Thisform.refresh11/24/2022601.List1的Rowsourcetype屬性設(shè)為6,Row5.7.7組合框(combo)組合框兼有列表框和文本框的功能，也可以接受從鍵盤輸入的數(shù)據(jù)，有下拉列表框和下拉組合框兩種形式。除了與列表框相同的屬性外，組合框其它的常用屬性0組合框(可選擇,可輸入)2下拉列表框(只能選擇)11/24/2022615.7.7組合框(combo)0組合框(可選擇,可輸入例5.22創(chuàng)建一個求指定班級平均成績的表單,要求:(1)組合框里選擇班級(學(xué)號的左四位)后,表單將自動顯示對應(yīng)班級學(xué)生的平均成績,(2)按”退出”按鈕,自動關(guān)閉表單11/24/202262例5.22創(chuàng)建一個求指定班級平均成績的表單,要求:(1)組合編寫代碼:1.Combo1的Init事件代碼:indexonleft(學(xué)號,4)toxhuniquescanthis.additem(left(學(xué)號,4))endscansetindexto2.在Combo1的InterActiveChange事件里:Average成績forleft(學(xué)號,4)=this.valueTOcjthisform.text1.value=cj11/24/202263編寫代碼:10/11/2022635.7.8計時器(timer)計時器控件允許以一定的時間間隔重復(fù)地執(zhí)行某種操作。它通過檢查系統(tǒng)時鐘，確定是否到了該執(zhí)行某一任務(wù)的時間。注意：在表單設(shè)計時，計時器在表單中是可見的；但運(yùn)行時，計時器是不可見的。計時器的常用屬性和事件11/24/2022645.7.8計時器(timer)10/11/202264例5.3創(chuàng)建一個數(shù)字時鐘表單,要求(1)表單以1秒為時間間隔動態(tài)顯示系統(tǒng)時間,”時分秒”3個中文字顯示,(2)當(dāng)秒數(shù)為奇數(shù)時前景色為藍(lán)色,為偶數(shù)時為紅色.11/24/202265例5.3創(chuàng)建一個數(shù)字時鐘表單,要求(1)表單以1秒為時間間隔1.Timer1的Interval屬性設(shè)為”1000”每隔1秒就會執(zhí)行time事件里的代碼.2.Timer1的time事件里寫入代碼:s=substr(time(),1,2)f=substr(time(),4,2)m=substr(time(),7,2)mn=val(m)ifmod(mn,2)=0thisform.text1.forecolor=rgb(255,0,0)elsethisform.text1.forecolor=rgb(0,0,255)

endifthisform.text1.value=s+"時"+f+"分"+m+"秒"thisform.text1.fontsize=2419:19:38根據(jù)紅綠藍(lán)顏色成份返回一個顏色值11/24/2022661.Timer1的Interval屬性設(shè)為”1000”19:5.8.3選項按鈕組(optiongroup)選項按鈕組是包含多個選項按鈕的容器對象，它將預(yù)定義的選項組提供給用戶，供用戶選擇，允許用戶從一組指定的操作選項中選擇一個。11/24/2022675.8.3選項按鈕組(optiongroup)10/111.選項按鈕及選項按鈕組的常用屬性：2.選項按鈕及選項按鈕組的常用事件：Click事件。11/24/2022681.選項按鈕及選項按鈕組的常用屬性：10/11/202268例.設(shè)計分專業(yè)統(tǒng)計學(xué)生人數(shù)表單,選擇某一專業(yè)選項時,文本框顯示該專業(yè)人數(shù).

1.把學(xué)生.dbf(包含專業(yè)字段)添加到數(shù)據(jù)環(huán)境.11/24/202269例.設(shè)計分專業(yè)統(tǒng)計學(xué)生人數(shù)表單,選擇某一專業(yè)選項時,文本框顯2.選項按鈕組OptionGroup1的click事件寫入:docase

casethis.value=1countfor專業(yè)="信息管理"toxthisform.text1.value=xcasethis.value=2countfor專業(yè)="計算機(jī)應(yīng)用"toythisform.text1.value=ycasethis.val