??????vfp????

1
??????vfp????

• 2006?10????
• ????025-81615319

2
????????

• ???60?,?????????20?
• ??????120??
• ???40?70??

3
??????????

• ???24?(1---2??)
• ???6---8?(34??)
• ???4---6?(2---3??)
• ???1012?(56??)
• ???12---14?(6---7??)
• ???0----4?(0---2??)
• ???6---8?(3---4??)
• ???2---6?(1---3??)
• ???24?(12??)
• ???0---2?(01??)
• ????2---4?(1----2??)

4
??????

• ?????,???????12?
• ??????8?
• ????????10?
• ???????5?
• ????5?

5
2006??vfp???

• ????43704
• ????10996
• ?????25.16
• ????14730
• ???33.7

6
???vfp??

• ??
• (1)??????????????????????????
• (2)????????????
• ?????,???????,?????,???????????
• ??1???????????( )??(2002???)
• 2. ????????????????? ()(2006??)
•   A.???????,???????
•   B.????????????,?????????????????
•   C.????????????,????????????????
•   D.????????????????????,??????????

7

• ?????????,??????(?????????)
• E-R??E-R????????,?????????????,?E-R??,????????(
  )??(2005??)
• ??????,???????????,????()(2002??)
• A ???? B ???? C????,??????? D????
• ??????,???????????????,??????__________?
• A. ??B. ??C. ??D. ????
• ????????????????,?????????????,?????????????()(200
  4??)
• A ???? B ???? C E-R?? D ????
• ??vfp?????,???set??
• ??set data?????????????,?????????2002?10?1????,?
  ?????()(2002??)
• A set date to mdy B set date to Ansi C set
  date to ymd D set date long
• ????????

8

• ?????????,????????????????????????,???????????___A
  ____?
• A.?????B.????C.????D.????
• ??????????????,?????______?
• A.??????????????????B.????????????,???????????C.??
  ?????????,?????????D.?????????????,??????
• ??????????????????????????????????????????????????
  ???,????_________?
• ?????????,??????????? _____________
  ??????,????????? (2005?)

9

• ??????????????,????????????????????.????????????
  ?,?????????,?? n NF( n ???????).?????????(???????)
  ,??????( 1 ). (2006?)

10
???vfp????

• (1)vfp?????
• Vfp???????????,??????,???,???,?????,???,???,???,??
  ??,??,???,???
• ?????,????,??,???,???????????
• ??????????????????????,?????   (2002?)
• ???????????????,?????????____(2003?) A
  ???????????? B ??????????? C ??????4 D
  ????????????????? .FTP ???
• ??????????.fpt???
• (2)vfp????
• (3)???????,???????????(??),?????(.T.,.Y.,.F.,.N.
  ),
• ??????????
• ???????,???????,
• ????set strictdata

11
Vfp????

• Vfp??????
• ????????????store??
• ??????Local,Private ?Public
• ?????????????m.
• ??????????Save To ,Restore From
• ??????????????????,???????????
• Declare,Dimension,public,Local
• ?????,-,,/,,,
• ??????????????????????,?????,-??????,???????????
  ????????????????,????????????????????????
• ????????????????,-,??????????????????

12
Vfp????

• ?????gt,lt,,ltgt !,lt,gt,
• ?????????Machine??,????,????,????,????
• PinYin(??,??Set Collate??)???Ascii??,??????,??
  ,??,
• ???????
• Stroke???Ascii??,??????,??,??
• ????????
• ????????Set Exact off,Set Exact On
• ????????? (),Not?!,And ,Or
• ?????ABS(),Max(),Min(),Int(),Mod(),Round(),Sqrt()
  ,Rand(),
• Alltrim(),Trim(),Len(),At(),SubStr(),Right(),Left(
  ),Space(),
• Date(),DateTime(),Dow(),Day(),Month(),Year(),Time(
  )
• Asc(),Chr(),Val(),DToc(),CTod(),Str(),Iif(),

13

• .????????,?????????_____________(2002??)
• SET TALK OFF
• CLEAR
• X18
• Y2E3
• ZABC
• ?VAL(X)VAL(Y)VAL(Z)
• A. 2018.00B. 18.00C. 20.00D. ????
• ?????????2002?10?12?,????DTOC(DATE(),1)???   _
  (2002?)

14

• ?????(XS.DBF)?????????XH????990101,XM???????,
  XB?????,CSRQ????08/23/82,XIMING?????????????
  ???2002?10?12?,????????,M?N?MN?????   _ ?   _ ?  
  _ ?(2002??)
