# Re: 试试看吧....

Posted by 大汉堡 on June 09, 1999 at 19:47:03:

In Reply to: 检查明细?? posted by 王空空 on June 09, 1999 at 15:29:24:

:
: : 3.销售明细 三个Table,其中2和3可以销售编号关连,1和3
: : 之间以产品编号关连 ,当销售状况编辑完毕,再检查明细
: : 档的资料是否有薯条.可乐,就可知道需不需要大汉堡
: 您所说的检查明细是如何检查呢？如果这种情况很多时，那又要如何做呢？不可能在程式中一一写明吧？

'你可以考虑再加一个Table记录产品间的关系
'栏位:被换产品,产品一,产品二,产品三...(视需要决定)
'于销售作业时,若有明细资料的登录,在登录完成后即检
'查是否需带出被换产品,所以还是要有一Function做这个
'检查工作
'Dim chk(2) As Boolean /初值False/
'"Select * from产品关系where 产品一 = '"&明细资料&"'"
' or 产品二 = '"&明细资料&"'"
' or 产品三 = '"&明细资料&"'"
'if 找到 then
' for icount = s_row to e_row /明细范围检查/
' if 产品一 = 明细资料 then
' chk(0) = true
' end if
' if 产品二 = 明细资料 then
' chk(1) = true
' end if
' if 产品三 = 明细资料 then
' chk(2) = true
' end if
' next
' if chk(0) and chk(1) and chk(3) then
' 带入被换产品
' end if
'end if
'好像有点乱.....
'这个Function可以想见不会太快,若需要再加快一点
'可以试着加一个Flag记录是否需带出别的产品(在产品
'资料Table)这样就可以决定做不做这个Function 或明
'细的检查........祝好运!

Follow Ups: