PB 做统计窗口时,统计结果为空时不显示数据(理论上应显示为0),统计按钮脚本为:real adate(sle_1.text)if sle_1.text="" then \x05messagebox("提示","请输入购入时间")else\x05select sum(cast(buyprice as decimal(10,

来源:学生作业帮助网 编辑:作业帮 时间:2024/05/05 02:05:09
PB 做统计窗口时,统计结果为空时不显示数据(理论上应显示为0),统计按钮脚本为:real adate(sle_1.text)if sle_1.text=

PB 做统计窗口时,统计结果为空时不显示数据(理论上应显示为0),统计按钮脚本为:real adate(sle_1.text)if sle_1.text="" then \x05messagebox("提示","请输入购入时间")else\x05select sum(cast(buyprice as decimal(10,
PB
做统计窗口时,统计结果为空时不显示数据(理论上应显示为0),
统计按钮脚本为:
real a
date(sle_1.text)
if sle_1.text="" then
\x05messagebox("提示","请输入购入时间")
else
\x05select sum(cast(buyprice as decimal(10,2)))
into :a
from bought
where buydate=:sle_1.text;
messagebox("",a)
sle_2.text=string(a)
\x05return
end if

PB 做统计窗口时,统计结果为空时不显示数据(理论上应显示为0),统计按钮脚本为:real adate(sle_1.text)if sle_1.text="" then \x05messagebox("提示","请输入购入时间")else\x05select sum(cast(buyprice as decimal(10,
real a
a=0
date(sle_1.text)
if sle_1.text="" then
messagebox("提示","请输入购入时间")
else
select sum(cast(buyprice as decimal(10,2)))
into :a
from bought
where buydate=:sle_1.text;
if (a0) then
messagebox("",a)
sle_2.text=string(a)
end if
return
end if