• USE XS
• MALLTRIM(XM)SPACE(LEN(XB))ALLTRIM(XIMING)
• NYEAR(DATE())-YEAR(CSRQ)
• NJSUBSTRTR(XH,1,2)
• NNYEAR(DATE())-1900-VAL(NJ)
• MNIIF(MONTH(DATE())gt9,STR(NN1,2)??,STR(NN,2)
  ??)

15

• ????????????????X???????,???Y?????????????????????
  ????,?????YIIF(Xgt0,1,   _ )?
• IF Xgt0
• Y1
• ELSE
• IF X 0
• YO
• ELSE
• Y-1
• ENDIF
• ENDIF

16

• ??????????????FoxPro??______(2003?) A Fox
  Pro B TRIM(Fox Pro) C ALLTRIM
  (Fox Pro) D Fox - Pro   
• ??? Visual FoxPro ?,??????????????______(2003?)
  A. LEN(Visual FoxPro) B. AT(This,
  ThisForm) C. YEAR(DATE()) D. LEFT
  (ThisForm, 4)

17

• ???????????????????????,???????(????????????GB2312
  ????????ASC II???)?????????,???????_________?????(
  2003?) cString??? Visual FoxPro ????,?
  Caption?????????? STORE 0 TO nCh ,nEn DO
  WHILE (cString) 0 cLEFT(cString ,1)
  IF ASC(c)lt127 nEnnEn1
  cStringSUBSTR(cString , 2) ELSE
  nChnCh1 cStringSUBSTR(cString ,3)
  ENDIF ENDDO WAIT WINDOWS??????????nCh
  nEn A . 1 B . 3 C . 2 D. 4

18

• ??MOD(-42,-3)?????_________ (2003??)0
• ?n234,m432,kmn,???1k???_______ 667
• Visual FoxPro ???????,???,__________???????,?????
  ?????????(2003?)???

19

• ??????????(P99. prg),??P99.prg?????,??????????
  1 1 2 2 4 3 3 6 9
  4 4 8 12 16 5 5 10 15 20 25 6 6 12
  18 24 30 36 7 7 14 21 28 35 42 49 8 8
  16 24 32 40 48 56 64 9 9 18 27 36 45 54 63
  72 81 ??????? P99.PRG ??? SET TALK
  OFF CLEAR FOR m1 TO 9 ? STR(m,2)
  FOR n________ ??________
  ENDFOR ENDFOR RETURN

20

• ?JS?(???)????JS ?????????
  ????????,??????????____(12)_____,_____(13)_____?
  USE js m1xm m2LEN(xb)
  ? m1SPACE(2)IIF(hf,??,??) m30
  SCAN m3m3jbgz SKIP
  ENDSCAN ? m3 m4STR(RECCOUNT())

21

• ??????????????? 1!/2!,2!/3!,3!/4!,??20???????(20
  03??) ?????? nSum0 FOR n1 TO
  20 NSum____________ ENDFOR
  FUNCTION jc PARAMETER x S1
  FOR m1 ___________ ssm ENDFOR
  RETURN s

22
Vfp????

• ???Varname,???????????
• ???????,?null?.null.???
• ?????Ctro0????
• ???????Empty(),IsBlank(),IsNull()
• ?????null???
• ???????????Modify Commnd
• ??????If else endif Do case case EndCase
• ??????Do while EndDo For ..EndFor
  Scan.EndScan
• ?????????????????????????,????????????,????Proce
  dure,????Function,????Parameters
• ???????,???????value??,?????reference??,????Set
  UdfParms To Referencevalue??

23

• ?????????,??????????    _ ?
• SET TALK OFF
• STORE 4 TO N
• ?S(N)
• FUNCTION S
• PARAMETERS X
• Y1
• P0
• FOR I1 TO X
• YYI
• PPY
• ENDFOR
• RETURN P
• ENDFUNC

24

• ?Visual FoxPro????????,???????????????????,???????
  ???????????????????,????????????????????????(11)?(
  2004?) ?322MOD(12,7)LEN("FoxPro")
• ?????????????????.??? VFP ?????,?????????????(26)
  (2006?)
•   A. TYPE B. DOW ()
•   C. CHR () D. TTOC ()
•  

25

• ??????,???????????????????????????????????????
  (2004?) SET TALK OFF STORE ????
  TO ch CLEAR n1 DO WHILE nlt8
  ?______ nn2 ENDDO
  ?__________ ??SUBSTR(ch , 1, 4 )
  RETURN

26

• ??????,????????(2004?) CLEAR
  xOK STORE ?? TO y ok??
  ?x(y) ???????,????????(18)?

27

• ??????(ck.dbf)????????(2004?)
  1)??ck?????,???????? CREATE TABLE ck (zh
  C(15), crrq D, cq N(3,0), je(25))
  2)?ck????????????,???????? INSERT(26)_
  (10789324,2004/03/12,12,10000)

