《Visual FoxPro6.0程序設(shè)計(jì)教程》課件第5章

任務(wù)5.1條件選擇語句

任務(wù)5.2選擇性控件、計(jì)時(shí)器、微調(diào)器

任務(wù)導(dǎo)入

學(xué)習(xí)目標(biāo)

任務(wù)實(shí)施

1.單條件選擇語句IF的語法格式

單條件選擇語句IF實(shí)現(xiàn)的是最常用的雙分支選擇，其特點(diǎn)是：根據(jù)所給定的選擇條件(條件表達(dá)式)的值為真與否，來執(zhí)行相應(yīng)的分支。任務(wù)5.1條件選擇語句建立用戶界面與設(shè)置對(duì)象屬性，如圖5-1所示。

運(yùn)行程序，結(jié)果如圖5-2所示。圖5-1建立用戶界面與設(shè)置對(duì)象屬性圖5-2運(yùn)行結(jié)果

(1)建立應(yīng)用程序用戶界面。

選擇“新建”表單，進(jìn)入表單設(shè)計(jì)器，增加3個(gè)文本框Text1～Text3、一個(gè)命令按鈕Command1和4個(gè)標(biāo)簽Label1～Label4，如圖5-3所示。

(2)設(shè)置對(duì)象屬性。

屬性設(shè)置參見表5-1。圖5-3建立程序界面和設(shè)置屬性表5-1屬性設(shè)置運(yùn)行程序，在文本框中分別輸入3個(gè)數(shù)，單擊“排序”按鈕后，排序后的數(shù)顯示在下排3個(gè)標(biāo)簽中，如圖5-4所示。圖5-4從大到小排序程序運(yùn)行結(jié)果

2.使用IIF函數(shù)

對(duì)于單條件選擇結(jié)構(gòu)，除了使用IF語句外，還可以使用IIf函數(shù)實(shí)現(xiàn)較簡(jiǎn)單的選擇結(jié)構(gòu)。IIf函數(shù)的語法結(jié)構(gòu)為：

IIf(〈條件〉,〈真部分〉,〈假部分〉)設(shè)計(jì)步驟如下：

(1)建立應(yīng)用程序用戶界面，如圖5-5左所示。

(2)設(shè)置對(duì)象屬性。

設(shè)置對(duì)象屬性，見表5-2。圖5-5建立用戶界面和設(shè)置對(duì)象屬性表5-2對(duì)象屬性設(shè)置其他屬性的設(shè)置參見圖5-5右所示。

運(yùn)行程序如圖5-6所示。圖5-6判斷奇偶性

3.?IF語句的嵌套

如果在IF語句中的〈語句列1〉或〈語句列2〉本身又是一個(gè)IF語句，則稱之為IF語句的嵌套。

(1)建立應(yīng)用程序用戶界面與設(shè)置對(duì)象屬性。

建立應(yīng)用程序用戶界面與設(shè)置對(duì)象屬性，如圖5-7所示。

(2)編寫程序代碼。圖5-7優(yōu)惠付款程序運(yùn)行結(jié)果運(yùn)行結(jié)果如圖5-7所示。

設(shè)計(jì)步驟如下：

(1)建立應(yīng)用程序用戶界面與設(shè)置對(duì)象屬性，如圖5-8所示。

(2)編寫代碼。

運(yùn)行程序，在文本框中輸入方程的系數(shù)，按“判斷”按鈕即可判斷方程有無實(shí)根等情況，并且求出根來，如圖5-9所示。圖5-8建立應(yīng)用程序用戶界面和設(shè)置對(duì)象屬性圖5-9求一元二次方程的根

4.多條件選擇語句DOCASE

雖然使用IF語句嵌套的辦法可以實(shí)現(xiàn)多分支選擇，但這樣用IF語句編寫的程序較長(zhǎng)，程序可讀性明顯降低。

設(shè)計(jì)步驟如下：

(1)建立應(yīng)用程序用戶界面與設(shè)置對(duì)象屬性，如圖5-10所示。圖5-10抽獎(jiǎng)機(jī)用戶界面

(2)編寫代碼。

程序運(yùn)行結(jié)果如圖5-11所示。圖5-11抽獎(jiǎng)機(jī)游戲任務(wù)導(dǎo)入

學(xué)習(xí)目標(biāo)

