第一篇：第一章 VFP基礎知識

第一章Visual FoxPro6.0基礎知識

例題

1、在數據庫技術的有關概念中，DBS、DB、DBMS三者之間的關系是（）。

A、DBMS包括DB和DBS

B、DB包括DBMS和DBS C、DBS包括DB和DBMS

D、DBMS、DB和DBS之間無直接聯系

2、若將關系看成是一張二維有，則下面敘述中不正確的是（）。

A、表中不允許出現完全相同的行

B、表中任意兩行的次序可以交換 C、表中每一列中各數據的類型可以不同 D、表中任意兩列的次序可以交換

3、Visual FoxPro數據表中的字段是一種（）。A、常量

B、變量

C、函數

D、表達式

4、下列式子中，不是合法Visual FoxPro表達式的是（）。A、[9999]-AB

B、NAME+“NAME” C、10/18/09

D、“教授”.OR.“副教授”

5、下列表達式結果為.F.的是（）。A、“33”>“300”

B、“男”>“女” C、“CHINA”>“CANADA”

D、DATE（）+5>DATE（）

6、在下列函數中，函數值為數值的是（）。A、AT（“人民”，“中華人民共和國”）

B、CTOD（“01/01/96”）

C、BOF（）

D、SUBSTR（DTOC（DATE（）），7）

A類基礎訓練

一、填空題

1、數據庫系統一般由_________、_________、_________、數據庫管理員和用戶構成。

2、數據庫管理系統所支持的主要模型有_________、_________和_________。

3、關系型數據庫管理系統應具備的三種基本關系操作是_________、_________和_________。

4、在VFP中，為存儲聲音信息，應使用_________類型，為存儲較長的簡歷信息，應使用_________類型。

5、字符型常量是用定界符定的一串字符，VFP中合法的字符串定界符為_________、_________和_________。

6、在邏輯運算符中，運算優先順序是先_________，再_________，最后是_________，但可以用_________改變運算順序。

7、在VFP6.0中，表達2*15+16/4-2^3的值是_________，ABS（16）SQRT（16）的值是_________。

8、在程序設計中，要說明一個數組，應使用關鍵字_________。

二、單選題（在備選答案中選擇一個正確答案）

1、一般來說，數據庫管理系統主要適用于（）。

A、文字處理

B、資料管理

C、表格計算

D、數據通訊

2、一個完整的數據庫系統不包括（）。

A、數據庫

B、DBMS

C、操作系統

D、用戶

3、按照數據模型分類，VFP數據庫屬于（）。

A、層次型

B、網狀型

C、關系型

D、混合型

4、關系數據庫支持的三種關系運算，不包括（）。A、投影

B、連接

C、選擇

D、混合

5、在VFP中，以下合法的數值型數據為（）。A、1/2

B、36.8

C、.F.D、“23”

6、在VFP中，以下合法的字符串數據是（）。A、{“計算機考試”}

B、[[小型計算機]] C、[“中型計算機”]

D、““巨型計算機””

7、若DATE1=“12/20/04”，表達式CTOD（DATE1）的結果的數據類型是（）。A、C

B、N

C、D

D、M

8、以下各個表達式中，運算結果為數值型的是（）。A、RECNO（）>10

B、YEAR=2004 C、DATE（）-5

D、AT（“IBM”，“Computer”）

9、下列表達式運算結果為日期型的是（）。A、04/05/97-2

B、CTOD（“04/05/97”）-DATE（）C、CTOD（“04/05/97”）-3

D、DATE（）-“04/05/97”

10、在下列表達式中，結果為字符型是（）。A、“125”-“90”

B、“abc”+“def”=“abedef” C、CTOD（“2004/09/01”）

D、DTOC（DATE（））>“2005/04/01”

11、若有A=“B”、B=3*

5、C=“3*5”，則下列表達式正確的是（）。A、A+B

B、B+&C

C、C+&B

D、A+&B

12、VFP內存變量的數據類型不包括（）。A、N

B、Y

C、M

D、L

13、下面不能退出VFP的操作是（）。A、“文件”→“關閉”

B、“文件”→“退出”

C、單擊標題欄右端的“關閉”按鈕

D、VFP為活動窗口時，按alt+f4

14、XJGL.MEM是VFP的（）。

A、數據表文件

B、索引文件

C、內存變量文件

D、數據庫文件

15、啟動VFP6.0屏幕上出現兩個窗口：一個是VFP的主窗口，另一個是（）。A、文本窗口

B、命令窗口

C、幫助窗口

D、對話框

16、使用命令退出VFP的操作是（）。

A、在命令窗口中輸入CLEAR命令

B、在命令窗口中輸入QUIT命令 C、在命令窗口中輸入EXIT命令

D、在命令窗口中輸入DO命令

17、下面關于VFP數組的命令中，錯誤的是（）。A、用DIMENSION和DECLARE都可以定義數組

B、可以用數組變量名和下標訪問數組中的每一個數組元素 C、一個數組中各個數組元素必須是同一種數據類型 D、新定義數組的各個數組元素初值為.F.。

18、在VFP中，用DIMENSION W（2，3）定義數組后，數組W包含的數組元素的個數是（）。

A、2個

B、3個

C、5個

D、6個

B類訓練題

一、填空題

1、兩個不同實體集的實體間的聯系有一對

一、_________和_________三種聯系。

2、在關系數據庫的基本操作中，從表中取出滿足條件元組的操作稱為_________，把兩個關系中相同屬性值的元組聯接到一起形成新的二維表的操作稱為_________，從表中抽取屬性值滿足條件列的操作稱為_________。