28

• ???????, VFP ????????? _____________ ?(2005?)
• ?????? CLEAR i0 n0 DO WHILE
  ilt10 IF MOD(i,2)0 nn1
  ENDIF ii1 ENDDO ?n

29

• ??????? DIMENSION xx4
  taTYPE("xx1") xx1"VFP" xx1113
  tbTYPE("xx1")
• ????????,?? ta ? tb ????? _____________ ?(2005?)

30

• ?????????,??????(????????)?(2005?)
• ??????? nSum0 p1 FOR i1 TO 10
  ppi nSumnSump ENDFOR ?nSum
  ??????? nSum0 FOR i1 to
  10 nSumnSumfJC(i) ENDFOR
  ?nSum FUNCTION fJC
  PARAMETERS x p1 FOR n1 TO
  x pPn ENDFOR
  RETURN p ENDFUNC

31

• ??????? NTOC ()????????? 17 ?????????,?????????
  ??? ??????,????? NTO ( 4 ),?????? (2005?)
  FUNCTION NTOC PARAMETERS n
  LOCAL ch ch"???????"
  mch"??"SUBSTR(ch,_________,2) RETURN
  mch ENDFUNC

32

• ???? DIMENSION x(2,3) ???????X????,??????????X(3)
  10 ,X(5)20,X30 ,?????x(1,1),X(1,3),X(2,2)
  ?????(27) (2006?)
•   A. 30,30,30 B. .F.,10,20
•   C. 30,10,20 D. 0,10,20
• ??????????,???????????????.??????????????????(????
  csrq ,??????),?????(?????)?????,?????????( 3
  )(DTOC( csrq ,1),4). (2006?)

33
??????????

• (1)?vfp?,???????????
• (2)????,?.dbf?????,???????????,?????.fpt?????,?Cre
  ate Table???
• ?????user name ???(10), money1 ???,age ???
• (3)set null??????????????
• (4)??????Alter Table TableName
  AddAlterDropRename,????,??,???????
• (5)???????????select(sele)
• (6)???????use tablenames in aginAliasNoupdate,
  ??Close Tables,Close All????????????,????,??????0
  
• (5)??????set Exclusive off Set Exclusive on
• ???????insert into tables(fieldname1,fieldname2)
  values(eExpression1,eExpression2)
• ??????????memo,?????Memo,??????gen,???Gen
• .

34

• ????Browse Fields ??,??
• (6)?????Bof(),Eof(),RecNo(),
• (7)?????Skip Number Goto(go) Number, Locate
  For
• Update,Replace???
• (8)???????????????,????????????,??Delete,????Reca
  ll
• (9)??????PACK
• (10)??????????Set Deleted Onoff
• ?????Copy to Filename ,?????Count(),Sum(),Avg()
• (11)?????????????,????????
• (12)???????seek
• (13)Select(),Used(),Allas(),Field(),Fcount(),Delet
  e()

35

• ??????????????,????????????????????????
• ???????????,???????????????
• ?????????????,?????????
• ???????
• ????????(.cdx),?????????,??????
• ??????Use xs Order xh
• ????????Seek,??????,Recno()??????????
• Delete()????????????

36

• ?????XSB,???????????????????????,???XSB???????????
  ????A?(2002??)
• CLOSE TABLES ALL
• USE XSB
• n          _  _
• FOR T1 TO n
• cFIELD(T)
• cc"A"SUBSTRTR(C,2)
•    _ TABLE XSB RENAME COLOUMN c TO cc
• ENDFOR
• CLOSE TABLES ALL
• ????????????,????????????????,?????????,?????????_
  ____????(2003?)
• A.1B.2C.3D.4

37

• ???????????????????,??????????________?
• A.?????????????????????B.????????????C.???????????
  D.?????????????????
• ? xsb.dbf ???????,?????????????______(2003?)
  1) DELETE ALL 2) DELETE ALL PACK 3)
  ZAP 4) ? xsb.dbf ????????? A. 1) 2) 3)
  B .3) 4) C. 2) 3) D. 2) 3) 4)

38

• ?????(XSB.DBF)??????
• ?????????????????1000104???09/02/82022000101???04/
  09/83023000103???10/06/82 024000102???12/09/820250
  00106????09/08/82026000105????02/06/8302??????????
  ,?????????____?
• USE XSB
• SET ORDER TO XSXH XSXH??????,???????????????
• GO TOP
• SKIP
• ? RECNO()
• GO BOTTOM
• ?RECNO()

39

• ???????????????,???????????????????????????,????__
  ___?(2003?) A ????????????? .cdx
  ,??????????????? .idx B ???????????,????????
  C ??????????????,??????????? D
  ???????????????????????

