程序的建立與執(zhí)行程序的控制結(jié)構(gòu)程序的模塊設(shè)計(jì)變量的作用域第7章結(jié)構(gòu)化程序設(shè)計(jì)基礎(chǔ)程序的建立與執(zhí)行第7章結(jié)構(gòu)化程序設(shè)計(jì)基礎(chǔ)1VisualFoxPro系統(tǒng)提供有三種工作方式：即命令方式、菜單方式及程序文件方式。程序文件方式程序文件（簡(jiǎn)稱(chēng)程序）也叫做命令文件。運(yùn)用程序文件方式進(jìn)行數(shù)據(jù)庫(kù)管理，是通過(guò)程序文件編輯工具，將對(duì)數(shù)據(jù)庫(kù)資源進(jìn)行操作管理的命令和對(duì)系統(tǒng)環(huán)境進(jìn)行設(shè)置的命令，集中在一個(gè)以(.PRG)為擴(kuò)展名的命令文件中，然后再通過(guò)菜單方式或命令方式運(yùn)行該命令文件。所謂命令方式，即通過(guò)程序文件中的命令完成不同的操作。7.1程序的建立與執(zhí)行VisualFoxPro系統(tǒng)提供有三種工作27.1程序的建立與執(zhí)行7.1.1建立和執(zhí)行程序(1)組成：由代碼組成，程序文件的擴(kuò)展名為.PRG(2)建立程序文件的命令

MODIFYCOMMAND文件名(4)程序文件的執(zhí)行命令：

DO文件名(3)建立程序文件的界面操作.dbf.fpt.qpr.dbc.prg各表示什么類(lèi)型的文件？編程窗口7.1程序的建立與執(zhí)行7.1.1建立和執(zhí)行程序(1)3(1)命令分行一行只能寫(xiě)一條命令若命令需分行書(shū)寫(xiě)，在行尾加入續(xù)行符“;”(2)命令注釋目的：提高程序的可讀性。行首注釋?zhuān)鹤⑨屝幸浴?”開(kāi)頭行尾注釋?zhuān)阂苑?hào)“&&”開(kāi)頭7.1.2程序的書(shū)寫(xiě)規(guī)則7.1程序的建立與執(zhí)行(1)命令分行(2)命令注釋7.1.2程序的書(shū)寫(xiě)規(guī)則4?3.14*3*3例如:求半徑為3的圓的面積程序文件的退出與保存

Ctrl+W:文件存盤(pán)退出ESC：雙擊左上角控制菜單：?jiǎn)坞p擊右上角關(guān)閉按鈕：“文件”菜單：“保存”、“另存為”7.1程序的建立與執(zhí)行R=3S=3.14*R*R&&求圓面積?"圓面積=",S?3.14*3*3例如:求半徑為3的圓的面積程序文件的退5程序輸入完Ctrl+W:存盤(pán)

執(zhí)行程序程序輸入完Ctrl+W:存盤(pán)執(zhí)行程序6例:編寫(xiě)程序p7-1.prg，顯示student表中所有學(xué)生的學(xué)號(hào)、姓名、性別和出生日期。在命令窗口中輸入：ModifyCommandp7-1*p7-1.prgClear&&清屏UsestudentList學(xué)號(hào),姓名,性別,出生日期Use7.1程序的建立與執(zhí)行例:編寫(xiě)程序p7-1.prg，顯示student表中所有學(xué)77.1.3程序中的常用命令CLEAR清屏命令A(yù)CCEPT輸入命令I(lǐng)NPUT輸入命令@…SAY…GET輸入輸出命令WAIT等待命令

程序結(jié)尾專(zhuān)用命令7.1程序的建立與執(zhí)行重點(diǎn)：程序中的輸入命令7.1.3程序中的常用命令CLEAR清屏命令7.1程序81.清屏命令命令格式：CLEAR功能：清除屏幕主窗口中的全部信息。7.1.3程序中的常用命令1.清屏命令7.1.3程序中的常用命令92.ACCEPT輸入命令命令格式：ACCEPT[“提示信息”]TO<變量名>功能：顯示指定的<提示信息>，等待用戶(hù)輸入一個(gè)字符串，以回車(chē)鍵結(jié)束輸入，并將該字符串賦給指定的變量。說(shuō)明：只能實(shí)現(xiàn)字符型數(shù)據(jù)的輸入，輸入字符串時(shí)不用輸入定界符。7.1.3程序中的常用命令2.ACCEPT輸入命令7.1.3程序中的常用命令10例:

