主题：请网友参加讨论用行动，支持、理解、尊敬答题义工（关于 myww 先生的复贴）
cbl518
[专家分：57140] 发布于 2007-10-21 02:05:00
[url=http://www.programfan.com/club/post-254780.html]点击看原贴：我的答贴在 5楼 myww 先生的复贴在 7 楼。
该程序运行在 vfp 9 环境下，
4楼是运行在 vfp 6 环境下[/url]
[color=0000FF][size=3]敬请各位请网友运行下面代码：[/size][/color]
[color=FF0000]*cbl518老师的程序，如果我赋值“剩余数量=53.035”，显示的大写是零吨。若将剩余数量直接改为53.035，则大写显示“伍拾叁点零叁伍吨”，是我需要的字符。[/color]
剩余数量=53.035 [color=FF0000]&&放在这个位置不行[/color]
LOCAL c数,c名,大写,c1
c数="零壹贰叁肆伍陆柒捌玖"
c名="拾佰仟万"
大写=""
*剩余数量=53.035 [color=FF0000]&&放在这个位置还是不行[/color]
c1=LTRIM(STR(INT(剩余数量),6))[color=FF0000] &&将剩余数量改为53.035就行[/color]
IF VAL(c1)=0
大写="零"
ELSE
FOR i=1 TO LEN(c1)
大写=IIF(INT(VAL(SUBSTRC(c1,i,1)))=0,大写,大写+SUBSTRC(c数,INT(VAL(SUBSTRC(c1,i,1)))+1,1)+SUBSTRC(c名,LEN(c1)-i,1))
ENDFOR
ENDIF
c1=ALLTRIM(STR(剩余数量%1,4,3),1,"0") &&将剩余数量改为53.035就行
IF VAL(c1)>0
大写=大写+CHRTRANC(c1,'.0123456789','点'+c数)
ENDIF
大写=大写+"吨"
*REPLACE DX WITH 大写
?大写
最后更新于：2007-10-21 07:54:00
回复列表 （共41个回复）
沙发
cbl518 [专家分：57140] 发布于 2007-10-21 03:08:00
myww 先生：
确切的说，你应该是编程的老手了，而且年龄也不小了，这种帖子出在你的手，使我很意外。
我不知道你是有意或无意，伤害一个帮助你的人。但不管怎样你的复贴确实，使我寒心。
如果，我没猜错的话:
你在测试代码的时候，《RK》数据表是打开的，并且纪录指针是是指向数据表尾部的。
所以当你用与字段同名变量赋值后，结果是：“显示的大写是零吨。”
如果你关闭数据表，就可以获得正确结果。
你如果是无意的，
那么说明你极不尊重，网友对你提供帮助的劳动成果。
你只要稍微看一下代码，就可知道代码根本不会出现“显示的大写是零吨”的问题。
网友对你提供帮助，是为了让你研究各种编程的技巧，而不是让你去给鉴定的。
你连分析都不分析，就枉下结论，是对网友负责的态度吗？
我年纪大了，是对面子看得很重。
所以，每次我回答网友的问题，都是很谨慎的。
不是不负责任乱写的。
希望你能够理解，每个答题者的辛苦义务劳动行为。
以上语言有不敬，还望谅解！！！
板凳
moz [专家分：37620] 发布于 2007-10-21 08:54:00
有见过义工投诉没小费吗？
3 楼
cbl518 [专家分：57140] 发布于 2007-10-21 09:25:00
moz 先生：
你的回帖什么意思！
年纪轻轻的，讲话阴阳怪气。
什么“投诉”“收小费”，请你讲清楚！
不要造谣滋事，诬蔑别人的人格。
讲究点做人的基本道德！！！
4 楼
moz [专家分：37620] 发布于 2007-10-21 10:26:00
呵呵，居然还捡了十分，捡大便宜了，谢谢。
5 楼
0901chang [专家分：10660] 发布于 2007-10-21 15:07:00
哈哈，cbl518兄，你又被moz踩到尾巴了。
6 楼
jinlonggao [专家分：17130] 发布于 2007-10-21 15:14:00
cbl518先生说得没错，当程序中的变量名与当前工作区中打开的数据表的字段同名时，字段名优先．我以前没注意到这一点，现在一验证，果然如此．看来myww可能真的出现了如cbl518先生所说的那样的问题．要说myww，看来真应该多动脑筋思考，或者直接发消息询问cbl518先生，发了那样的贴子有点欠妥．但话说回来，也不是多大的问题．cbl518也用不着生那么大气．可能是myww还没有看到这个贴子，我想若看到了，肯定会向chbl道歉的．
至于ＭＯＺ先生，chibl想必也知道，就是一个爱开玩笑的人，chibl老师也不必太在意．我想他的本意也许和我发的这个贴子一样，活跃一下气氛，舒缓一下您的情绪，让您不要太生气．
这段时间以来，本人有点忙，很少解答问题，但本论坛上的贴子，几乎每天都在关注，chibl先生解答的每一贴，我基本上都看了，可以说chibl先生对ＶＦＰ的理解和精通，是本论坛数一数二的（我本来想说无人能比，但又怕太绝对了，万一还有那么一个高手没露面呢？）．
chibl先生的造诣，本论坛中的朋友，在概人人心中有数，个别不妥的议论或贴子，是不会伤及到chibl先生的声誉和名望的，所以，也请chibl不必在意这些枝节问题，免得气大伤身！
7 楼
jinlonggao [专家分：17130] 发布于 2007-10-21 15:29:00
乌雅老兄，你也在网上，看来，chibl先生又说对了，人是越老越爱面子，连乌雅兄也开始不愿意说自已黑了，不黑的乌雅，那还叫乌雅吗？要么改叫＂天鹅＂算了！或者叫＂由乌雅变来的天鹅＂！哈哈哈！
8 楼
北京种子乐 [专家分：3710] 发布于 2007-10-21 15:31:00
哈哈！
都是无产阶级，无产阶级内部，没有根本的厉害冲突。
moz、cb1518都是顶好顶好好人，myww吗......
让我们携手并肩，奔向ＶＦＰ美好的明天。
9 楼
cbl518 [专家分：57140] 发布于 2007-10-21 15:46:00
谢谢二位老弟的参与和支持！
论坛的活跃，是我们每个人个的愿望，
因为我们可以，从不同人的身上，学到不同的编程的技巧！
对回帖人的爱护和尊敬，
可以吸引大批高手，给我们解答问题！
我看过以前的帖子，确实有很多高手的出现，
但是现在不来了。不能讲不是论坛的一个损失！
所以我发了这个帖子，希望网友们重视此类问题！
高老师讲的《变量名与当前工作区中打开的数据表的字段同名时，字段名优先》是对的。如果要使用同名变量，就要在同名变量前，添加 m. 写成： m.同名变量 即可。对于高老师的鼓励，本人还是认为，人外有人天外有天。我相信有你和大批的支持，论坛会更活跃。这样我们才能学到，更多的知识。
衷心感谢二位老弟！！！
10 楼
moz [专家分：37620] 发布于 2007-10-21 16:28:00
呵呵,不愧是为人师表,开导人果然有一套.还会帮人家说话,我还不够你的姜辣.
To: cbl518
诚然,你经验丰富,技术还算灵活,研究学问很认真,也懂得不断尝试和变通,甚至让我看到我当年的影子.论坛上不管是众多的新人,学生,还是老到的老师,高手,老手,都对你赞誉有加.这是称赞你的说话,你不用谦虚,这是转折点----
在我们这种国家这种社会里,你那刚直的性格居然能至老不屈,实在是让我佩服与惊讶.我少年时的原则早屈服于现实社会中的无奈,甚至接受命运中的不公平.在你面前显得很惭愧很渺少.
老人做得再无理,谁也没法去指责,当然,我没有批评你的意思.只是建议,听不听得进去那是另外一回事,跟我没有关系了.
建议A: 别再太在乎得失与回报了,别人的是否认同是别人的权利,更何况那只是网友,并没有给你投诉与行政处理的机会.到头来损失的不是别人的声誉,而是自己的心情.
建议B: 宽恕世人吧,世人愚昧,没必要去计较太多.
建议C: 良好的生活态度,宽容的生活心情,该是老人应该能从生活中学到的,
建议D: 做义工的人,估计没几个人会去计较收获与得失.因为那早已不是做义工的目的.
建议E: 老人生活安心,安享老年,生活少忧少虑,是儿女的幸福.动辄怒火攻心乱叫嚷,不但会影响身体健康心理健康,更是拖了儿女的后腿,让儿女凭添无尽负担与烦恼.
建议F: 因为别人的原因,而影响自己良好的心情,实在是很愚蠢的做法.要时刻警醒.
没有给的那一二十分,没有老高的那几句话,我也不会说那么多.
好吧,大家可以开始分点鸡蛋和西红杮给我了,好让我回家西红杮炒鸡蛋.不要砖头.
我来回复
您所在位置：