pfsuse 发表于 2008-6-8 01:07

按姓名查询问题???

[tk11] 题目要求是:有两个(成绩表和学生表)表,有共同的字段---学号,在表单的数据环境中添加进入.在把两个表中的一些字段拖入表单中,在编辑command1的click事件,要求是按姓名查询,姓名字段只在一个表中.请问各位高手>>>>>..谢谢..我的编程如下:
     loca for 成绩.学号=alltrim(thisform.text1.value)
if found()
   thisform.refresh
else
   messagebox('没有你要输入的姓名!',0,"提示")   
endif

heychen 发表于 2008-6-8 08:35

这是我自己的查找按钮

set talk off
cz=0
if empty(thisform.text1.value)
=messagebox("请输入货件编号",48,"警告")
thisform.text1.setfocus
cz=9
else
    scan all for allt(编号) = allt(thisform.text1.value)
    thisform.grid1.setfocus
    THISFORM.grid1.REFRESH
    cz=cz+1
exit
endscan
endif &&if empty(thisform.text1.value)
if cz=0
=messagebox("没有你要查找的货件",48,"警告")
endif

caohong 发表于 2008-6-16 18:24

个人想法 仅供参考

[tk05]
数据库 编辑参照完整性
    首先:将两个表放在同一数据为,设置(学生表.学号)为主索引 和 (成绩表.学号)索引关联,父表(学生表) 子表(成绩表);
    其次:建立表单,在新表单上加入控件grid(显示子表记录),建立文本框text以输入父表学生名字用;
    然后:建立command的查询事件;
    最后:调整,美化(以便显示所需要的字段)。
思路仅为个人想法[tk05]

页: [1]

编程论坛