3、SQL語言由_________、_________和數據控制語言三部分組成。

4、在VFP中，？ABS（INT（SQRT（16）-3**3））的結果是_________，？VAL（“2000”+“5.10星期二”）的結果是_________，？IIF（“aBC”>“aBB”，“3”+“5”，2**INT（LOG（10）））的結果是_________。

5、命令？AT（“is”，“This is string”）的顯示結果是_________，命令？TYPE（[2+3]）的顯示結果是_________，命令？IIF（7>3,7+3,7-3）的結果是_________。

6、已知AA=34，BB=“AA”，則命令？TYPE(BB)的結果是_________。

7、若要使兩個字符串作精確比較，一種方法是采用精確比較運算符_________，另一種方法是首先使用_________命令來設置精確比較的工作環境。

8、現有內存變量PASS1，QB2，XYZ，BAS1，BBC2和BDEY，把除去后三個變量以外的所有變量用內存變量文件VAR.MEM存入磁盤，應使用命令_________。

二、單項選擇題（在備選答案中選擇一個正確答案）

1、在關系數據庫管理系統中，關系指的是（）。A、各個數據記錄之間存在著一定的關系 B、各個字段數據之間存在著一定的關系 C、數據庫與數據庫之間存在著一定的關系 D、滿足一定條件的一個二維數據表格

2、下面對關系的描述不正確的是（）。

A、由行與列構成的二維表，在數據庫理論中稱為關系 B、在關系模型中，實體和實體間的聯系都是用關系表示的

C、如果一個二維表構成關系，那么在這個表格中只允許嵌套一個二維表格 D、關系不但可以表示實體間一對多的聯系，也可以表示多對多的聯系

3、下列敘述錯誤的是（）。

A、關系模型可以反映實體之間一對一的聯系 B、關系模型可以反映實體之間一對多的聯系 C、關系模型可以反映實體之間多對多的聯系

D、關系模型只能反映實體之間一對一和多對多的聯系

4、一個關系相當于一張二維表，二維表中的各欄目相當于該關系的（）。A、數據項

B、元組

C、結構

D、屬性

5、在VFP中，下列說法不正確的是（）。

A、暫時用到的一些中間變量是內存變量

B、字段仍然是變量

C、變量包括內存變量和字段變量兩類

D、字段不再是變量，而成為常量

6、IIF（LTRIM（“□ABC”）>“ABCD”，DAY（{^2005-3-1}），7）的值是（）。A、1

B、2005-3-1

C、7

D、.F.7、下列表達式錯誤的是（）。

A、DATE（）+30

B、DATE（）-30 C、DATE（）-CTOD（“01/10/96”）

D、365-DATE（）

8、如果想從字符串“北京市”中取出漢字“京”，應該用函數（）。A、SUBSTR（“北京市”，2，2）

B、SUBSTR（“北京市”，2，1）C、SUBSTR（“北京市”，3，1）

D、SUBSTR（“北京市”，3，2）

9、下面與表達式.NOT.（NL<=60.AND.NL>=18）等價的是（）。

A、NL>60.OR.NL<18

B、NL>60.AND.NL<18 C、NL<60.OR.NL>18

D、NL<60.AND.NL>18

10、設學號=“2005”，姓名=“張三”，費用=150，則下列表達式不正確的是（）。A、“學號：”+學號

B、“姓名：”+姓名 C、“費用：”+STR（費用）

D、“費用：”+費用

11、打開一個空數據表文件，分別用函數EOF（）和BOF（）測試，其結果一定是（）。A、.T.和..T.B、.F.和.F.C、.F.和.T.D、.T.和.F.12、要檢查當前文件夾是否存在數據表文件ABC.DBF，應使用函數（）。A、FILE（ABC.DBF）

B、FILE（“ABC.DBF”）C、IIF（ABC.DBF）

D、IF（ABC.DBF）

13、連續執行以下命令之后（其中“□”表示空格），則輸出結果是（）。SET EXACT OFF X=“A□” ？IIF（“A□□”=X，X-“□BCD”，X+“□BCD”）

A、A□□

B、□BCD

C、A□BCD

D、ABCD□□

14、現有內存變量name的值為字符串“內存變量名”，當前打開的數據表中的一個字段名為name，其值為字符串“字段變量名”，則命令？name執行結果是（）。

A、內存變量名

B、變量

C、字段變量名

D、name

15、在VFP中，下列賦值語句正確的是（）。

A、STOR 12 TO X，Y

B、STORE 11，12 TO X，Y C、X=11，Y=12

D、X，Y=12

16、程序中有說明語句，DECLARE MA（3，2），則下列語句錯誤的是（）。A、MA（1，1）=3

B、MA=3

C、STORE 3 TO MA

D、MA（2，3）=3

三、分析題

1、寫出符合下列要求的邏輯表達式：

（1）閏年的條件：年號（year）能被4整除，但不能被100整除；或者能被400整除

（2）一元二次方程Ax?Bx?C?0有實根的條件:A?0且B?4AC?0。

（3）判斷一個數X是否能被2整除的條件。

2、設有如下一些變量及其值：年齡=25，性別=“男”，婚否=.F.，學歷=“本科”，工資=1200，試求出下列邏輯表達式的值。

（1）年齡>20.AND.性別=‘女’

（2）.NOT.婚否.AND.學歷=‘大專’.OR.性別=‘女’

（3）年齡<30.AND..NOT.婚否.AND.學歷=‘本科’.AND.工資<1250

