三、
1. 在change_c.prg文件中的內(nèi)容
CLOSE ALL
USE 商品表
IF FILE("商品表備份.DBF")
ZAP
APPEND FROM 商品表備份
ELSE
COPY TO 商品表備份
ENDIF
REPLACE ALL 單價(jià) WITH 出廠單價(jià)*.1 for SUBSTR(商品號,1,2) = '10'
SELECT 2
USE 單價(jià)調(diào)整表 ORDER 商品號
SELECT 商品表
SET RELATION TO 商品號 INTO 單價(jià)調(diào)整表
REPLACE ALL 出廠單價(jià) WITH 單價(jià)調(diào)整表.出廠單價(jià) for 商品號 = 單價(jià)調(diào)整表.商品號
SET RELATION TO
CLOSE ALL
3. 設(shè)計(jì)表單
(1). 在命令窗口中輸入建立表單命令
CREATE FORM form2
(2). 在“Form1”窗口中添加兩個命令按鈕,在第1個命令按鈕“屬性”窗口的Caption處輸入“調(diào)整”,在第2個命令按鈕“屬性”窗口的Caption處輸入“退出”。
(3). 雙擊“調(diào)整”命令按鈕,在“Command1.Click”編輯窗口中輸入“do change_c”,接著關(guān)閉編輯窗口。
(4). 雙擊“退出”命令按鈕,在“Command2.Click”編輯窗口中輸入“Release Thisform”,接著關(guān)閉編輯窗口。
相關(guān)推薦:北京 | 天津 | 上海 | 江蘇 | 山東 |
安徽 | 浙江 | 江西 | 福建 | 深圳 |
廣東 | 河北 | 湖南 | 廣西 | 河南 |
海南 | 湖北 | 四川 | 重慶 | 云南 |
貴州 | 西藏 | 新疆 | 陜西 | 山西 |
寧夏 | 甘肅 | 青海 | 遼寧 | 吉林 |
黑龍江 | 內(nèi)蒙古 |