編寫(xiě)程序p7-3.prg，實(shí)現(xiàn)從鍵盤(pán)輸入任意一個(gè)學(xué)生的學(xué)號(hào)，然后顯示出該學(xué)生的信息。ClearUsestudentAccept"請(qǐng)輸入學(xué)號(hào)："Toxh

&&xh是個(gè)變量ListFor學(xué)號(hào)=xhUse運(yùn)行結(jié)果7.1.3程序中的常用命令例:編寫(xiě)程序p7-3.prg，實(shí)現(xiàn)從鍵盤(pán)輸入任意一個(gè)學(xué)生的11INPUT[“提示信息”]TO內(nèi)存變量功能：顯示指定的<提示信息>，等待用戶(hù)輸入數(shù)據(jù)，以回車(chē)鍵結(jié)束，并將所輸入的數(shù)據(jù)賦給指定的變量。說(shuō)明：數(shù)值型數(shù)據(jù)可直接輸入；字符型數(shù)據(jù)在輸入時(shí)必須要用引號(hào)括起來(lái)；邏輯型數(shù)據(jù)只能輸入.T.或.F.；日期型要使用嚴(yán)格的日期格式{^yyyy-mm-dd}。3.通用數(shù)據(jù)輸入語(yǔ)句7.1.3程序中的常用命令I(lǐng)NPUT[“提示信息”]TO內(nèi)存變量說(shuō)明：3.通12例:編寫(xiě)程序，實(shí)現(xiàn)從鍵盤(pán)輸入任意學(xué)時(shí)數(shù)，查詢(xún)kc表中學(xué)時(shí)與所輸入的學(xué)時(shí)相同的所有課程信息。ClearUsekcInput"請(qǐng)輸入學(xué)時(shí)數(shù)："TOxss

&&xss是變量ListFor學(xué)時(shí)數(shù)=xssUse運(yùn)行結(jié)果7.1.3程序中的常用命令例:編寫(xiě)程序，實(shí)現(xiàn)從鍵盤(pán)輸入任意課程名，查詢(xún)?cè)撜n程的全部信息。Input“請(qǐng)輸入課程名：”TOaListfor課程名=a

例:編寫(xiě)程序，實(shí)現(xiàn)從鍵盤(pán)輸入任意學(xué)時(shí)數(shù)，查詢(xún)kc表中學(xué)時(shí)與134.定位輸入輸出專(zhuān)用命令

@<行,列>[

say“提示信息”

]

[get變量名/字段名[default初值]]

數(shù)據(jù)在窗口顯示位置(1)

get

變量名必須和default初值同時(shí)出現(xiàn)，初值決定了該變量的類(lèi)型。變量類(lèi)型與初值相同；(2)使用get字段名時(shí)不出現(xiàn)default初值，因?yàn)樽侄晤?lèi)型和初值都已知。(3)必須用READ命令激活get中的變量；注意：在指定的行、列位置輸出字符數(shù)據(jù)輸入及編輯字段變量數(shù)據(jù)指定變量初值7.1.3程序中的常用命令4.定位輸入輸出專(zhuān)用命令數(shù)據(jù)在窗口顯示位置(1)get147.1.3程序中的常用命令4.定位輸入輸出專(zhuān)用命令

@<行,列>[

say“提示信息”

]

[get變量名default初值]

例：@4,3say“輸入第1個(gè)數(shù)據(jù)“getadefault0@6,3say“輸入第2個(gè)數(shù)據(jù)“getbdefault0

read?”a+b的值為：”,a+b“000““000“7.1.3程序中的常用命令4.定位輸入輸出專(zhuān)用命令例：“15例:編程：輸入圓的半徑，顯示圓的面積。

