全國等級考vfp模擬題(3).doc

三程序填空題 1有如下程序段，其功能是顯示漢字“2008年北京申奧成功!”從屏幕的頂部移至底部，請?zhí)羁昭a充該程序。 CLEAR CH=2008年北京申奧成功! R=1 DO WHILE R=23 R,26 SAY SPAC(60) ,26 SAY CH T=INKEY(0.2) ENDDO RETURN2 已知兩個數(shù)據(jù)表，圖書表TS.DBF和訂單表DD.DBF，要求計算訂單金額。圖書表TS.DBF結(jié)構(gòu)如下： 書號 書名 作者 出版社 單價 Y001 C語言 王曉 大眾出版社 21.50 J002 計算機基礎(chǔ) 程力 科技出版社 26.00 J003 計算機導(dǎo)論 舒彥 電子出版社 30.50 W004 網(wǎng)頁制作 嚴(yán)瑾 科技出版社 28.30訂單表DD.DBF結(jié)構(gòu)如下： 訂單號 書號 數(shù)量 金額 001 Y001 150 002 J001 200 003 J003 50 004 W004 100 閱讀下面程序，請將程序補充完整。 CLEAR ALL SELECT A USE TS INDEX TO TSS SELECT B USE DD SET RELATION TO 書號 REPLACE ALL 金額 WITH LIST 訂單號，書號，TS.書名，TS.單價，數(shù)量，金額 RETURN 3下面程序功能是為數(shù)據(jù)表SB-1.DBF編制一個輸入程序，要求可連續(xù)添加記錄。 USE SB-1 DO WHILE .T. CLEAR 2,5 SAY 請?zhí)砑佑涗洠?4,5 SAY 編號 GET 編號 6,5 SAY 名稱 GET 名稱 8,5 SAY 啟用日期 GET 啟用日期 10,5 SAY 價格 GET 價格 12,5 SAY 部門 GET 部門 14,5 SAY 主要設(shè)備 GET 主要設(shè)備 18,5 SAY 是否輸入商標(biāo)內(nèi)容?(YN) GET SHB DEFAULT SPACE(1) READ IF UPPER(SHB)=Y MOD IF Y GENERAL 商標(biāo) ENDIF 20,5 SAY 是否繼續(xù)添加?(Y/N) GET JX DEFAULT SPACE(1) READ IF LOWER(JX)=N ENDIFENDDO RETURN 4如下圖所示，用標(biāo)簽、文本、命令按鈕構(gòu)成一個表單。在標(biāo)簽中顯示以下文字“當(dāng)前時間”，運行表單時，單擊“顯示”按鈕將顯示系統(tǒng)時間；單擊“清除”按鈕，文本框中的內(nèi)容將被清除，單擊“退出”按鈕，將退出表單運行。為完成上述要求： (1) “清除”按鈕的Click事件代碼是 (2) “退出”按鈕的Click事件代碼是 (3) “顯示”按鈕的Click事件代碼是 (4) 應(yīng)該設(shè)置表單的 屬性為 5設(shè)數(shù)據(jù)表STUD.dbf有字段：學(xué)號，姓名，性別，年齡，民族，專業(yè)，成績等字段。下面是按以下要求寫出有關(guān)的SQL命令，請補充完成。 (1)在表中插入個學(xué)生的記錄：(200211001，李晚，女，18) SQL語句： INSERT； STUD(學(xué)號，姓名，性別，年齡)； Values(200211001、李晚、女、18) (2)列出所有男學(xué)生的姓名，性別與年齡。 SELECT 姓名，性別，年齡； FROM STUD； 性別=男6、閱讀程序，請將程序補充完整X=0CLEARDO WHILE .T. 10，20 SAY ”主萊單” 11，22 SAY ”1輸入數(shù)據(jù)” 12，22 SAY ”2查詢記錄” 13，22 SAY ”3統(tǒng)計記錄” 14，22 SAY ”4退出系統(tǒng)” 15，22 SAY ”請輸入選擇 14：” GET X DO CASE CASE X=1DO SUB1 CASE X=2DO SUB2 CASE X=3DO SUB3 CASE X=4 7、下面程序的功能是利用參數(shù)傳遞求三個圓柱體積*主程序 EX.PRGCLEARFOR K=1 TO 3INPUT ” 圓半徑 R= ” TO RINPUT ”高H= ” TO H DO SUBYZ ？”圓柱體 V=”，INT（V）ENDFORRETURN*子程序 SUBYZ.PRGPARA V=3.14*R2*HRETURN8、完成下面的程序。 *乘法九九表jjb.prg*1) 1 2) 2 4 3) 3 6 9 4) 4 8 12 16 5) 5 10 15 20 25 6) 6 12 16 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 SET TALK OFF CLEAR FOR j=1 T0 9 ?STR(j，2)+) FOR ? ENDFOR ? ENDFOR Set TALK ON RETURN9、填上適當(dāng)語句，使之成為接收到從鍵盤輸入的Y或N才退出循環(huán)的程序。 DOWHILE .T WAIT 輸入Y/N TO yn IF(UPPER(yn) Y.AND(UPPER(yn) N ELSE EXIT ENDIF ENDDO10、程序APRG的功能是求1到100之間所有整數(shù)的平方和并輸出結(jié)果，請?zhí)羁铡?*APRG* SET TALK OFF CLEAR S=0 X=l DO WHILE X=100 ENDDO ?S11、設(shè)有學(xué)生成績表