CLEAR
CLOSE ALL
POP KEY
SET SKIP OF MENU _MSYSMENU .F.
RELEASE QTFORM
USE D:\LKC
COPY TO LKC1   
USE
USE LKC1
appe from D:\LKC2
appe from D:\LKC3
B=ALLTRIM(thisform.text2.value)
LOCATE FOR DSPPH=B
SELECT  DSPPH , DJS ,  DPM ;
 FROM LKC1;
WHERE LKC1.DSPPH LIKE "%"+B+"%"   and LKC1.DJS> 0 ；
ORDER BY LKC1.DSPPH
 close data
erase  LKC1.DBF

*
我是菜鸟，请教大家，我用的是VFP3.0 ，我设计一个表单，有几步不懂
1、我在TEXT2不输入数据时，按查询，会全部数据显示，怎样可以没输入数据时不显示。
2、当输入数据后，表自动打开时，字段名怎样显示中文名（DSPPH：商品编号 ，DJS：件数 ， DPM：品种）
3、表打开时，DJS的最后一行求和显示总件数。
4、在这个表单加入打印键，并且将统计好的表打印出来。

用vf6 不用写这么多

1、我在TEXT2不输入数据时，按查询，会全部数据显示，怎样可以没输入数据时不显示。
B=ALLTRIM(thisform.text2.value)
if !empt(B)
LOCATE FOR DSPPH=B
SELECT  DSPPH , DJS ,  DPM ;
FROM LKC1;
WHERE LKC1.DSPPH LIKE "%"+B+"%"   and LKC1.DJS> 0 ；
ORDER BY LKC1.DSPPH
endi

请大家帮忙！！！

楼主有没有安装包？发一个

win 2000下能安装 3.0 么

taohua300 你说什么意思？

WIN2000可以呀，我在用的。

好吧，这里的亲们越来越顶级了，居然有用3.0的。哪天让我发现这里还有人用2.5 FOR DOS的，就赞了。

BROWSE FIELDS DSPPH :H=[商品编号],DJS :H=[件数],DPM :H=[品种]

SELECT COUNT(DJS) NJS FROM TABNAME INTO CURSOR TEMP
INSERT INTO TABNAME (DSPPH,DJS) VALUES ([合计],NJS)

4、在这个表单加入打印键，并且将统计好的表打印出来。

自己学着做吧

sdta :

我输入“SELECT COUNT(DJS) NJS FROM TABNAME INTO CURSOR TEMP
             INSERT INTO TABNAME (DSPPH,DJS) VALUES ([合计],NJS)”时，保存时显示“命令中含有不能识别的短语或关键词“