*定位輸入方式的程序clear@3,5say"請(qǐng)輸入圓的半徑"getRdefault0readS=3.1415*R*R?"圓的面積="+str(S)*input輸入方式的程序clearinput"請(qǐng)輸入圓的半徑："toRS=3.1415*R*R?"圓的面積=“,

S顯示結(jié)果在屏幕的左下角@5,5say"圓的面積="+str(S)問(wèn)題：default0只能輸入整數(shù)，如何能輸入小數(shù)？0.000?"圓的面積=“+str(S)例:編程：輸入圓的半徑，顯示圓的面積。*定位輸入方式的程16例:編寫(xiě)程序p7-5.prg，根據(jù)記錄號(hào)來(lái)修改某個(gè)學(xué)生的學(xué)號(hào)、姓名和專(zhuān)業(yè)編號(hào)Clear Usestudent@1,10Say“請(qǐng)輸入記錄號(hào)：”GetaDefault1Read GOa&&記錄定位@3,10Say"請(qǐng)修改第"+Str(a,2)+"個(gè)記錄的數(shù)據(jù)"@5,10Say"學(xué)號(hào)："Get學(xué)號(hào)

&&已有初值@7,10Say“姓名：”Get姓名

@9,10Say“專(zhuān)業(yè)編號(hào)：”Get專(zhuān)業(yè)編號(hào)

ReadUse例:編寫(xiě)程序p7-5.prg，根據(jù)記錄號(hào)來(lái)修改某個(gè)學(xué)生的17WAIT

[“信息文本”][WINDOW[AT行值,列值]][TIMEOUT<數(shù)值表達(dá)式>][TO變量]暫停程序的運(yùn)行，直到用戶(hù)輸入一個(gè)字符(該字符可以存于內(nèi)存變量)，也可用于輸出一條提示信息。6.暫停,等待輸入命令