40

• ?Visual FoxPro???,????????????????????????????????
  ?????????????????????,??????__________(2003?)
• ??????(ck.dbf)????????(2004?)
  1)??ck?????,???????? CREATE TABLE ck (zh
  C(15), crrq D, cq N(3,0), je(25))
  2)?ck????????????,???????? INSERT(26)_
  (10789324,2004/03/12,12,10000)

41

• ???????
• CLOSE TABLES ALL USE XS SELE 3 USE
  JS USE KC IN 0 BROW
• ???????,??????????????????? _____________ ?
  (2005?)
• A. KC ? 2 B. KC ? 3 C. JS ? 3 D. JS ?
  2

42

• ??????????????? GZB.DBF ??? GZB1.DBF ??,???????
  _____________ ?(2005?)
• A. COPY GZB.DBF GZB1.DBF B. COPY TO
  GZB1 REST C. COPY TO GZB1 STRU D. COPY TO
  GZB1

43

• ????( CJ )?????( xh )?????( kcdh )???( cj
  )??,???????????? 2 ???
• ?2???????? (2005?)
• ??????????,?? m ? n ????? _____________ ?
  ?????? SELECT FROM cj WHERE
  cj.cjlt60 INTO TABLE cj_tmp
  mEOF() nRECCOUNT()

44

• ????????????( JDCJS )???????( jzh
  )??????????????,??????????( jzh
  ???????),??????????????,?????????????????(2005?)
  ?????? USE JDCJS INDEX ON
  jzh TAG jzh ?????????????? GO TOP
  last_jzhjzh SKIP DO WHILE
  !EOF() IF jzhlast_jzh
  DELETE ELSE _____________
  ENDIF SKIP ENDDO
  PACK

45

• ?( table )????????.????? VFP ?????,????(22)
  (2006??)
•   A.????????????. dbf
•   B.????????????,????????????? 10
•   C.????????????????
•   D.??????????????????? ,VFP ?????????

46

• ????? VFP ???????,????(24) (2006?)
•   A.????????,?????????????,???????????
•   B.????????,???? VFP ????????????
•   C.?????,?????????????????????
•   D.?????????????????????
• ? VFP ?,???????????? VFP ????????( 2 ).(2006?)
•  ??COPY????????????????Microsoft Excel
  ??.??????????XS?,????COPY TO xyz  ( 4
  ),???XS????Excel ?? xyz.xls. (2006?)

47

• ??USE??????????.??XS????1???????,????10?????????XS
  ?,????? USE xs ( _5_ ) IN 10 .
• (2006?)
• ??Visual FoxPro???????????????,??????????????,????
  ???SET    _ ON,???????cYear???????,????????   _
  cYear(2002??)
• Delete ,Delete-sql ,??????????Recall,Recall
  All,Recall All For

48
????????????

• (1)????????????????,????????????????????????????Cr
  eate DataBase,??????,??,??,????
• (2)????????Open DataBase
• (3)???????set database to databasename
• (4)?????????Validate Database recover
• (5)?????Close database
• ???????????????????????,??????????????___________
  (2002??)
• A.CLOSE ALLB.CLOSE DATABASE ALLC.USE IN 0D.CLOSE
  TABLES
• ????

49

• (6)?????????? Create Table xsb Name ???2 (xh
  c(8),xb c(2)),Create Table xsb Free (xh
  c(8))??????
• (7)??????????A T ! ,????X 9 ???? ???
• (8)???????????? ???? set check,????drop check
• (9)??????????,?????,?????,?????Create Trigger
• .?????????????,?????????????????,???????Visual
  FoxPro?????????__________(2002??)
• A.?????B.?????C.?????D.?????
• (10)??????add table tablename ?????drop table
  tablename delete
• (11)????? Free Table TableName
• ???????????,????Use jxsj!xs

50

• ????????????????????,??????????????????   
  _  ????????(2002??)
• ?????????????????????????????????????????????????,
  ???????????????????????????,??????????????????????
  ???????????JS???????????????,?????    _ TABLE
  JS???????JS????? (2002??)

51

• (12)??????????????User jsxj!js
• (13)?????????????,???,???
• (14)???????????????????
• (15)?????????,????,????
• ????????????????????????
• Vfp????????????????????,?????,????????

52

• .??????????????????Visual FoxPro???,??????????????
  ????________?(2002??)
• A.?????????????????,???????????????????B.?????
  ????????????,??????????????C.???????????????,
  ??????????D.???????????????,?????????????
• ????SJK.DBC???XS.DBF??????????????????XS.DBF??SJK.
  DBC,???????   _ ,?????????? (2002?)

53

