标题:参数太多
只看楼主
走路晃悠悠
Rank: 1
等 级:新手上路
帖 子:139
专家分:0
注 册:2013-6-20
结帖率:100%
已结贴  问题点数:10 回复次数:12 
参数太多
m_noinf=val(thisform.txtnoinf.value)
m_nosup=val(thisform,txtnosup.value)

if m_noinf>m_nosup
messagebox("编号1不能大于编号2!",16,"错误")
return
endif
select tblcustom
locate for val(no)>=m_noinf and val(no)<=m_nosup
if found()
report form rcustom for val(no)>=m_noinf and val(no)<=m_nosup preview
else
messagebox('没有符合条件的记录可以打印。',16,'错误')
endif
运行上面的代码时会提示参数太多是怎么回事呢?
2013-06-25 22:02
hu9jj
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:红土地
等 级:贵宾
威 望:396
帖 子:11713
专家分:43267
注 册:2006-5-13
得分:0 
建议多学些基础知识,至少要学会如何调试程序。

活到老,学到老! http://www. E-mail:hu-jj@
2013-06-25 22:15
走路晃悠悠
Rank: 1
等 级:新手上路
帖 子:139
专家分:0
注 册:2013-6-20
得分:0 
回复 2楼 hu9jj
问题是现在学已经明显的来不及呀,我周末就要交作业了,所以才到这里求高手指点嘛
2013-06-25 22:20
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:323
帖 子:9621
专家分:26174
注 册:2012-2-5
得分:10 
以下是引用走路晃悠悠在2013-6-25 22:02:00的发言:

m_noinf=val(thisform.txtnoinf.value)
m_nosup=val(thisform,txtnosup.value)
if m_noinf>m_nosup
messagebox("编号1不能大于编号2!",16,"错误")
return
endif
select tblcustom
locate for val(no)>=m_noinf and val(no)<=m_nosup
if found()
report form rcustom for val(no)>=m_noinf and val(no)<=m_nosup preview
else
messagebox('没有符合条件的记录可以打印。',16,'错误')
endif
运行上面的代码时会提示参数太多是怎么回事呢?
这些代码是从表单中直接复制的?

坚守VFP最后的阵地
2013-06-25 22:20
走路晃悠悠
Rank: 1
等 级:新手上路
帖 子:139
专家分:0
注 册:2013-6-20
得分:0 
回复 4楼 sdta
是的,可以分析下哪里出错了吗
2013-06-25 22:24
TonyDeng
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:贵宾
威 望:304
帖 子:25859
专家分:48889
注 册:2011-6-22
得分:0 
平时不学习,临急抱佛脚,常见的了。

授人以渔,不授人以鱼。
2013-06-25 22:29
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:323
帖 子:9621
专家分:26174
注 册:2012-2-5
得分:0 
m_nosup=val(thisform,txtnosup.value)
m_nosup=val(thisform,txtnosup.value)
将[,]改为[.]
m_nosup=val(thisform.txtnosup.value)

坚守VFP最后的阵地
2013-06-25 22:35
走路晃悠悠
Rank: 1
等 级:新手上路
帖 子:139
专家分:0
注 册:2013-6-20
得分:0 
回复 6楼 TonyDeng
我可以弱弱的反驳一句我平时挺认真的吗?只是学得不好
2013-06-25 22:54
走路晃悠悠
Rank: 1
等 级:新手上路
帖 子:139
专家分:0
注 册:2013-6-20
得分:0 
回复 7楼 sdta
我又粗心大意了,谢谢啊
2013-06-26 01:27
hu9jj
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:红土地
等 级:贵宾
威 望:396
帖 子:11713
专家分:43267
注 册:2006-5-13
得分:0 
以下是引用走路晃悠悠在2013-6-25 22:54:08的发言:

我可以弱弱的反驳一句我平时挺认真的吗?只是学得不好
哦,应该说VFP学得很不好。
程序调试是编程的基本功。出错后挂起程序,就可以在调试器中查看出错的语句、各个变量的当前值、各个工作区中打开的表等等,根据这些情况判断出错的原因,进行排错。

活到老,学到老! http://www. E-mail:hu-jj@
2013-06-26 10:19



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-416066-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.020161 second(s), 7 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved