第10套
一、
ALTER TABLE TABB ADD COLUMN 日期 D
在文件two.prg中存放:
UPDATE TABB SET 日期 = {^2005.10.01}
在文件three.prg中存放:
SELECT DISTINCT * FROM TABA INTO TABLE TABC
1. 單擊“工具\向?qū)報表”菜單項,并顯示“向?qū)нx取”對話框。
2. 在“向?qū)нx取”對話框中,選擇“報表向?qū)А辈螕簟按_定”按鈕,并顯示“報表向?qū)А睂υ捒颉?/P>
3. 在“報表向?qū)А睂υ捒虻摹安襟E1-字段選取”中,首先要選取表“taba”,在“數(shù)據(jù)庫和表”列表框中,選擇表“taba”,接著在“可用字段”列表框中顯示表taba的所有字段名,并選定所有字段名至“選定字段”列表框中,單擊“下一步”按鈕。
4. 在“報表向?qū)А睂υ捒虻摹安襟E2-分組記錄”中,單擊“下一步”按鈕。
5. 在“報表向?qū)А睂υ捒虻摹安襟E3-選擇報表樣式”中,在“樣式”中選擇“隨意式”,單擊“下一步”按鈕。
6. 在“報表向?qū)А睂υ捒虻摹安襟E4-定義報表布局”中,在“列數(shù)”處選擇為“1”,在“方向”處選擇“橫向”,在“字段布局”處選擇“列”,單擊“下一步”按鈕。
7. 在“報表向?qū)А睂υ捒虻摹安襟E5-排序次序”中,選定“No”字段并選擇“升序”,再單擊“添加”按鈕,單擊“完成”按鈕。
8. 在“報表向?qū)А睂υ捒虻摹安襟E6-完成”中,在“報表標(biāo)題”文本框中輸入“計算結(jié)果一覽表”,單擊“完成”。
9. 在“另存為”對話框中,輸入保存報表名“p_one”,再單擊“保存”按鈕,最后報表就生成了。
二、
在文件four.prg中存放:
USE TABA
SCAN
X = B**2 - 4*A*C
IF X >= 0
XX1 = (-B + SQRT(X))/(2*A)
XX2 = (-B - SQRT(X))/(2*A)
REPLACE x1 with xx1,x2 with xx2
ELSE
REPLACE x1 with .null.,x2 with .null.,NOTE WITH "無實數(shù)解"
ENDIF
ENDSCAN
1. 打開并修改表單
MODIFY FORM testA
2. 先按住Shift鍵,同時選中“查詢”和“退出”兩個按鈕,在其“屬性”的Width處輸入“80”,在Height處輸入“30”,在Top處輸入某一個數(shù)即可。
3. 雙擊“查詢”按鈕,在Command1.Click編輯窗口中輸入“SELECT * FROM TABA WHERE note = "無實數(shù)解" into table TABD”語句,并關(guān)閉編輯窗口。
4. 雙擊“退出”按鈕,在Command2.Click編輯窗口中輸入“RELEASE THISFORM”語句,并關(guān)閉編輯窗口。
相關(guān)鏈接:北京 | 天津 | 上海 | 江蘇 | 山東 |
安徽 | 浙江 | 江西 | 福建 | 深圳 |
廣東 | 河北 | 湖南 | 廣西 | 河南 |
海南 | 湖北 | 四川 | 重慶 | 云南 |
貴州 | 西藏 | 新疆 | 陜西 | 山西 |
寧夏 | 甘肅 | 青海 | 遼寧 | 吉林 |
黑龍江 | 內(nèi)蒙古 |