• ?????????????,????????___D____?(2003??)
• A.?????????NULL?B.??????????????C.??????D.????????
  ???
• ????????????????????,??????????????????????????___
  ____ (2003??)
• ? Visual FoxPro ???,????????,?????????????????????
  ,????______(2003??) A ?????????(Format)??,????
  ???????????? B ???????????????????? C
  ????????????????????????????? D
  ????????????????????????,??????????????

54

• ????????,????????????????????????????,????????????
  ???????????????,????????????????????????????????
  ,??_______ (2003?)
• ?sjk1.dbc,sjk2.dbc,sjk3.dbc,sjk4.dbc?sjk5.dbc?????
  ?????????????????,??????OPEN DATEBASE
  ?????????Visual FoxPro????????,?????????,?????????
  ???_______??(2003?) CLOSE DATEBASE ALL
  OPEN DATEBASE sjk1 OPEN DATEBASE sjk2
  OPEN DATEBASE sjk3 OPEN DATEBASE
  sjk4 OPEN DATEBASE sjk5

55

• ????????? xs.dbf ?????????????(?????????),???????
  ?,mSum? nSum ????????______(???????)
• ???1??? SET TALK OFF USE xs
  mSum0 DO WHILE NOT EOF() ? xh,xm
  mSummSum1 SKIP ENDDO USE
  ? mSum ???2??? SET TALK OFF USE
  xs mSum0 SCAN ?xh,xm
  nSumnSum1 SKIP ENDSCAN USE
  ? nSum

56

• ???????????????? bd.dbf, ??xh(??),xm(??),dw(??)???
  ,???????????????,???????(2003?) SELECT
  __________ dw FROM bd INTO TABLE
  dwb??????????????????????dbf.dbf
  ???????????????????????????,??????? SELECT
  dw AS ??, ___________ AS ?? FROM bd
  GROUP BY __________ ORDER BY 2
  DESC

57

• ????????????????????????,???????????????????????
  ????????,?????????????_______???(2003?)
• ???????????,???????????????????????,??????????????
  ???????????????????????,???????????????????(28)
  (2004?)
• ???????,??? xs ???????????
• INSERT INTO xs (xh,xm,xb,ximing) _____________
  (950101 , ??,) (2005?)

58

• ???( database )????????????????????.????? VFP
  ???????,????(23) (2006??)
•   A.?????????
•   B.???????????,????????????????????
•   C.??????????????,?????????????
•   D.????????"???"??????,?????????????

59

• ????????????(12?)
• ????????TEST,1.???????sjk???(xs)????
• (1)???(xb)??????????,???????
• (2) ??xb??????(??)??,??????????(3)
  ??xb??????(??)???????????(4)
  ????????xc,????xb????,???????????(csrq)????(5)
  ???(xh)??????????8??????,???????

60
?????

• (1)???????select-sql????,???????.qpr?,????Create
  Query
• ??SELECT-SQL??????????,?????????__________(2002??
  )
• A.??????????,?????????????????B.??????????,???????
  ?????????????C.??????????,????????????D.?OEDER
  BY???????????????????????
• (2)???????????like gt is null, between, in
  
• (3)????order by
• (4)????Group by
• (5)??Having,???group by????
• ????do xx.qpr

61

• (6)??????Join,
• (7)??????
• (8)?????????????????
• (9)?????Create Sql View
• (10)Select,Alter,Create Table,Delete,Insert,Update
  
• (11)Avg(),Count(),Min(),Max(),Sum()
• (12)Union

62

• XSDA(????)????????,?????XM??????8?????????????????
  ??,?????????,????????(????? ???),????????(?????
  ? ?),???????????????
• ??????STRTRAN(cSearched,cSearchedFor,cReplacement)
  ,???cSearched???cSearchedFor??????cReplacement????
  
• ???????????UPDATE-SQL??,???????(2002??)
• UPDATE    _ SET XMSTRTRAN(    _
  ,SPACE(1),SPACE(0))
• SELECT??????____??,?????SELECT???????????SELECT???
  ????????(2003??)

63

• ?sjk.dbc ???????????xim.dbf(???),js.dbf(???)?xs.d
  bf(???)???,xim.dbf?????(xdh C(2)),??(ximing C
  (18))??js.dbf,xs.dbf?????(xm C(8)),???(xdh
  C(2))????????????????????,?????????,??,????????
  ?????,????????????,????????????
  SELECT ?? AS ?? js.xm AS ?? FROM
  sjk!js , sjk!xim WHERE js.xdhxim.xdh
  AND xim.ximing?????? UNION
  SELECT _____(9)_____ AS ??,xs.xm AS ??
  FROM sjk!xs,sjk!xim WHERE
  xs.xdhxim.xdh AND xim.ximing??????
  ORDER BY 1, 2