第二篇：第一章VFP基礎知識練習題

第一章Visual FoxPro6.0基礎知識

一、填空題

1、數據處理的核心是數據管理。數據管理大致經歷了_________、_________、_________三個階段。

2、數據庫系統是指引進數據庫技術后的計算機系統，主要包括_________、_________、_________和_________等四部分。

3、客觀存在并且可以相互區別的事物稱為_________。

4、實體有很多特性，實體的某一特性稱為_________。

5、實體之間聯系的三種類型是_________、_________、_________。

6、實體的數據庫管理系統所支持的主要數據模型有_________、_________和_________。

7、_________是一種規范化的二維表；表格中的一行稱為_________；表格中的一列稱為_________；屬性的取值范圍稱為_________。

8、可惟一標識元組的屬性或屬性集稱為_________。

9、關系操作有三種。________是指從關系中找出滿足給定條件的無組；_______是指從關系模型中指定若干個屬性組成新的關系；_________是指從兩個關系中選取滿足連接條件的元組組成新關系的操作。

10、對關系進行選擇、投影或連接操作之后，結果仍然是一個_________。

11、VFP6.0的三種工作方式是_________、_________和_________。

12、當用戶在命令窗口輸入命令時，可以用_________作為續行符，表示該行的下一行仍是同一命令的一部分。

13、VFP6.0中項目文件的擴展名為_________。

14、項目管理器中“移去”按鈕的作用是_________和_________。

15、程序文件在項目管理器的_________選項卡中。

16、設工資=1200，職稱=“教授”，下列邏輯表達式的值是_________。工資>1000 and（職稱=“教授” OR 職稱=“副教授”）

17、設系統日期為2010年12月31日，下列表達式的值是_________。Val(substr(?1999?,3)+right(str(year(date())),2))+17

18、命令？TYPE（“10/25/01”）的輸出值是_________。

19、兩個日期型數據可進行減法運算，結果為_________數據；日期型數據可加或減一個數值數據，結果為_________。

20、？AT（“+”，“a+b=c”）_________。

21、？LEN（“計算機”）

22、？ROUND（123.456，2）_________，？ROUND（123.456，-2）_________。

23、若a=5,b=”a<10”，則?TYPE(b)輸出結果為_________，而TYPE（”b”）輸出結果為_________。

24、表達式3+3>=6.OR.3+3>5.AND.2+3=5的結果為_________。

25、表達式“World Wide Web” $ “World”的結果為_________。

二、選擇題

1、實體之間的聯系有三種，那么學生與課程兩個實體集之間是（）。A、一對一聯系

B、一對多聯系 C、多對多聯系

D、沒有聯系

2、以下幾個基本概念，表述有誤的是（）。A、客觀存在并且可以相互區別的事物稱為實體 B、實體可以是具體的，但不可以是抽象的 C、實體的某一特性稱為屬性

D、屬性有型和值之分，型即為屬性名，值即為屬性的具體內容

3、數據庫管理系統是（）。A、操作系統

B、字處理系統

C、數據庫

D、管理數據庫的系統軟件

4、數據庫是長期存儲在計算機內、有組織的和可共享的（）的集合。A、信息

B、數據

C、命令

D、文件

5、關系是一種規范化的二維表。以下（）選項不是它的特性？ A、關系中不允許出現相同的行

B、關系中不允許出現相同的列 C、關系中每一列必須是不可分的數據項

D、同一列下的各個屬性值不一定是同類型的數據

6、有二維表——學生檔案表（學號，姓名，性別，出生日期，所在系，入學成績，團員否，簡歷，照片），其中可作為關鍵字的字段是（）。

A、學號

B、姓名

C、出生日期

D、入學成績

7、關系數據庫管理系統的三個基本關系運算不包括（）。C A、選擇

B、連接

C、比較

D、投影

8、要想改變關系中屬性的排列順序，應使用關系操作中的（）操作。A、選擇

B、投影

C、比較

D、連接

9、以下說法中錯誤的是（）。

A、選擇是從行的角度進行操作，即選擇部分行 B、投影是從列的角度進行操作 C、投影和選擇可以配合在一起使用

D、投影、選擇和連接的對象是一個關系

10、在項目管理器窗口打開后，用“文件”菜單的“新建”命令所建立的新文件將（）。A、屬于任何項目

B、屬于當前打開項目 C、不屬于任何數據庫

D、不屬于任何項目

11、在項目管理器中，選擇一個文件并單擊“移去”按鈕，在彈出的對話框中選擇“移去”后，該文件將（）。

A、被保留在原目錄中 B、不被保留

C、被從磁盤上刪除

D、可能保留在原來的目錄中，也可能被保留在其他目錄中

12、關于項目管理器，下列說法正確的是（）。

A、項目管理器是一個大文件夾，里面有若干個小文件夾

B、項目管理器是管理開發應用程序的各種文件、數據和對象的工具 C、項目管理器只管理項目不管理數據 D、項目管理器不可以使用向導創建

13、設R=2，A=“3*R*R”，則&A的值應為（）。A、0

B、不存在 C、12

D、3*R*R

14、STR（109.87,7,3）的值是（）。

A、109.87

B、”□109.87”

C、109.870 D、”109.870”

15、在邏輯運算中，正確的運算次序是（）。A、NOT，OR，AND

B、NOT，AND，OR C、AND，OR，NOT

D、OR，AND，NOT

16、已知D1和D2為日期型變量，下列4個表達式中非法的是（）。A、D1-D2

B、D1+D2

C、D1+28

D、D1-36

