一个复合查询条件设计,大侠过来帮我看看

xymsgw 2003-04-25 03:57:36
我在一个查询表单中,添加三个Check控件,和对应的三个Text用于输入查询条件。
现在我用如下代码实现了对第一个Check1的查询操作,而且也达到了效果,

if empty(thisform.text1.value) and empty(thisform.text2.value) and empty(thisform.text3.value)

messagebox("请输入查询的条件",0+48+0,"注意")
else

locate for 朋友管理系统库_表1.姓名=alltr(thisform.text1.value)

if found()
myform.grid1.SetAll('DynamicForeColor','iif(朋友管理系统库_表1.姓名="'+alltr(thisform.text1.value)+'",RGB(0,35,255),myform.grid1.backcolor)','Column')
myform.grid1.refresh
else
messagebox("没有该记录",0+48+0,"注意")
endif
thisform.release

endif

现在的问题,我如何修改该代码,才能实现对三个Check的查询操作,即是:

当在Check1、Check2和Check3分别对的Text中输入了条件时,点按查询按钮,就可在上级一Grid中高亮显示查到的记录,上述三个Check输入的条件是只对应一个记录的,不同分别对应三个记录。也即是三个Check是一个记录的三个字段。现在成为查询条件了。

望大侠们点指一二。谢了。





...全文
64 8 打赏 收藏 转发到动态 举报
写回复
用AI写文章
8 条回复
切换为时间正序
请发表友善的回复…
发表回复
jiaxingxing 2003-04-26
  • 打赏
  • 举报
回复
to lz_zxf(沉香)
你的修改即使一条记录也要查3便的
lz_zxf 2003-04-26
  • 打赏
  • 举报
回复
cxtj = ".t."
if thisform.check1.value = .t.
if !empty(thisform.text1.value)
cxtj = cxtj + ".and.field1 = "+thisform.text1.value
endif
endif
if thisform.check2.value = .t.
if !empty(thisform.text2.value)
cxtj = cxtj + ".and.field2 = "+thisform.text2.value
endif
endifif thisform.check3.value = .t.
if !empty(thisform.text3.value)
cxtj = cxtj + ".and.field3 = "+thisform.text3.value
endif
endif
jiaxingxing 2003-04-26
  • 打赏
  • 举报
回复
如果text1 text2 text3 均为字符型
if empty(thisform.text1.value) and empty(thisform.text2.value) and empty(thisform.text3.value)

messagebox("请输入查询的条件",0+48+0,"注意")
else
x1= allt(thisform.text1.value)
x2= allt(thisform.text2.value)
x3= allt(thisform.text3.value)
cxtj="allt(字段1)=x1 and allt(字段2)=x2 and allt(字段3)=x3"

locate for &cxtj
if found()
xx=recn()
myform.grid1.SetAll('DynamicForeColor','iif(recn()=xx,RGB(0,35,255),myform.grid1.backcolor)','Column')
myform.grid1.refresh
else
messagebox("没有该记录",0+48+0,"注意")
endif
thisform.release
zhongyj 2003-04-25
  • 打赏
  • 举报
回复
我已經給你復了三條如果還看不到信息,重新登入CSDN
xymsgw 2003-04-25
  • 打赏
  • 举报
回复
怎么没有回答,帮小弟一下吧
zhongyj 2003-04-25
  • 打赏
  • 举报
回复
你要刷新頁面,我另外給你回了留言
xymsgw 2003-04-25
  • 打赏
  • 举报
回复
可以实现,但只是对条件Check1可以,我现在要对三个Check条件进行综合查询。
zhongyj 2003-04-25
  • 打赏
  • 举报
回复
已經回你的留言了
内容概要:本文围绕虚拟电厂与电动汽车之间的互动关系,采用主从博弈理论构建了二者间的优化决策模型,并引入条件风险价值(CVaR)来衡量和管理电力系统中由可再生能源出力不确定性及电动汽车充放电行为带来的风险。通过Matlab代码实现该模型,旨在优化虚拟电厂的调度策略,在保障系统经济性的同时提升其对不确定因素的鲁棒性。研究涵盖了模型构建、算法设计与仿真验证全过程,重点分析了不同风险偏好下虚拟电厂与电动汽车的博弈均衡结果及其对系统运行的影响,深入探讨了主从博弈框架下的决策机制与CVaR在电力金融风险量化中的应用。; 适合人群:具备一定电力系统基础知识和Matlab编程能力,从事能源互联网、电力市场、电动汽车调度、风险管理等相关领域研究的研究生或科研人员。; 使用场景及目标:①研究虚拟电厂如何协调管理大量分布式能源与电动汽车资源;②探讨主从博弈在电力市场中的建模方法与求解技巧;③利用CVaR工具量化并控制电力系统运行中的金融或运行风险;④通过Matlab实现复杂优化模型并进行仿真分析。; 阅读建议:此资源结合了博弈论、风险管理和电力系统优化等多学科知识,建议读者在学习过程中重点关注模型假设的合理性、CVaR的应用逻辑以及Matlab代码的实现细节,宜配合相关理论教材与案例进行深入理解和复现。

2,749

社区成员

发帖
与我相关
我的任务
社区描述
VFP,是Microsoft公司推出的数据库开发软件,用它来开发数据库,既简单又方便。
社区管理员
  • VFP社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