64

• ??????????,??????(cj.dbf),?????????????
  ????SELECT-SQL??,??????? (10) ????(2004?)
  SELECT xh, COUNT () AS ???? FROM cj GROUP BY
  xh

65

• ????????????????( XS.DBF ),???????????????? 1
  ???(2005?)
• ???? SELECT-SQL ??,??????? _____________ ????
• SELECT FROM xs WHERE SUBSTR(xh,5,2)'01'
• ?????????????,???????? VFP ?????????
  _____________ ? ?????? SET TALK OFF n0
  CLEAR GO TOP DO WHILE!EOF() IF
  AT("?",xm)gt0 nn1 ENDIF SKIP
  ENDDO ?n

66

• ???????????????,????????????????(??????,??????)???
  ???????????????,????????????????????????,?????????
  ????? _____________ ? (2005?)

67

• ? SELECT-SQL ???, UNION ????????? SELECT
  ??????????? SELECT ??????????????? SELECT-SQL
  ?????? UNION ????? SELECT ??????,????????????,????
  ? _____________ ? ORDER BY ???(2005?)

68

• ?????????????( KC )????( CJ )???????????????(
  kcdh ),??? (kcm) ,?? (xf) ???????????( xh
  ),???? (kcdh) ,??( cj )???????????????????????????
  ????????? 120 ???????(??????,???,???,?????????),?
  ???????(????? 60 ??????? 0 )(2005?)
  SELECT xh AS ??,AVG(cj.cj) AS ???,_____________
  AS ??? FROM kc INNER JOIN cj ON
  kc.kcdhcj.kcdh GROUP BY xh
  HAVING ???gt120 ORDER BY xh

69

• ??DBGETPROP()??,????????????,????????????,????????
  ????.??,???JS?????????????,??????
• DBGETPROP("js"," ( 6 ) ","RuleExpression")

70
?????????

• ??????????????????,
• ???????????,?????????????????    _
  ???Destroy???Error?? (2002??)
• ??????,???,???,??????
• ????????Init,Destory,Error
• Vfp??????????????
• ??????,???,???,??,??,???,??,??,?????,?????
• ????Parent,This,ThisForm,ThisFormSet,_Screen

71

• ???????MouseMove,DropDown,KeyPress,InteractiveCha
  nge
• ProgrammaticChange,gotfocus,lostfocus,when,valid
  ,load,unload,active,
• ??????Init,Destory
• ????Gotfocus(),LostFocus(),When,Valid,
• ????Init,Destory,Error
• ????addItem,cls,quit,Refresh,Release,setall,setfo
  cus

72
??

• (1)???????
• (2)?????,?????????.scx?.sct,????Create Form
• ????do form
• (3)??????????????????????????????????
• (4)????????????
• (5)????????,????????ControlSource?????????,???????
  , ??RowSourceType?RecordSource
• (6)????????ThisFormSet,?????????formcount
• ??????,?????????,?????????,????????

73

• ????????????,??????,??,???????????
• vfp????????????????????,??????????????,???????????
  ????
• ?????????????Caption,??????????MaxButton,??MinButt
  on,???????,????????Windowstate
• ????SetAll?????????????
• ?????????Parameters cString,nNumber
• ???????????
• ???ShowWindow0,1.2???

74

• .??????????,??????????????,????????????????????___
  ________(2002?)
• A. 1,???B. 2,??????C. 1,???D. 2,??????
• Visual FoxPRO??????????,???????????Visual
  FoxPRO???????????????,??????   _ ??????
  (2002??)
• ???????????????????????????    _ ???,????????????
  
• ??SDI??MENUA.MPR???????,????????Init??????,??????
  DO MENUA.MPR WITH    _ ,.T.?

75

• ??????,???????ShowWindow????????????_________?(200
  3??)
• A.??????????????????B.??????????C.??????D.???3?
• ????????????????????????,????????________?(2003??)
  
• A.???????B.?C.????D.????
• .??????,???????????????,???????????????????????,??
  ????___B____???????PARAMETERS???
• A.LoadB.InitC.DestroyD.Activate

76

• ????????????????????,??????????????Init??????????,
  ?????????Click???????__________? (2003??)
• .???????,???????????????????????????,???????????
  ???,_____???????(2003??)
• MyLabel ???????????,????BackColor????????????????
  ?Mylabel ??????Lb1 ,????BackColor
  ?????,????????,Lb1????????______(2003??) A ??
  B ?? C ?? D ?????????

77
??

• (1)RecordSource??????????????????,ControlSource???
  ???????????????
• ????????,?,???,?????,???,???,Ole??,????,?????,???
  ,???,??
