首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 数据库 > VFP >

统计的有关问题!

2012-03-13 
统计的问题!!我做了个统计用的表单,在表单中想实现按品牌和型号统计本月的进库数量,品牌和型号分别属于两

统计的问题!!
我做了个统计用的表单,在表单中想实现按品牌和型号统计本月的进库数量,品牌和型号分别属于两个表中,进库数在另一个表中,我有select选出了数据,但不知道该怎么在文本框中显。我写的语句是:
pingp=alltrim(thisform.combo1.value)
xingh=alltrim(thisform.combo2.value)
mmonth=month(date())
select sum(数量) From 进库表 Where alltrim(品牌)=pingp .and. alltrim(型号)=xingh .and . val(month(进库日期))=mmonth 
想把这个数量表现在这个表单的Text4上.

[解决办法]
select sum(数量) as ms From 进库表 Where alltrim(品牌)=pingp .and. alltrim(型号)=xingh .and . val(month(进库日期))=mmonth INTO CURSOR dd
thisform.text1.Value=dd.ms


[解决办法]
pingp=alltrim(thisform.combo1.value)
xingh=alltrim(thisform.combo2.value)
mmonth=month(date())
select sum(数量) AS TTL From 进库表 Where 品牌=pingp and 型号=xingh and val(month(进库日期))=mmonth INTO CURSOR TMPTABLES
THISFORM.TEXT4.VALUE=TMPTABLES.TTL

[解决办法]

SQL code
Select Sum(数量) As 总数 Into Cursor T1 From 进库表 Where Alltrim(品牌)==Alltrim(Thisform.combo1.Value) And Alltrim(型号)==Alltrim(Thisform.combo2.Value) And Month(进库日期)=Month(Date())Thisform.Text4.Value=Nvl(T1.总数,0)    && Thisform.Text4.Value 为数值型*Thisform.Text4.Value=Transform(Nvl(T1.总数,0)) && Thisform.Text4.Value 为字符型 

热点排行