省略則顯示：“按任意鍵繼續(xù)”使屏幕出現(xiàn)一個(gè)WAIT提示窗口,內(nèi)容由<信息文本>確定,位置由AT子句指定.省略AT子句則出現(xiàn)在屏幕右上角例1：WAIT“請(qǐng)檢查輸入內(nèi)容!”WINDOW例2：WAIT“注意!現(xiàn)在暫停程序的執(zhí)行6秒”;WINDOWAT10,10TIMEOUT6設(shè)定等待時(shí)間（以秒為單位）7.1.3程序中的常用命令WAIT[“信息文本”][WINDOW[AT行值,列18RETURN：結(jié)束程序執(zhí)行，返回到調(diào)用它的上級(jí)程序繼續(xù)執(zhí)行，可以缺省。CANCEL：終止程序運(yùn)行，清除程序的私有變量，返回命令窗口。QUIT：終止程序運(yùn)行，返回到Windows。7.程序結(jié)尾的專(zhuān)用命令7.1.3程序中的常用命令RETURN：7.程序結(jié)尾的專(zhuān)用命令7.1.3程序中的常19

順序結(jié)構(gòu)結(jié)構(gòu)化程序的基本結(jié)構(gòu)分支結(jié)構(gòu)循環(huán)結(jié)構(gòu)

7.2結(jié)構(gòu)化程序的控制結(jié)構(gòu)一．順序結(jié)構(gòu)

程序運(yùn)行時(shí)，按照語(yǔ)句排列的先后順序，一條接一條地依次執(zhí)行。

20例1：從鍵盤(pán)輸入任意兩個(gè)整數(shù)，求和并顯示。7.2程序的控制結(jié)構(gòu)如何用input語(yǔ)句輸入？input“請(qǐng)輸入第1個(gè)數(shù)”toainput“請(qǐng)輸入第2個(gè)數(shù)”tob例1：從鍵盤(pán)輸入任意兩個(gè)整數(shù)，求和并顯示。21USEstudent@10,5SAY“修改專(zhuān)業(yè)編號(hào)“&&顯示標(biāo)題?

&&空1行

INPUT

“請(qǐng)輸入要修改專(zhuān)業(yè)的記錄號(hào):"TO

aGO

aDISPLAY專(zhuān)業(yè)編號(hào)INPUT"請(qǐng)重新鍵入第"+STR(a,1);

+“號(hào)記錄的專(zhuān)業(yè)編號(hào):"TO

zyh

REPLACE專(zhuān)業(yè)編號(hào)WITH

zyh

DISPLAY專(zhuān)業(yè)編號(hào)USE例2:在student表中根據(jù)輸入的記錄號(hào)修改專(zhuān)業(yè)編號(hào)7.2程序的控制結(jié)構(gòu)輸入字符型數(shù)據(jù)時(shí)一定要加定界符輸入整數(shù)USEstudent例2:在student表中根據(jù)輸入的22在student表中根據(jù)輸入的學(xué)號(hào)修改該生的入學(xué)總分。CLEARUSEstudentINPUT“請(qǐng)輸入要修改總分的學(xué)生學(xué)號(hào):"TOxhLOCAFOR學(xué)號(hào)=xh

DISPLAY學(xué)號(hào),入學(xué)總分OFFINPUT“請(qǐng)重新鍵入”+編號(hào)+“的入學(xué)總分:"TOzf

REPLACE入學(xué)總分

WITHzf

DISPLAY學(xué)號(hào),姓名,入學(xué)總分OFFUSE@4,4say“請(qǐng)輸入要修改總分的學(xué)生學(xué)號(hào):”getxh

default“0000000000“

&&輸入時(shí)不用加“”號(hào)在student表中根據(jù)輸入的學(xué)號(hào)修改該生的入學(xué)總分。CLE23程序的建立與執(zhí)行程序的控制結(jié)構(gòu)程序的模塊設(shè)計(jì)變量的作用域第7章結(jié)構(gòu)化程序設(shè)計(jì)基礎(chǔ)程序的建立與執(zhí)行第7章結(jié)構(gòu)化程序設(shè)計(jì)基礎(chǔ)24VisualFoxPro系統(tǒng)提供有三種工作方式：即命令方式、菜單方式及程序文件方式。程序文件方式程序文件（簡(jiǎn)稱(chēng)程序）也叫做命令文件。運(yùn)用程序文件方式進(jìn)行數(shù)據(jù)庫(kù)管理，是通過(guò)程序文件編輯工具，將對(duì)數(shù)據(jù)庫(kù)資源進(jìn)行操作管理的命令和對(duì)系統(tǒng)環(huán)境進(jìn)行設(shè)置的命令，集中在一個(gè)以(.PRG)為擴(kuò)展名的命令文件中，然后再通過(guò)菜單方式或命令方式運(yùn)行該命令文件。所謂命令方式，即通過(guò)程序文件中的命令完成不同的操作。7.1程序的建立與執(zhí)行VisualFoxPro系統(tǒng)提供有三種工作257.1程序的建立與執(zhí)行7.1.1建立和執(zhí)行程序(1)組成：由代碼組成，程序文件的擴(kuò)展名為.PRG(2)建立程序文件的命令

MODIFYCOMMAND文件名(4)程序文件的執(zhí)行命令：

DO文件名(3)建立程序文件的界面操作.dbf.fpt.qpr.dbc.prg各表示什么類(lèi)型的文件？編程窗口7.1程序的建立與執(zhí)行7.1.1建立和執(zhí)行程序(1)26(1)命令分行一行只能寫(xiě)一條命令若命令需分行書(shū)寫(xiě)，在行尾加入續(xù)行符“;”(2)命令注釋目的：提高程序的可讀性。行首注釋?zhuān)鹤⑨屝幸浴?”開(kāi)頭行尾注釋?zhuān)阂苑?hào)“&&”開(kāi)頭7.1.2程序的書(shū)寫(xiě)規(guī)則7.1程序的建立與執(zhí)行(1)命令分行(2)命令注釋7.1.2程序的書(shū)寫(xiě)規(guī)則27?3.14*3*3例如:求半徑為3的圓的面積程序文件的退出與保存

Ctrl+W:文件存盤(pán)退出ESC：雙擊左上角控制菜單：?jiǎn)坞p擊右上角關(guān)閉按鈕：“文件”菜單：“保存”、“另存為”7.1程序的建立與執(zhí)行R=3S=3.14*R*R&&求圓面積?"圓面積=",S?3.14*3*3例如:求半徑為3的圓的面積程序文件的退28程序輸入完Ctrl+W:存盤(pán)