17、下列4個表達式中，運算結果為數值的是（）。A、”9988”-“1255”

B、200+800=1000 C、CTOD([11/22/01])-20

D、LEN(SPACE(3))-1

18、設有變量sr=”2005年下半年全國計算機等級考試”，能夠顯示“2005年下半年計算機等級考試”的命令是（）。

A、？sr-“全國”

B、？SUBSTR(sr,1,8)+SUBSTR(sr,11,17)C、?STR(sr,1,12)+STR(sr,17,14)D、?SUBSTR(sr,1,12)+SUBSTR(sr,17,14)

19、以下賦值語句正確的是（）。

A、STORE 8 TO X，Y

B、STORE 8，9 TO，X，Y C、X=8，Y=9

D、X，Y=8 20、設有一字段變量“姓名”，目前的值為“王華”，又有一內存變量“姓名”，其值為“李敏”，則命令？姓名的值應為（）。

A、王華

B、李敏

C、“王華”

D、“李敏”

21、設字段變量“工作日期”為日期型，“工資”為數值型，則要想表達“工齡大于30年，工資高于1500、低于1800元”這一命題，其表達式是（）。

A、工齡>30.and.工資>1500.and.工資<1800 B、工齡>30.and.工資>1500.or.工資<1800 C、INT((DATE()-工作日期)/365)>30.and.工資>1500.and.工資<1800 D、INT((DATE()-工作日期)/365)>30.and.(工資>1500.or.工資<1800)

22、表達式VAL（SUBSTR（“本年第2期”，7，1））*LEN（“他！我”）的結果是（）。A、0

B、2

C、8

D、10.00

23、假定系統日期是1998年12月20日，有如下命令： N=（YEAR（DATE（））-1900）%100，執行后N的值應為（）。A、1998

B、98

C、20

D、12

24、有下列命令，STORE 2 TO A

STORE A+2 TO A

STORE A=A+2 TO A

4=6.f.？TYPE（“A”）

type(?.f.?)順序執行后，最后一條命令的顯示結果為（）。A、N

B、C

C、L

D、U

25、關于？和？？，下列說法中錯誤的是（）。A、？和？？只能輸出多個同類型的表達式的值 B、？從當前光標所在行的下一行第0列開始顯示 C、？？從當前光標處開始顯示 D、？和？？后可以沒有表達式

26、用DIMENSION a(3,5)命令定義了一個數組a，則該數組的下標變量（數組元素）數目是（）。

A、15

B、24

C、8

D、10

27、用DIMENSION a(2,3)命令定義數組a后，再對各元素賦值：a(1,2)=2,a(1,3)=3,a(2,1)=4,a(2,2)=5,a(2,3)=6，然后再執行命令?a(1,1)，則顯示結果是（）。

A、.F.B、變量未定義

C、3

D、5

三、操作題

分析下列命令執行后的輸出結果 1.x=str(12.5,4,1)

Y=right(x,3)

Z=?&x+&y?

?&z,z

2.dimension a(2,3)A=150 A(2,2)=2*a(2,2)?a(5),a(1,2)3.x=644

Y=int(644/100)

Z=-x%10

?z*100+y 4.set exact on

Ch=“數據庫管理系統”

Ch1=ch=left(ch,6)

?ch1,ch 5.?at(“人民”，“中華人民共和國”)

?val(substr([334455],5,2))+1

?substr(“334455”，3)-“1”

第三篇：VFP常用函數整理范文

VFP常用函數大全整理

一.字符及字符串處理函數:字符及字符串處理函數的處理對象均為字符型數據,但其返回值類型各異.1.取子串函數:

格式:substr(c,n1,n2)

功能:取字符串C第n1個字符起的n2個字符.返回值類型是字符型.例:取姓名字符串中的姓.store “王小風” to xm

?substr(xm,1,2)

結果為:王

2.刪除空格函數:以下3個函數可以刪除字符串中的多余空格,3個函數的返回值均為字符型.trim(字符串):刪除字符串的尾部空格

alltrim(字符串):刪除字符串的前后空格

ltrim(字符串):刪除字符串的前面的空格

例:去掉第一個字符串的尾空格后與第二個字符串連接

store “abcd ” to x

store “efg” to y

?trim(x)+y

abcdefg

3.空格函數:

格式:space(n)

說明:該函數的功能是產生指定個數的空格字符串(n用于指定空格個數).例:定義一個變量dh,其初值為8個空格

store space(8)to dh

4.取左子串函數:

格式:left(c,n)功能:取字符串C左邊n個字符.5.取右子串函數:

格式:right(c,n)

功能:取字符串c右邊的n個字符

例:a=“我是中國人”

?right(a,4)

國人

322 &&隱含四舍五入取整轉換為字符型數據

?left(a,2)

我

6.empty(c):用于測試字符串C是否為空格.7.求子串位置函數:

格式:At(字符串1,字符串2)

功能:返回字符串1在字符串2的位置

例:?At(“教授”,“副教授”)

8.大小寫轉換函數:

格式:

lower(字符串)

upper(字符串)

功能:lower()將字符串中的字母一律變小寫;upper()將字符串中的字母一律變大寫

例:

bl=“FoxBASE”

?lower(bl)+space(2)+upper(bl)

foxbase FOXBASE

9.求字符串長度函數:

格式:len(字符串)

功能:求指定字符串的長度

例:a=“中國人”

?len(a)

二.數學運算函數:

1.取整函數:

格式:int(數值)

功能:取指定數值的整數部分.例:取整并顯示結果

?int(25.69)

2.四舍五入函數:

