鸭子tv国产极品在线观看_成人69视频在线播放_91精品免费在线观看_亚洲AT永久偷窥无码精品_国产精品自产拍在线观看涩浪潮久

江蘇省高校計(jì)算機(jī)等級(jí)考試命題研究院 江蘇省高校計(jì)算機(jī)等級(jí)考試輔導(dǎo)
2001年秋VFP上機(jī)卷部分疑難操作答案

2001年秋VFP上機(jī)卷部分疑難操作答案

***試卷VFP01

項(xiàng)目與數(shù)據(jù)庫(kù)操作

1.(3)出生日期的年份必須在1985年之前:

year(csrq)<=1985(用這種形式是包括1985年,因?yàn)樵囶}中含有1985年的記錄)

year(csrq)< 1985 (用這種形式不包括1985年,在確定時(shí),把對(duì)話框中的勾去掉,即不用此規(guī)則對(duì)照表中現(xiàn)有記錄)

3.  將性別字段的“男”、“女”分別改為“01”、“02

在“表”菜單中選擇替換字段,然后按如下設(shè)置:

或在命令窗口中輸入:repl all xb with “01” for xb=

repl all xb with “02” for xb=

查詢

1chaxuna:  查詢籍貫為非江蘇的學(xué)生,在篩選中進(jìn)行如下設(shè)置:

字段名

條件

實(shí)例

xs.jg

=

“江蘇”


2.  chaxunb:
做好后,運(yùn)行一下,其結(jié)果得從“顯示”菜單的“瀏覽tmp”中來(lái)看。

菜單

2 “學(xué)生信息”菜單項(xiàng)的過(guò)程代碼是:

use xs.dbf

     browse

表單

2 基本工資的顯示格式:在基本工資文本框的InputMask屬性中輸入:999,999.99

3.  其實(shí)這里指的就是熱鍵:在命令按Caption屬性中加上(\)就可以了。

   5 “新增”按鈕的代碼是:

append blank

thisform.refresh

   6 工齡文本框的校驗(yàn)代碼:

if !between(this.value,1,50)

       wait window "數(shù)據(jù)輸入不合法!"

       return 0

endif

**** 試卷VFP02

項(xiàng)目與數(shù)據(jù)庫(kù)操作:

  1.(5XS表的刪除觸發(fā)器: 這題的表達(dá)式比較復(fù)雜,如果想確切表達(dá)的話,應(yīng)該是:

year(date())-val(iif(left(xh,1)=0,“20”,19)+left(xh,2))>5

如果不嚴(yán)格的話,可以簡(jiǎn)化成: year(date())-val(19 +left(xh,2))>5

  3 這題與第一套試卷類似:

 repl all xh with “19”+xh  for left(xh,1)=”9”

repl all xh with “20”+xh  for left(xh,1)=”0”

菜單

  3. “統(tǒng)計(jì)學(xué)生人數(shù)”的過(guò)程代碼是:

public x

use xs.dbf

x=str(reccount())

wait window x

  4. “退出”菜單的代碼是:set sysmenu to defa

表單

 4LIST1DblClick事件代碼:

Thisform.LIST2.ADDLISTITEM(Thisform.LIST1.VALUE)

Thisform.LIST1.REMOVELISTITEM(Thisform.LIST1.LISTITEMID)

 5LIST2DblClick事件代碼:

Thisform.LIST1.ADDLISTITEM(Thisform.LIST2.VALUE)

Thisform.LIST2.REMOVELISTITEM(Thisform.LIST2.LISTITEMID)

 6>”按中增加的代碼

IF Thisform.LIST1.LISTCOUNT=0

   This.ENABLED= .f.

ENDIF

<”按中增加的代碼

IF Thisform.LIST2.LISTCOUNT=0

   This.ENABLED= .f.

ENDIF

 

**** 試卷VFP03

和前兩份試卷基本相同。

 

**** 試卷VFP04

查詢

2 其中的孤立記錄用右連接,在篩選中進(jìn)行如下設(shè)置(“條件”中可以用 = in )

字段名

條件

實(shí)例

Cj.xh

in

Xs.xh


    
并在“雜項(xiàng)”中把“無(wú)重復(fù)記錄”勾上。

表單

5.“確定”按的代碼(試卷中已給了答案):

IF EMPTY(Thisform.Text1.Value)

   SET FILTER TO

ELSE

   SET FILTER TO XH=ALLT(Thisform.Text1.Value)

ENDIF  

Thisform.Refresh()

6.在表格第一列的Header1DblClick事件中的代碼:

set order to xsxh

thisform.refresh

 

*** 試卷VFP05  、 試卷VFP06

與前面的基本相同。

 

*** 試卷VFP07

一. 項(xiàng)目與數(shù)據(jù)庫(kù)

 1.(2)在表的驗(yàn)證規(guī)則中寫(xiě):iif(xf>=3,bxk=.t.,bxk=.f.)

注意:點(diǎn)確定按時(shí)把對(duì)話框中的勾去掉。

3 和前面的類似,但要注意:

repl all kcm with alltrim(kcm)+”*” for bxk=.t.

查詢

1.    輸出字段為: left(xs.xm,2)  as  姓氏

                 conut(*)  as 人數(shù)

分組條件是姓氏, 排序條件兩個(gè): 人數(shù)  姓氏

在“雜項(xiàng)”中把“全部”前面的勾去掉,在下面的微調(diào)框里選擇10。

2.    輸出字段為: int(cj/10)*10  as 分?jǐn)?shù)段

                  conut(cj.cj)  as 人數(shù)

篩選條件是: xs.zydh=”110002  and  cj.kcdh=”01”

分組條件是: 分?jǐn)?shù)段

排序條件是: 分?jǐn)?shù)段

表單

1.組合框的RowSourseType為字段

3.選中表格,將ScrollBar屬性改為2——垂直

4.表格的Init事件代碼:this.column5.dynamicforeColor="iif(cj.cj<60,rgb(255,0,0),rgb(0,23,0))"

5.“計(jì)算”按的代碼:

sele cj

count to a1 for cj>=90

count to a2 for cj<90.and.cj>=80

count to a3 for cj<60

thisform.text1.value=a1

thisform.text2.value=a2

thisform.text3.value=a3