執(zhí)行程序程序輸入完Ctrl+W:存盤(pán)執(zhí)行程序29例:編寫(xiě)程序p7-1.prg，顯示student表中所有學(xué)生的學(xué)號(hào)、姓名、性別和出生日期。在命令窗口中輸入：ModifyCommandp7-1*p7-1.prgClear&&清屏UsestudentList學(xué)號(hào),姓名,性別,出生日期Use7.1程序的建立與執(zhí)行例:編寫(xiě)程序p7-1.prg，顯示student表中所有學(xué)307.1.3程序中的常用命令CLEAR清屏命令A(yù)CCEPT輸入命令I(lǐng)NPUT輸入命令@…SAY…GET輸入輸出命令WAIT等待命令

程序結(jié)尾專(zhuān)用命令7.1程序的建立與執(zhí)行重點(diǎn)：程序中的輸入命令7.1.3程序中的常用命令CLEAR清屏命令7.1程序311.清屏命令命令格式：CLEAR功能：清除屏幕主窗口中的全部信息。7.1.3程序中的常用命令1.清屏命令7.1.3程序中的常用命令322.ACCEPT輸入命令命令格式：ACCEPT[“提示信息”]TO<變量名>功能：顯示指定的<提示信息>，等待用戶(hù)輸入一個(gè)字符串，以回車(chē)鍵結(jié)束輸入，并將該字符串賦給指定的變量。說(shuō)明：只能實(shí)現(xiàn)字符型數(shù)據(jù)的輸入，輸入字符串時(shí)不用輸入定界符。7.1.3程序中的常用命令2.ACCEPT輸入命令7.1.3程序中的常用命令33例:

編寫(xiě)程序p7-3.prg，實(shí)現(xiàn)從鍵盤(pán)輸入任意一個(gè)學(xué)生的學(xué)號(hào)，然后顯示出該學(xué)生的信息。ClearUsestudentAccept"請(qǐng)輸入學(xué)號(hào)："Toxh

&&xh是個(gè)變量ListFor學(xué)號(hào)=xhUse運(yùn)行結(jié)果7.1.3程序中的常用命令例:編寫(xiě)程序p7-3.prg，實(shí)現(xiàn)從鍵盤(pán)輸入任意一個(gè)學(xué)生的34INPUT[“提示信息”]TO內(nèi)存變量功能：顯示指定的<提示信息>，等待用戶(hù)輸入數(shù)據(jù)，以回車(chē)鍵結(jié)束，并將所輸入的數(shù)據(jù)賦給指定的變量。說(shuō)明：數(shù)值型數(shù)據(jù)可直接輸入；字符型數(shù)據(jù)在輸入時(shí)必須要用引號(hào)括起來(lái)；邏輯型數(shù)據(jù)只能輸入.T.或.F.；日期型要使用嚴(yán)格的日期格式{^yyyy-mm-dd}。3.通用數(shù)據(jù)輸入語(yǔ)句7.1.3程序中的常用命令I(lǐng)NPUT[“提示信息”]TO內(nèi)存變量說(shuō)明：3.通35例:編寫(xiě)程序，實(shí)現(xiàn)從鍵盤(pán)輸入任意學(xué)時(shí)數(shù)，查詢(xún)kc表中學(xué)時(shí)與所輸入的學(xué)時(shí)相同的所有課程信息。ClearUsekcInput"請(qǐng)輸入學(xué)時(shí)數(shù)："TOxss

&&xss是變量ListFor學(xué)時(shí)數(shù)=xssUse運(yùn)行結(jié)果7.1.3程序中的常用命令例:編寫(xiě)程序，實(shí)現(xiàn)從鍵盤(pán)輸入任意課程名，查詢(xún)?cè)撜n程的全部信息。Input“請(qǐng)輸入課程名：”TOaListfor課程名=a

例:編寫(xiě)程序，實(shí)現(xiàn)從鍵盤(pán)輸入任意學(xué)時(shí)數(shù)，查詢(xún)kc表中學(xué)時(shí)與364.定位輸入輸出專(zhuān)用命令

@<行,列>[

say“提示信息”

]

[get變量名/字段名[default初值]]