格式:round(數值表達式,小數位

數)

功能:根據給出的四舍五入小數位數,對數值表達式的計算結果做四舍五入處理

例:對下面給出的數四舍五入并顯示其結果

?round(3.14159,4),round(2048.9962,0),round(2048.9962,-3)

3.1416 2049 2000

3.求平方根函數:

格式:sqrt(數值)

?str(321.56,6,2)

321.56

功能:求指定數值的算術平方根

例:?sqrt(100)

4.最大值、最小值函數:

格式：

Max(數值表達式1，數值表達式2）

Min(數值表達式1，數值表達式2）

功能：返回兩個數值表達式中的最大值和最小值

例：

x1=123.456

x2=234.567

?max(x1,x2)

234.567

?min(x1,x2)

123.456

5.求余數函數：

格式:mod(表達式1，表達式2）

功能：求表達式1對表達式

2的余數

例：

?mod(10,3)

6.求指數、對數函數:

格式:

exp(數值表達式)

log(數值表達式)

功能:

(1).exp()計算自然數e?表達式的值為指數的冪

(2).log()計算表達式值的自然對數,返回lnx的值.例:

x=1

y=exp(x)

?exp(x),log(x)

2.72 1 三.轉換函數:

1.數值轉數字字符串函數:

格式:str(n,n1,n2)

功能:將數值n轉換為字符串,n1為總長度,n2為小數位

例:?str(321.56)

2.字符轉數值函數:

格式:val(s)

功能:將數字字符串s轉換為數值

例:x=“23”

y=“76”

?val(x)+val(y)

3.字符轉日期函數:

格式:ctod(c)

功能:將日期字符串c轉換為日期

例:set date ansi &&日期格式設為美國標準化協會格式

?ctod(“^2005.11.14”)

2005.11.14

4.日期轉字符函數:

格式:dtoc(d)

功能:將日期d轉化為日期字符串

例:將日期型數據轉化為字符型日期數據并顯示漢字日期.set century on &&開啟世紀前綴,即日期中年份用4位表示

set date ansi

rq={^2005.11.14}

rq=dtoc(rq)

?substr(rq,1,4)+“年”+substr(rq,6,2)+“月”+substr(rq,9,2)+“日”

2005年11月14日

5.時間轉字符函數:

格式:ttoc(時間)

功能:將時間轉為時間字符串

6.字符轉時間函數:

格式:ctot(c)

功能:將時間字符串轉化為時間

7.字符串替換函數:

格式:stuff(<字符表達式1>,<起始位置>,<字符個數>,<字符表達式2>)

功能:從指定位置開始,用<表達式2>的值去替換<表達式1>中指定個數字符.若<字符個數>為零,直接插入;若<表達式2>為空字符串,則刪除<表達式1>中指定個數的字符.例:X=“祝大家新年好!”

?stuff(X,7,4,“春節”)

祝大家春節好

?stuff(X,11,0,“春節”)

祝大家新年春節好

?stuff(x,7,4,“ ”)

祝大家好

8.字符轉ASCⅡ碼函數:

格式:Asc(<字符表達式>)

功能:把<字符表達式>左邊第一個字符轉成相應的ASCⅡ碼值

例:x=“Foxpro”

?Asc(x),Asc(lower(x))

102

9.ASCⅡ碼值轉字符函數:

格式:chr(數值表達式)

功能:把數值轉成相應的ASCⅡ碼字符,返回值為字符型

例:?chr(70)+chr(111)+chr(111+9)

Fox

四.日期函數:

1.系統日期函數:

格式:date()

功能:給出系統的當前日期,返回值是日期型數據.例:顯示系統日期

?date()

11/14/05

set date ansi

set century on

?date()

2005.11.14

2.年、月、日函數:

格式:(1).year(日期表達式):從

日期表達式中返回一個由四位數字表示的年份.(2).month(日期表達式):從日期表達式中返回一個用數字表示的月份.(3).day(日期表達式):從日期表達式中返回一個用數字表示的日數.例:測試系統日期

rq=date()

?year(rq),month(rq),day(rq)

2005 11 14

3.系統時間函數:

格式:time()

功能:得到當前時間字符串

例:?time()

20:32:26

4.系統日期時間函數:

格式:datetime()

功能:得到當前日期時間

例:?datetime()

2005.11.14 08:35:12 PM

5.星期函數:

格式:dow(日期表達式)

cdow(日期表達式)

功能:dow用數字表示星期,1表示星期日,7為星期六;cdow用英文表示星期

例:?date()

2005.11.15

?dow(date()),cdow(date())Tuesday

五.測試函數:

1.測試文件尾函數:

格式:eof([n])

說明:

(1).n指定被測工作區號,其范圍為1～32767

(2).該函數用于測試指定工作區中的表的記錄指針是否指向文件尾,是則返回真值;否則返回假值;省略可選項指當前工作區.例:測試文件記錄指針是否指向文件尾

use 職工檔案

go bottom

?eof()

.F.skip

?eof()

.T.2.測試文件頭函數:

格式:bof([n])

說明:

(1).n指定被測工作區號,其范

圍為1～32767

(2).用于測試指定工作區中的表的記錄指針是否指向文件頭,是則返回真值;否則返回假值;省略可選項指當前工作區.例:測試記錄指針是否指向文件頭

use 職工檔案

go top

?bof()

.f.skip-1

?bof()

.t.3.測試當前記錄號函數:

格式:recno()

功能:得到當前的記錄號

例:

use 職工檔案

?recno()

skip

?recno()

4.測試表文件記錄數函數:

格式:reccount()

功能:得到表的記錄數

例:測試“職工檔案”表的記錄數

use 職工檔案

?reccount()

5.測試表字段數函數:

格式:fcount()功能:得到當前的字段數

例:測試“職工檔案”表共有多少個字段

use 職工檔案

?fcount()

6.測試查找記錄是否成功函數:

格式:found()

功能:測試find、seek和locate命令查找記錄是否成功.如成功則返回真值,否則為假值.例:在“職工檔案”表中查找“小剛”的文化程度

use 職工檔案

locate for 姓名=“小剛”

?found()

.t.display

7.文件測試函數:

格式:file(字符表達式)

功能:測試字符表達式指定的文件是否存在

例:?file(“e:myvfp職工檔案.dbf”)

.t.8.數據類型測試函數:

格式:type(字符表達式)功能:測試表達式的數據類型,返回大寫字母:N(數值)、C(字符)、L(邏輯)、D(日期)、M(備注)

例：

x=1236

y=“hello”

?type(“x”)

N

?type(“y”)

C

9.測試工作區函數:

格式:select()

功能:返回當前工作區的區號

10.測試別名函數:

格式:alias()

功能:測試當前工作區的別名

例:

select 1

use 職工檔案 alias zgda

select 2

use 工資情況

?alias()

工資情況 &&打開表時,不指定別名,表名即為別名

select zgda &&通過別名選擇工作區

?select()

11.表文件名函數:

格式:dbf()

功能:返回當前工作區打開的表名

例:

use 工資情況

?dbf()

e:myvfp工資情況 六.其它函數:

1.宏替換函數:

格式:&變量名

說明:vfp中只有宏替換函數沒有括號.功能是返回指定字符型變量中所存放的字符串.例:為“工資情況”表中每個人加100元工資

gz=“工資”

use 工資情況

replace all &gz with &gz+100

2.條件函數:

格式:iif(表達式,表達式1,表達式2)

功能:若表達式值為真,則返回表達式1的值;否則返回表達式2的值;函數返回值類型與表達式1或表達式2類型一致

a=3

b=5

?iif(a>b,“高興”,“開心”)

開心

3.消息框函數:

格式:messagebox(提示文本[,對話框類型[,對話框標題文本]])

功能:顯示提示對話框

說明:

(1)對話框類型見表1:

對話框類型功能

0僅“確定”按鈕

1“確定”和“取消”按鈕

2“終止”,“重試”和“忽略”按鈕

3“是”,“否”和“取消”按鈕

4“是”和“否”按鈕

5“重試”和“取消”按鈕

16stop圖標

32?圖標

48!圖標

64i圖標

0默認第1個按鈕

256默認第2個按鈕

512默認第3個按鈕

(2).返回值見表2:

返回值按鈕

1確定

2取消

3終止

4重試

5忽略

6是

7否

例:分析messagebox(“您確實要退出系統嗎?”,4+64,“提示信息”)會彈出什么樣的窗口.分析:回頭觀察此函數的格式,彈出的對話框中的提示文本是“您確實要退出系統嗎”,對話框標題是“提示信息”，函數中間有“4+64”,其中4指定對話框中出現“是”和“否”兩個按鈕(見表1),64指定對話框中出現i圖標(見表2)

ok,我們在命令窗口依次執行下列命令:

tui=messagebox(“您確實要退出系統嗎?”,4+64,“提示信息”)

&&變量tui用于接收messagebox函數的返回值,彈出的窗口如圖1

?tui

&&變量tui值取決于運行時用戶點了哪個按鈕,如果點了“是”,返回6,如果點了“否”,返回7,見表2

說明:實際應用中,我們常在系統菜單或在表單的“退出”按鈕中添加如下代碼:

tui=messagebox(“您確實要退出系統嗎?”,4+64,“提示信息”)

if tui=6 &&如果此條件成立,說明用戶點了“是”按鈕,執行quit命令,安全退出

quit

endif

第四篇：VFP學習經驗交流

沒有最好的學習方法，只有最適合自己的學習方法，建議大家自己總結最適合自己的方法，并那樣去做，不要只是聽別人說，別人的經驗可以用來借鑒 但不一定就真的適合自己

談談我自己對于這門課程的一點看法，供大家參考

關于VFP

課程的重要性：

A．

B． 成績比重大，學分3分就算是為了不掛科。。也得。。計算機二級中的重點科目

平時學習和復習：

A.課本的重要性所有考題的知識點均來自課本一定要看書

B.上課認真聽課本雖然很重要，但是里面有些東西是不在考試范圍內的，老師在課堂上講到的才是最終的考試范圍。

C．在復習時先把最基礎的東西看明白 在VFP中，各種程序語句是比較重要的基礎知識，專門有一章講的是基礎的VFP語句和應用，還有一章講數據庫的基本操作，要先把這些基礎部分記熟

D．理論和實踐結合電腦上裝好VFP程序 經常運行一些語句或是做些課本上的練習，不要怕麻煩，仔細看看哪兒出了錯，直到改對

E．關于“考試重點”：雖然老師會說比如表單菜單是重點之類的，但是其實考試時系統會按比例在每章的內容中抽取題目，不能心存僥幸，不是重點不意味著不會考，只是比例會相對少一些

關于考試：

A． 允許運行VFP程序但是要牢記，考試時電腦里沒有平時上課時老師用的數據庫，所以必要時要

自己創建數據庫或者是表單菜單項目

B． 一些小題填空選擇之類的，用VFp程序用來檢驗自己的答案是否準確 或者是可以直接在上面運

行得出答案

C． 最后會有幾個大題，會讓你填寫語句不要慌張，沒有想象中那么難填好后去VFP中運行，檢

驗自己的答案是否準確

D．

E． 時間分配先易后難題庫問題學校里會買一些題庫計算機基礎時我曾經買過，但基本沒看過VFP直接沒買挺貴的不建議大家只看題庫作為主要復習內容，一定要先看課本 可以用題庫來檢驗復習成果對于題庫里帶的大程序題可以作為練習。

第五篇：VFP程序題

VFP程序題 第一套題

一、運行結果題

1、以下程序運行結果是

SET TALK OFF

CLEAR

A = 5

B = 12

C = 18 IF MAX(A , B)< C

? MAX(A, B)

ELSE IF MIN(A , B)< C

? C

ELSE

? MIN(A , B)

ENDIF

ENDIF SET TALK ON

RETURN

2、以下程序運行結果是

SET TALK OFF CLEAR USE STCJ

DO WHILE ,NOT, EOF()

REPLACE 總分 WITH 高數 + 計算機 + 英語 SKIP

ENDDO GO BOTTOM

? 學號，總分

USE

RETURN

3、以下程序運行結果是

SET TALK OFF

SET HEADINGS OFF SELECT 2 USE STCJ

INDEX ON 編號

TO GZ21

REPLACE ALL 總分

WITH 高數 + 計算機 + 英語 SELECT 1 USE STDA

SET RELATION TO 編號

INTO B DISPLAY FIELDS 姓名，B.總分

FOR 四級通過

OFF CLOSE ALL RETURN

4、以下程序運行結果是

SET TALK OFF SET SAFETY OFF USE STDA INDEX ON 民族

TO XBSY TOTAL ON 民族

TO GZHZ USE GZHZ COUNT TO N ? N

SET SAFETY ON SET

TALK

ON RETURN

5、以下程序運行結果是

SET TALK OFF SET DELETED ON USE STDA DELETE FOR 性別 = “ 男 ” COUNT TO A SET DELETED OFF COUNT TO B DELETE ALL PACK COUNT TO C ? A , B , C SET TALK ON RETURN

6、以下程序運行結果是

SET TALK OFF USE STDA

INDEX ON 獎學金

TO GZSY SKIP 2

? 姓名，獎學金 USE

SET TALK ON RETURN

7、以下程序運行結果是

SET TALK OFF

SET PROCEDURN TO SP S = 0

DO SP1 WITH 5 , S ? S

SET TPROCEDURE

TO RETURN * SP PRG PROCEDURE

PARAMETERS X , Y N = 1 Y = 1

DO WHILE N < X

Y = Y + N

N = N + 1

ENDDO

RETURN

8、以下程序運行結果是

SET TALK OFF DIMENSION X(2 ,2)X = 5 FOR I = 1 TO 2 FOR J = 1 TO 2 IF I = J

X(I , J)ENDIF ?? X(I , J)ENDFOR ENDFOR SET TALK ON RETURN

二、完善程序

1、下列程序計算機 S =1！+ 2！+3！+4！+5！中，填空完成程序。

S = 0 FOR N = 1

TO 5

FOR I = 1 TO N

P = P * I

ENDFOR

ENDFOR

? “SUN =” , S

2、用下列程序找出所有的水仙花數，所謂水仙花數，是指這樣一

個三位數，其各位數字的立方和等于該數本身，如 153 = 1^3 +5^3 +3^3，對以下程序填空完成該功能。FOR N = 100 TO 999

A = INT(N / 100)

B =

C = N – INT(N / 10)* 10 IF N = A^3 +B^3 +C^3

? N

ENDIF

ENDFOR

RETURN

3、將新表 DB2.DBF 文件中學號重復的記錄刪掉（只保留一個）SET TALK OFF SET SAFETY

OFF

USE STDA

COPY TO DB2 USE DB2

INDEX ON 學號

TO XH DO WHILE.NOT.EOF()XH = 學號 SKIP

DELETE ENDIF ENDDO

CLEAR ALL

4、顯示STDA.DBF 文件中男同學的記錄

SET

TALK

OFF

SET

HEADING

OFF

USE

STDA

DO

WHILE

.NOT.EOF()

IF

ENDIF

DISPLAY

WAIT

ENDDO

USE

SET

TALK ON

RETURN

5、將STDA.DBF 表中未通過英語四級考試學生的將賞金取消，通過者獎學金加50元，并顯示姓名和獎學金額。SET TALK OFF

CLEAR USE STDA DO WHILE.NOT.EOF()IF.NOT.四級通過

REPLACE 獎學

WITH 0

ELSE

? 姓名，獎學金

ENDIF

SKIP

ENDDO

USE

SET TALK ON

RETURN

6、按學號查詢成績

SET TALK OFF CLEAR SELECT 1 USE STDA

INDEX ON 學號 TO IXH SELECT 2 USE STCJ

INDEX ON 學號 TO ICJ

ACCEPT “請輸入查詢學號：” TO XH SEEK

XH IF

FOUND()

DISPLAY

學號，A->姓名，總分

ELSE

? “ 查無此人！”

ENDIF

USE RETURN

7、請閱讀下列判斷一個自然數是否為質數的程序，并將程序填寫完整。

SET

TALK

OFF

INPUT

“ 請輸入一個大于1 的自然數：”

TO N

K = 0

J = 2

DO

WHILE

J < N IF MOD(N , J)

J = J +1

LOOP

ELSE

K = 1

EXIT

ENDIF

ENDDO

IF

K = 0

?

+ “ 素數”

ENDIF

? “ 再見！” SET TALK ON

RETURN

8、修改數據表文件 STDA.DBF 中指定同學的四級通過情況。SET TALK OFF USE STDA

INDEX TO ISY

DO

WHILE.T.CLEAR

ACCEPT “ 輸入待學生的姓名” TO XM SEEK XM

IF

FOUND()

@ 10 , 10 SAY “ 修改” + XM + “ 的四級通過情況：” GET 四級通過

WAIT

“ 繼續修改？（Y / N）”

TO N IF

ENDIF ENDDO USE RETURN

9、將數據表文件STDA.DBF 中的第三條記錄與第四條記錄的內容互換，并顯示第三條記錄。

SET

TALK

OFF

CLEAR

USE

STDA

GO

SCATTER

TO

A

GO

SCATTER

TO

B

GO

GATHER

FROM

B

DISPLAY

GO

USE

SET

TALK

ON

RETURN

10、如下程序根據鍵入的學號使用SQL SELECT 語句顯示學生的學號、姓名和平均成績。請在下劃線處填寫適當的內容，使程序能正確的運行。

DO

WHILE.T.CLEAR

ACCEPT

“請輸入學號：” TO KEYNO

SELECT

STDA.學號，姓名，（高數 +計算機 +英語）/3 AS平均成績;FROM STDA.STCJ WHERE

WAIT

“如果退出，請按【Y】鍵！”

TO KEY

IF

UPPER(KEY)= “ Y”

ENDIF ENDDO USE RETURN

三、程序改錯題

1、在STDA.DBF 中，查詢某人英語四級通過情況，若通過了，則授予學位，否則不授予學位。(1)SET

TALK OFF(2)USE

STDA

(3)ACCEPT “請輸入姓名：”

TO XM(4)SEEK

FOR 姓名 = XM(5)IF

EOF()

(6)? “查無此人！”(7)RETURN(8)ENDIF

(9)IF

英語四級通過

(10)?姓名 + “英語四級通過，授予學位”(11)ELSE

(12)?姓名 + “英語四級沒通過，不授予學位”(13)ENDIF(14)USE

(15)SET

TALK

ON(16)RETURN 錯誤的行是 改為：

2、顯示 STCJ.DBF 中總分不低于190分的所有學生的姓名和總分字段的值。

(1)

SET

TALK OFF

(2)

SET

HEAD

OFF

(3)

USE

STCJ

(4)

DO

WHILE

RECNO()< = RECCOUNT()

(5)

REPL

總分

WITH

高數 +計算機 +英語

(6)

IF

總分> = 190

(7)

DISP

學號，總分 OFF

(8)

ENDIF

(9)

LOOP

(10)

ENDDO

(11)

RETURN 錯誤的行是： 改為：

3、在STDA.DBF 中，快速查詢性別為“男”，“09/12/92”出生的人

(1)

SET

TALK OFF

(2)

USE

STDA

(3)

INDEX

ON 性別 +入學時間

TO LKL

(4)

SEEK “男” + “09/12/92”

(5)

IF

.NOT.EOF()

(6)

DISPLAY

(7)

ELSE

(8)

? “查無此人！”

(9)

ENDIF

(10)

USE

(11)

SET

TALK ON

(12)

RETURN 錯誤的行是： 改為：

4、求出 STCJ 表中總成績的最大值和最小值。(1)

SET

TALK

OFF

(2)

USE

STCJ

(3)

DO

WHILE

.NOT.EOF()

(4)

REPLACE

總分

WITH 高數 +計算機+英語

(5)

SKIP

(6)

ENDDO

(7)

GO

TOP

(8)

STORE

總分

TO MAX , MIN

(9)

DO

WHILE

.NOT.EOF()

(10)

IF MAX >總分

(11)

MAX = 總分

(12)

ENDIF

(13)

IF MIN <總分

(14)

MIN = 總分

(15)

ENDIF

(16)

SKIP

(17)

ENDDO

(18)

? “最高分：” ,MAX ,”最低分：” , MIN

(19)SET

TALK

ON

(20)RETURN 錯誤的行是： 改為：

第九套題

一、完善程序題

1、將“職工”表中的數據按工資降序排列后生成新表，程序如下：

CLOSE

ALL

SET

TALK

OFF CLEAR USE 職工

TO 職工1 ON

工資/D USE 職工1 DISPLAY ALL USE

RETURN

2、在“職工”表中查找且顯示“孫大鵬”的信息，程序如下：

SET TALK OFF CLEAR USE 職工 LOCATE

IF

FOUND()DISPLAY ENDIF USE

3、顯示“職工”表中女職工的工資和，程序如下：

SET

TALK

OFF CLEAR SELECT

FROM 職工 RETURN

1、設計一個查詢表單BD.SCX,其界面如圖所示，其中文本框控件

名為TEXT1，表格控件名為GRID1。當在其中輸入職工姓名并單擊“查詢”按鈕時，將下邊的表格內顯示該職工的信息。“查詢”按鈕的Click 事件代碼應如下：

THISFORM.GRID1.RECORDSOURCETYPE=4

THISFORM.GRID1.FRCORDSOURCE=”SELECT

* FORM 職工

WHERE

姓名

= = ”

5、將“職工”表中第6條記錄的“出生日期”改為“12/12/1972”,程序如下：

SET TALK OFF CLEAR USE 職工 SKIP 5

出生日期

WITH {^1972/12/12} DISPLAY USE

RETURN