老师，我按照您说的我自己又重新做了一个试了怎么不行呢？请给我看看吧！

就是要求能全部记录条都一点击就出来结果
如下：
　　不是只这样
　　评论1　　　评论2　　　评论3　　　评论4　　　总评论
　　正常　　　　正常　　　正常　　　　肥胖　　　需进一步检查
　　
　　而是全部记录条都一次性评价出来
　　评论1　　　评论2　　　评论3　　　评论4　　　总评论
　　正常　　　　正常　　　正常　　　　肥胖　　　需进一步检查
　　正常　　　　正常　　　正常　　　　正常　　　正常

　　即在总评论中一点击命令按钮，这2条记录就都出来结果，不用只在当前在一条上点击出结果。

新.rar (3.34 KB)

仔细检查一下，楼主的代码有许多错误的地方。另外不要用系统自动生成的工具条。

老师，您可能没有明白我说的意思，或者是我表达的不清楚，要是能语音交流就好了，我的意思是一点击更新总评价按钮就可以把上面第1个图片中的1－6条都评价出来。可是现在的情况是只有在当前页面时，点击更新总评价按钮只能出当前页面的总评价，却不能出现2－6或3－6的等等所有在DBF中记录的总评价。所以，我不知道这样的总评价功能如何实现？

老师，您可能没有明白我说的意思，或者是我表达的不清楚，要是能语音交流就好了，我的意思是一点击总评价按钮就可以把上面图片中的1－5条都评价出来。可是现在的情况是只能出第1条记录的总评价，却不能出现2－5的等等所有在DBF中记录的总评价。所以，我不知道这样的总评价功能如何实现？

[ 本帖最后由 shzhshg 于 2014-5-17 09:46 编辑 ]

Create Cursor T (评价1 C(4),评价2 C(4),评价3 C(4),评价4 C(4),总评价 C(100))
Insert Into T Values ("正常","超重","肥胖","正常","")
Insert Into T Values ("正常","正常","正常","正常","")
Insert Into T Values ("正常","肥胖","正常","超重","")
Insert Into T Values ("超重","正常","正常","正常","")
Insert Into T Values ("正常","正常","正常","正常","")
Replace All 总评价 With "评价1="+Alltrim(评价1)+",评价2="+Alltrim(评价2);
+",评价3="+Alltrim(评价3)+",评价4="+Alltrim(评价4)+",总评价：";
+Iif(Alltrim(评价1)="正常" And Alltrim(评价2)="正常" And Alltrim(评价3)="正常" ;
And Alltrim(评价4)="正常","正常","需进一步矫治检查")
Browse 

结果：

太谢谢老师了，我在这个论坛中感觉到老师们的真心帮助，我很感激！还有一个问题，就是还能不能在总评价中分一下类，就是有超重的提出“合理饮食”，肥胖的提出“要求减肥”等相应的建议！

超重和肥胖应该是一种情况吧，有问题一次性说清楚，不要挤牙膏
上传数据表看看

如果楼主对上面的代码还不能举一凡三，建议楼主从基础开始学习吧。

楼主的问题就象涛涛江水，一波未平，一浪又起，牙膏到现在还没挤完……
正如我在11楼的回复：如果楼主连这么简单的逻辑判断都处理不了，就想编写程序，无异于“隔着门坎上坑”。还是静下心来补补基础课吧。

可以评价所有的记录啊，表格里面的不就是所有记录的总评价吗？


[ 本帖最后由 qjbzjp 于 2014-5-18 16:05 编辑 ]