• (2)???InputMask,Format,PasswordChar
• (3)EditBox????????????????
• (4)???????(ListBox,ComboBox)
• RowSourceType,RowSource
• (5)????ButtonCount,Value

78

• (6)?????.T.,???.F.,????.null.
• (7)????Grid,RecordSource,RecordSourceType,???Dele
  teMark???????????????????
• (8)???KeyBoardHighValue,SpinnerHighValue,KeyBorar
  dLowValue,SpinnerLowValue
• (9)???Enabled?Interval,Timer,1000??1?
• (10)????
• (11)????Curvature (099),0????,99????
• (12)????

79
??

• (13)????????Caption??Alt\lt
• ??????ToolTipText
• (14)???????Enabled
• (15)??PageCount,Tabs,TabStyle
• (16)????ActivePage
• .?????Curvature????????????????,???????099???????
  ?   _ ?,?????? (2002??)
• .??????????RowSource ???   _ ?????????????????????
  ???,?????   _ ???
• ??????????????????????Click????,Visual
  FoxPro????????????????????????????????????????,  
  _ ?Click?????????????????????,????????Click?????
  

80

• ????????????????????????????Timer???Enabled???
     _ ???
• ???????????????????????????????????????????????,??
  ???????????????,?????___D____????????????(2003??)
• A.ControlB.NameC.CaptionD.Vaule
• ??? Visual FoxPro????,? Caption
  ??????_______(2003??) A ?? B ???? C ???
  D ???

81

• ???Form1???1??????(TEXT1)?1??????(LIST1)???,LIST1?
  RowSourceType????1,RowSource?????????????????????
  ????????????????TEXT1????????,?????????LIST1?,???
  ???????,????????????????TEXT1?LostFocus????
•   FL.T.
•   FOR n1 TO THISFORM.LIST1.ListCount
•     IF ALLTRIM(THISFORM.LIST1.List(n)________
•       FL.F.
•     ENDIF
•   ENDFOR
•   IF FL
•      THISFORM.LIST1.ADDITEM(THIS.Value)        
  ???????????
•   ENDIF
•   THIS.ValueSPACE(1)                          
  ??????

82

• ?????????????????????,????????????,???????????????
  ???????Interval ????????????___(8)____?????????,??
  ????

83

• ??????,?????????????????,????????1?????(PageFra
  me)???2?????,??????______??????.F.?(2003??)

84

• ???(ListBox)????????????,?????????????????????????
  (?)??????_______?????(2003??)
• Visual FoxPro ??????????????,?????????????????In
  it??,Destroy???___(23)_____??(2003?)

85

• .????(frm1)???????(text1)???????(command1)???????,
  ??????command1,????text1???????????Name??????,????
  command1?Click???????????????
  THISFORM.(15)_THISFORM.DataEvironment.Name

86

• ???????????????????????????????????main.prg,??????
  ????????????(2004?) CLEAR ALL
  _SCREEN.Visible.f. SET TALK OFF ????
  ??Visual FoxPro?????
  WITH _SCREEN .Caption??????
  .Picturepict\softface.jpg
  .WindowState2 .ControlBox.f.
  ENDWITH _SCREEN.Visible.t. SET
  SYSMENU ON ____(16)_____mainmenu.mpr
  ??????mainmenu.mpr _____(17)______Loginfo
  nm ??????Loginfonm.scx READ EVENTS
  ?????? RETURN

87

• ???(fml)???????(list1)??????(text)???????(command1
  ,?Caption?????)?????????Click???????????????tex
  t1??????,??????????????,?????????????,????????????
  ?????????,????????????????????(2004?)
  flag0 FOR n1 TO THISFORM.list1.ListCount
  IF THISFORM list1.List(n)(19)
  flag1 ENDIF ENDFOR IF
  flag0 (20)(THISFORM.text1.Value)
  ELSE MESSAGEBOX(????????,?????)
  ENDIF

88

• ???????????kc??cj?,?kc??cj?????????????????,??????
  (2004?) 1)????BoundColumn?1,????kc??????(kcdh
  )????(kcm)?????(kss)??,?????RowSourceType????6(??
  ),RowSource????(22)? 2)?????????????,???????
  ?????????,?????text??????????,?????InteractiveChan
  ge ???????? SELECT AVG(cj.cj) FROM cj
  WHERE cj.kcdh(23)INTO ARRAY t
  THIS.(24).text1.Valuet

89

• ???????????,??????Click???????????????????????pg1?
  ???????????,????THISFORM.pg1.(29)3? (2004?)

90

• ???????????????,???? _____________ ? (2005?)
• A. ???????,??????????,??????????????? B.
  ?????????,??????????????? C. ???? PageCount
  ?????? 0 D.????????????,???????????