數(shù)據(jù)在窗口顯示位置(1)

get

變量名必須和default初值同時(shí)出現(xiàn)，初值決定了該變量的類(lèi)型。變量類(lèi)型與初值相同；(2)使用get字段名時(shí)不出現(xiàn)default初值，因?yàn)樽侄晤?lèi)型和初值都已知。(3)必須用READ命令激活get中的變量；注意：在指定的行、列位置輸出字符數(shù)據(jù)輸入及編輯字段變量數(shù)據(jù)指定變量初值7.1.3程序中的常用命令4.定位輸入輸出專(zhuān)用命令數(shù)據(jù)在窗口顯示位置(1)get377.1.3程序中的常用命令4.定位輸入輸出專(zhuān)用命令

@<行,列>[

say“提示信息”

]

[get變量名default初值]

例：@4,3say“輸入第1個(gè)數(shù)據(jù)“getadefault0@6,3say“輸入第2個(gè)數(shù)據(jù)“getbdefault0

read?”a+b的值為：”,a+b“000““000“7.1.3程序中的常用命令4.定位輸入輸出專(zhuān)用命令例：“38例:編程：輸入圓的半徑，顯示圓的面積。

*定位輸入方式的程序clear@3,5say"請(qǐng)輸入圓的半徑"getRdefault0readS=3.1415*R*R?"圓的面積="+str(S)*input輸入方式的程序clearinput"請(qǐng)輸入圓的半徑："toRS=3.1415*R*R?"圓的面積=“,

S顯示結(jié)果在屏幕的左下角@5,5say"圓的面積="+str(S)問(wèn)題：default0只能輸入整數(shù)，如何能輸入小數(shù)？0.000?"圓的面積=“+str(S)例:編程：輸入圓的半徑，顯示圓的面積。*定位輸入方式的程39例:編寫(xiě)程序p7-5.prg，根據(jù)記錄號(hào)來(lái)修改某個(gè)學(xué)生的學(xué)號(hào)、姓名和專(zhuān)業(yè)編號(hào)Clear Usestudent@1,10Say“請(qǐng)輸入記錄號(hào)：”GetaDefault1Read GOa&&記錄定位@3,10Say"請(qǐng)修改第"+Str(a,2)+"個(gè)記錄的數(shù)據(jù)"@5,10Say"學(xué)號(hào)："Get學(xué)號(hào)

&&已有初值@7,10Say“姓名：”Get姓名

@9,10Say“專(zhuān)業(yè)編號(hào)：”Get專(zhuān)業(yè)編號(hào)

ReadUse例:編寫(xiě)程序p7-5.prg，根據(jù)記錄號(hào)來(lái)修改某個(gè)學(xué)生的40WAIT

[“信息文本”][WINDOW[AT行值,列值]][TIMEOUT<數(shù)值表達(dá)式>][TO變量]暫停程序的運(yùn)行，直到用戶(hù)輸入一個(gè)字符(該字符可以存于內(nèi)存變量)，也可用于輸出一條提示信息。6.暫停,等待輸入命令

省略則顯示：“按任意鍵繼續(xù)”使屏幕出現(xiàn)一個(gè)WAIT提示窗口,內(nèi)容由<信息文本>確定,位置由AT子句指定.省略AT子句則出現(xiàn)在屏幕右上角例1：WAIT“請(qǐng)檢查輸入內(nèi)容!”WINDOW例2：WAIT“注意!現(xiàn)在暫停程序的執(zhí)行6秒”;WINDOWAT10,10TIMEOUT6設(shè)定等待時(shí)間（以秒為單位）7.1.3程序中的常用命令WAIT[“信息文本”][WINDOW[AT行值,列41RETURN：結(jié)束程序執(zhí)行，返回到調(diào)用它的上級(jí)程序繼續(xù)執(zhí)行，可以缺省。CANCEL：終止程序運(yùn)行，清除程序的私有變量，返回命令窗口。QUIT：終止程序運(yùn)行，返回到Windows。7.程序結(jié)尾的專(zhuān)用命令7.1.3程序中的常用命令RETURN：7.程序結(jié)尾的專(zhuān)用命令7.1.3程序中的常42

順序結(jié)