VFP 表單（如果它們在程式中相互呼叫）

看看我的商業軟體中名為“關係”的部分，它以命令組的形式呼叫（命令組控制項以另一種形式）：

do case

case &&& 設定與冬季停止相關的係數。

do form .\txt\frmsdl31

案例&&自動結算租金。

do form .\txt\frmsdl32

do form .\txt\frmsdl31

do sdl32 in .\abc

do form .\txt\frmsdl33

顯示案例和租賃結算。

do form .\txt\frmsdl33

案例 &&& 假設日期來計算租金。

do form .\txt\frmsdl34

do form .\txt\frmsdl33

模擬展示案例>租賃結算。

report form .\txt\ environment pdsetup preview

列印案例和租賃結算。

report form .\txt\ environment pdsetup to print prompt noconsole

案例>自動生成的損壞**。

do sdl37 in .\abc

do form .\txt\frmsdl37

大小寫 && 損壞**。

do form .\txt\frmsdl37

模擬顯示案例和損壞。

report form .\txt\ environment pdsetup preview

案例和損壞的列印件。

report form .\txt\ environment pdsetup to print prompt noconsole

case & Loss** 是自動生成的。

do sdl311 in .\abc

do form .\txt\

do sdl311_1 in .\abc

do form .\txt\

大小寫&&丟失**。

do form .\txt\

模擬顯示案例&&&損失**。

report form .\txt\ environment pdsetup preview

endcase

如果 form1 和 form2 同時執行，否則請先執行窗體窗體以開啟窗體。

假設 form1 的儲存檔名為：

然後，在 form2 中將 form1 中的控制方法稱為。

你把我說的話看清楚了嗎？

是儲存檔名。

它不是窗體的 name 屬性的值。

看得清清楚楚

使用 form2 中的變數 p 作為對 form1 狀態的更改：

if ..p='1'

elsep='2'endif

do form form1 with p

將引數 p 傳遞給 form1

表單 form1 init 事件：

lparameters n

接受 form2 引數。

do case

case n='1'

case n='2'

endcase

有 3 種方法可以執行表單：

1） 直接使用命令。在“命令”視窗中，直接輸入命令：

do 表單（表單名稱）。

用命令執行表單的方法多在程式中使用，比如在選單程式中呼叫表單和在另乙個程式中呼叫表單時，不能使用下面將要說明的兩種執行表單的方法，而只能使用命令方法。

2）在“表單設計器”視窗中，選擇“表單”選單中的“執行”命令，或直接單擊工具欄中的紅色感嘆號。

僅當已進入“表單終止設計器”視窗並開啟了要執行的表單時，才能使用此方法。 這種方法多用於表單設計或修改，方便直接，可以在多次修改和操作中不斷提高表單的設計質量。

3）在專案管理器中，選中“文件”選項卡並指定要執行的表單，然後單擊“執行”按鈕。

如果選擇Visual FoxPro作為開發工具來構建資料庫應用系統，建議先建立乙個專案檔案，然後所有的工作都在專案經理的控制下進行，雖然建立專案檔案的方法多了一種，但收益遠大於此， 沒有親身經歷，鬥翔很難體會到這種感覺。如果您已經建立了專案檔案，則以這種方式執行表單也非常方便。

單擊“計算 y 的值”命令按鈕是：

單擊“退出”命令按鈕是：