91

• ????????,???? ControlSource ??????????? VFP ???,?
  ControlSource ???? _____________ ?(2005?)
• A. ??( Label ) B.???( CheckBox )
  C.?????( OptionGroup ) D.???( ListBox )
• ? 1 ???????????( JS )????????????????????????????,
  ??????? Init ?????,??????????(2005?)
• This._______("DynamicBackcolor","IIF(xb'?',RGB(
  125,125,125),RGB(125,125,125))","Column")

92

• ????????????,?????? PageCount ??????????????(?????
  ?)?????????????????????????????,???????? Refresh
  ????????? This. _____________ PageCount
  ?(2005?)

93

• ?????????( KC )????( CJ )?,??????????( kcdh
  )????( kcm )???( xf )???,????????( xh )?????(
  kcdh )???( cj )????????????????????????? 2
  ???(2005?)
• ?2
  ????????(Combo1)???????? RowSource Type
  ???6-?? RowSource ???kc.kcdh???????????
  ??????,????( Grid1 )??????????????,?????( Text1
  )??????????,????????? _____________ ?????????
  SELECT KC ThisForm.Text1.Value
  kc.kcm ThisForm.Grid1.RecordSource
  "SELECT cj.xh,cj.cj FROM cj WHERE
  cj.kcdhALLT(THIS.Vale)INTO CURStmp"
  ThisForm.Refresh
• ?????????,????( Grid1 )? RecordSourceType ???
  _____________ ?

94

• ???????????????????? _____________ ?(2005?)
• ?????? _____________ ????? ?,???????????????
  ,? Value ?????????????(2005?)

95
?????

• (1)??????????????????????????????????????,??????
  ?,??,??,???
• (2)??????????????.frx??????,????.frt?????
• (3)????????????.lbx??????,????????????.lbt
• ????????,???,?????,????
• ?????
• I????????Report Form

96

• ? Visual FoxPro ???,????????????,?????????????????
  ??????????????????????,??______??????????????(2003
  ??)
• A ?? B ??? C ?? D ??

97

• ???????????,???????????????????????Visual
  FoxPro???,????????????????????????    _ (2002??)
• ???????,?????????    _ (2002?)?
• C??????????????
• DO SUB1
• ?LEFT(X,6)SUBSTR(C,15)RIGHT(T,3)
• PROCEDURE SUB1
• PUBLIC X,T
• XC
• T???VFP
• RETURN

98

• ? Visual FoxPro ???,????????????,?????????????????
  ??????????????????????,??___30___??????????????
  A ?? B ??? C ?? D ??

99

• ? VFP ?,?????? PP.FRX ????(28) (2006??)
•   A. DO PP.FRX B. DO FORM PP.FRX
•   C.REPORT FORM PP.FRX D. REPORT PP.FRX
• ????? VFP ???,???ControlSource ????(29) (2006?)
•   A.ListBox ,Lable ,OptionButton
•   B.ComboBox ,EditBox ,Grid
•   C.ComboBox ,Grid ,Timer
•   D.EditBox ,CheckBox ,OptionButton

100
???????
101
??????

• (1)??????????????.mnx???,???????,??????.mpr???,??
  ??????
• (2)vfp???????????????
• (3)??????????,?????????(\lt),????
• (4)??????\-,???????,????CtrlJ
• (5)??Grid???????????,??????
• (6)??????do x.mqr
• (7)??????
• (8)SDI??????????????
• (9)?Sdi?????SDI???,do SDI??? with this,.T.

102

• ????????????,????????????????????SDI??,?????????,
  ?????????????????????SDI ????????,??????
  Show Windows ??????2??????,??????______?????????SD
  I????????(2003?)

103

• .?????????????????????????????VFP??????????????,??
  ??____(27)___??,????????
• VFP ????????,?????,?????? _____________ ???
• (2005?)
• ????????????( Y )(??????? ALTY ),?? Caption
  ??????? _____________ ?(2005?)

104

• TEST????????menu,?????????????????????????????
  ???,??????????1???
• 1. ?????????ALTF2. ?????????????,????
  ???????CTRLO3. ????????????????????4.
  ???????????,?????????????????5.
  ???????

105
??

• ??2?????T1.PJX?T2.PJX,2??????SJ1.DBC?SJ2.DBC,1??
  ????A1.DBF??????,?????____C____?
• A.T1.PJX?T2.PJX????SJ1.DBC??B.A1.DBF??????SJ1.DBC?
  ?????,??????SJ2.DBC?C.??T1.PJX???,???????\??????
  ??????T1.PJX????D.?T2.PJX???????????,???????????