任務(wù)實(shí)施

1.命令按鈕組

如果表單上需要使用多個(gè)命令按鈕，可以將這些命令按鈕組合為一組，即命令按鈕組(Commandgroup)。命令按鈕組是一個(gè)容器對(duì)象，其中包含命令按鈕，它的層次性如圖5-12所示。

任務(wù)5.2選擇性控件、計(jì)時(shí)器、微調(diào)器圖5-12命令按鈕組的層次性

【例5-8】利用命令按鈕組，設(shè)計(jì)模擬抽獎(jiǎng)機(jī)游戲，如圖5-13所示。

將命令按鈕組Commandgroup1的ButtonCount屬性改為5，如圖5-14所示。

各控件屬性的設(shè)置參見圖5-15所示。圖5-13利用命令按鈕組設(shè)計(jì)模擬抽獎(jiǎng)機(jī)游戲圖5-14建立應(yīng)用程序界面

圖5-15設(shè)置屬性后的界面

(3)編寫程序代碼。

(4)運(yùn)行程序，結(jié)果如圖5-13所示。

2.按鈕組生成器

利用按鈕組生成器可以更方便地設(shè)計(jì)命令按鈕組。

(1)用鼠標(biāo)右鍵單擊命令按鈕組控件CommandGroup1，在快捷菜單中選擇“生成器”，如圖5-16所示，打開“命令組生成器”對(duì)話框。

(2)在“命令組生成器”對(duì)話框的“按鈕”選項(xiàng)卡中，修改“按鈕的數(shù)目”為5，這相當(dāng)于在屬性窗口修改ButtonCount屬性為5。圖5-16“命令組生成器”對(duì)話框

(3)在“布局”選項(xiàng)卡中，可以指定命令按鈕組的排列方式，如水平或垂直、有無邊框等。將“按鈕間隔”微調(diào)器的值調(diào)整為0，除去各命令按鈕間的間隔。

(4)單擊“確定”按鈕退出命令組生成器。

3.選項(xiàng)按鈕組

選項(xiàng)按鈕組是一組相互排斥的選項(xiàng)按鈕(或稱為單選按鈕)。

【例5-9】

利用選項(xiàng)按鈕組控制文本的字型和字號(hào)。

分析：在表單中建立兩組選項(xiàng)按鈕，分別放在“字型”和“字號(hào)”的選項(xiàng)按鈕組中，如圖5-17所示。圖5-17用選項(xiàng)按鈕組控制文本的字型和字號(hào)在“選項(xiàng)組生成器”的“按鈕”選項(xiàng)卡中，修改“按鈕的數(shù)目”為3，分別修改3個(gè)按鈕的標(biāo)題(Caption屬性)為：宋體、黑體、隸書，如圖5-18所示。

(3)編寫程序代碼。

運(yùn)行程序，結(jié)果如圖5-17所示。圖5-18利用“選項(xiàng)組生成器”設(shè)計(jì)選項(xiàng)按鈕組

4.選項(xiàng)組的圖形方式

可以將選項(xiàng)組設(shè)計(jì)成圖形按鈕的形式。

如圖5-19所示，可以在“選項(xiàng)組生成器”對(duì)話框的“按鈕”選項(xiàng)卡中，選中“圖形方式”，單擊“…”按鈕，在彈出的“打開圖片”對(duì)話框中選擇某個(gè)圖片。圖5-19通過“選項(xiàng)組生成器”設(shè)計(jì)圖形按鈕

(1)用鼠標(biāo)右鍵單擊選項(xiàng)組OptionGroup1，在快捷菜單中選擇“編輯”，OptionGroup1的四周出現(xiàn)淺色邊界，開始對(duì)選項(xiàng)組(容器)中的按鈕進(jìn)行編輯。

(2)依次選中3個(gè)按鈕Option1～Option3，將其標(biāo)題(Caption)屬性改為：(空)，自動(dòng)大小(AutoSize)屬性改為：.F.—

假，圖片(Picture)屬性通過瀏覽按鈕“…”進(jìn)行查找，并分別改為不同的圖片，如圖5-20所示。

(3)最后適當(dāng)調(diào)整按鈕的大小與相互位置。圖5-20通過屬性窗口設(shè)置選項(xiàng)按鈕為圖形方式

5.復(fù)選框

選項(xiàng)按鈕組的作用是“多中選一”，當(dāng)需要同時(shí)選擇多項(xiàng)時(shí)，可以采用多個(gè)復(fù)選框控件。

【例5-10】

利用復(fù)選框來控制文本的字體風(fēng)格，如圖5-21所示。圖5-21利用復(fù)選框控制文本的字體風(fēng)格

(1)選擇新建表單，進(jìn)入表單設(shè)計(jì)器，增加一個(gè)文本框控件Text1、3個(gè)復(fù)選框控件Check1、Check2和Check3。

(2)設(shè)置對(duì)象屬性，見表5-3。表5-3屬性設(shè)置

(3)編寫事件代碼。

運(yùn)行程序，如圖5-21所示，可以分別選擇粗體、斜體和下劃線修飾，也可以同時(shí)選擇其中的兩項(xiàng)或三項(xiàng)。

6.鍵盤事件

在VFP中經(jīng)常使用鍵盤事件(KeyPress)來響應(yīng)各種按鍵操作。

(1)?nKeyCode是一個(gè)數(shù)值，一般表示被按下字符鍵的ASCII碼。特殊鍵和組合鍵的編碼，參見表5-4。表5-4特殊鍵和組合鍵的編碼

(2)?nShiftAltCtrl參數(shù)表示按下的組合鍵(〈Shift〉、〈Ctrl〉、〈Alt〉)。表5-5列出了單獨(dú)的組合鍵在nShiftAltCtrl中返回的值。表5-5組合鍵的編碼

【例5-11】

輸入圓的半徑r，利用選項(xiàng)按鈕計(jì)算圓面積、周長(zhǎng)，如圖5-22所示。圖5-22利用選項(xiàng)按鈕選擇運(yùn)算

(1)建立應(yīng)用程序用戶界面。

進(jìn)入表單設(shè)計(jì)器，增加一個(gè)選項(xiàng)按鈕組控件OptionGroup1、一個(gè)文本框Text1、二個(gè)標(biāo)簽控件Label1～Label2，如圖5-22所示。

(2)設(shè)置對(duì)象屬性。

各控件屬性的設(shè)置可以參照?qǐng)D5-22和表5-6。表5-6屬性設(shè)置

(3)編寫代碼。

編寫表單的Activate事件代碼：

THIS.Text1.SetFocus

編寫選項(xiàng)按鈕組OptionGroup1的Click事件代碼：

THISFORM.Text1.KeyPress(13)

在表單中，還可以同時(shí)使用不同的選項(xiàng)按鈕組來控制不同的選擇。

7.計(jì)時(shí)器

Timer(計(jì)時(shí)器)控件能有規(guī)律地以一定的時(shí)間間隔激發(fā)計(jì)時(shí)器事件(Timer)而執(zhí)行相應(yīng)的事件代碼。

計(jì)時(shí)器控件的主要屬性見表5-7。表5-7Timer控件的主要屬性

【例5-12】

設(shè)計(jì)一個(gè)數(shù)字時(shí)鐘。

設(shè)計(jì)步驟如下：

(1)建立用戶界面。

在表單上建立一個(gè)計(jì)時(shí)器控件和兩個(gè)標(biāo)簽控件，如圖5-23所示。

(2)設(shè)置對(duì)象屬性，見表5-8。其他屬性參見圖5-23所示。表5-8屬性設(shè)置

(3)編寫事件代碼。

編寫計(jì)時(shí)器控件Timer1的Timer事件代碼：

THISFORM.Label2.Caption=

SUBSTR(TTOC(DATETIME()),11)

程序運(yùn)行結(jié)果如圖5-24所示。圖5-23建立數(shù)字時(shí)鐘用戶界面圖5-24數(shù)字時(shí)鐘

8.微調(diào)器

Spinner(微調(diào)器)控件可以在一定范圍內(nèi)控制數(shù)據(jù)的變化。

如圖5-25所示，微調(diào)器的主要屬性有：

(1)?KeyboardHighValue和KeyboardLowValue屬性：用來控制用戶通過鍵盤輸入的值。

(2)?SpinnerHighValue和SpinnerLowValue屬性：用來控制用戶通過鼠標(biāo)單擊箭頭獲得的值。

(3)?Increm