回 帖 发 新 帖 刷新版面

主题:请网友参加讨论用行动,支持、理解、尊敬答题义工(关于 myww 先生的复贴)

[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 大写
?大写

回复列表 (共41个回复)

21 楼

喂!喂!!
小家伙:我是不是成了论坛脾气最坏的老宠物了!!!
哈哈……
有意思!!!

22 楼

哈哈,cbl518兄,这次是帽子赢了,把你的尾巴踩扁了。

moz兄,你的功力又长进了。

老高,你可以当政委了,乌鸦吗,自诩不黑,经常挑动群众斗群众,然后偷偷地学点东东。

若想避免字段名和相同的变量名的系统优先问题,用规范的语法书写:在变量之前加《M.》。

当算法比较复杂时,用规范的书写格式,会减少很多麻烦;当程序比较庞大时,尽量不要太简化语句,多加注解,以方便以后的维护。

23 楼

各位仁兄,出一道难题:那位能猜出乌鸦为何自诩不黑。

24 楼

yjr同学,严重警告你:说真话绝对不是一个好习惯,以后要注意啦。

乌同学,不要撩事斗非,是不是想引别人来批斗我啊?贼喊抓贼,那有什么好吹的?我也整天对老婆说一生只爱你一个,对当说我永远忠于当。这世上能有几个人懂得抹自己黑的?

25 楼

[quote]各位仁兄,出一道难题:那位能猜出乌鸦为何自诩不黑。[/quote]
是不是绝无仅有,与众不同的意思?

26 楼

moz 先生:你好!
[quote]To: cbl518
老人做得再无理,谁也没法去指责,当然,我没有批评你的意思.只是建议,听不听得进去那是另外一回事,跟我没有关系了.
建议A: 别再太在乎得失与回报了,别人的是否认同是别人的权利,更何况那只是网友,并没有给你投诉与行政处理的机会.到头来损失的不是别人的声誉,而是自己的心情.
建议B: 宽恕世人吧,世人愚昧,没必要去计较太多.
建议C: 良好的生活态度,宽容的生活心情,该是老人应该能从生活中学到的,
建议D: 做义工的人,估计没几个人会去计较收获与得失.因为那早已不是做义工的目的.
建议E: 老人生活安心,安享老年,生活少忧少虑,是儿女的幸福.动辄怒火攻心乱叫嚷,不但会影响身体健康心理健康,更是拖了儿女的后腿,让儿女凭添无尽负担与烦恼.
建议F: 因为别人的原因,而影响自己良好的心情,实在是很愚蠢的做法.要时刻警醒.

没有给的那一二十分,没有老高的那几句话,我也不会说那么多.
好吧,大家可以开始分点鸡蛋和西红杮给我了,好让我回家西红杮炒鸡蛋.不要砖头.[/quote]
moz 先生:
谢谢你,你第一次这样开诚布公地跟我讲这些心里话!使我很是感动。
正象你说讲的,认真、刚直、至老不屈的性格伴随,我风风雨雨55年了。
说实在的为此我没少吃苦头,甚至影响了我一生的多次机遇。
但是我不后悔,不怨天尤人。
欣慰的是从小到老,我总能将每一次想干的事情,当作责任去奋斗,直至圆满完成!
恐怕这种性格,要陪葬我到生命的最后一刻了。

你的建议我认真的思考过:
提到“得失与回报”的问题。也许咱们有不同的看法:
人吗或多或少总是有虚荣心的,作为一个专家,更是如此。

到医院看病专家问诊比普通门诊挂号费要贵出几十倍,这并不是意味着,他们就一定能医好病。
同理我们既然到此做义工,自然也不会计较个人得失的。
但是,这并不意味着,我们可以随意被人宰割。

做为人来讲,自己的尊严随时要保持的,不可丢弃的。
你讲的“没有给的那一二十分,我也不会说那么多”,
为想你不是为了 一二十分 吧。这就是自尊心的表现吧。

当熟悉你的人打开网页,看看咱门的帖子,
竟然发现一个专家答题水平如此低下,如此骗人。
其后果就会给今后的,工作和生活带来麻烦的。

我正式介入,该网站答题应该是 4 月中旬,至今我已经 2000 多个小时了,这就意味着,我在网站上度过了100个不眠的日日夜夜。但是我没得到尊敬,连最起码的人格都保障不了,你觉得有意义吗?

讲究报酬的话,我可以放下架子,随便帮人做点事,最起码可以混上一顿几百上千元的饭吃。
同等精力去为社会尽义务,可以拯救多少失学的儿童!同时也给自己带来荣誉。
无论干点什么,总比在这计较这点毫无任何价值的名义分强多了。

一个专家把持一个论坛,每天 10 多小时,回答问题平均十帖以上,
竟然至今才2万分,获得如此下场,真可谓是可涕可悲啊!

我不知道,怎么稀里糊涂搞了个版副,我想我也尽职尽责,对得起网友们了。
是该考虑应该考虑的事情了。

至于安享老年:
也许我是毛泽东时代的青年人,有点忧国忧民的思想吧。
作为 vf 来件,它是个数据库专业开发软件,历经30都年了,
但是现在无论高低的手,真正用数据库编程几乎是寥寥无几。
数据库的属性、方法、事件、存储过程、有效规则、数据完整性、视图。
对象中的数据环境属性、方法、事件
这些 vf 主要得精髓尽然成了废品。
难怪我们这么大的国家,还在用外国操作系统和应用软件啊!

好了,有机会在谈!!!

27 楼

滚滚长江东逝水,青山依旧在,几度夕阳红.
夕阳无限好,不惧近黄昏.
大江东去浪淘金.
俏也不争春,只把春来报.
我们都是vfp的爱好者,为了同一个目标,大家走到一起来,这里的高手非常多,
我发至内心的感谢各位老师的帮助,我愿老师技艺不断相互提高.

28 楼

这一帖讨论的这么热烈,还是CB1518老师有号召力呀。

29 楼

也许是你已年迈,有的思想你已经没法接受了。
你可以看看你我的对比,我回复过的贴子数量几乎是你的一倍,
但我不再关心得分,因为我知道在世上,不可能强迫别人的认同。
而你的分数,有一部分是提醒别人甚至是“强迫”别人的认同。

我曾经也有过这个阶段,不过我只是在签名里提示过一段时间后,就没再想了。

一个人期望太高,失望必定会随之而来。
非要在网上去认真,说明你正处于我当年的位置上:
1.人生就没有其他更无聊的事情了。
2.习惯于荣誉的伴随,别人的认同对于你实在太重要了。

这可能是从领导角度和从被领导角度看事物的区别吧。
别人赏识认同了,便是知音,更能动力激励奋斗,互相进步。
但别人不可能全是伯乐,而自己更不是千里马
(非得认自己是千里马已经是很多很多年以前的事情了。)
没有别人的承认,也就一笑过之,有什么好可惜的?

世界那么大,什么人都有。
年轻人最重要的是知错能改。
但老年人,就没办法了。
因为那几十年的经历都没有把他的习惯和看法改变,就再也没有其他能改变他的事情了。

如果说,呕心沥血的日夜奋战的为了帮一个网友去解决问题,
不但没有得到感谢,甚至还说我的努力是错的,这样就是侮辱我。
那这样的侮辱也太多了,无处不在。
其一,这世界误会有很多,绝大部份出自于自己胡乱猜想,如果自己方向把握得好,甚至可以真错变误会,收获更大。
其二,这世界人也有很多,并不是每人都非要像自己一样去为人做事。
其三,别人并没有承诺要回报什么,也没有兑现的必要。如果为了目的来上论坛,那还是少来好。上论坛是为了表现自己,得到别人的认同。但这并非必然的事情,就像买彩票,不是买了就一定中的。没中奖就气败气急,谁叫你买了?谁逼你买了?有人赞同自己了,那是中了奖,中一次奖就得意忘形,然后接下来就拼了命的去买彩票,结果会如何?

我并不在乎那一二十分,而只是从那一二十分里看到,
你这一次还不那么强烈的反感于我。
否则这手就不会下得这么轻易了。
我仇视某人的时候(当然,这种感觉是很多年以前的事情了),
我不会让他在我这里得到丝毫好处,成语上就叫做睚眦必报。
对于不畏强权,敢于直言(更何况是在网上),我相信我能比乌鸦,只是对象不同而已。
甚至建议你有时间多看看自己的发言,
中间是否夹带有太多情绪化的东西了,
有没有胡乱猜想气败气急生安白造的东西,
做不到十足,有没有尽量避免?
假如这些句子是别人对你说的,不管自己做过些什么,你会怎么想?
当然,这些评论并不是在抵毁你或者是在评论你,
对于我来说,每个人有错都是有道理的,
我说这些,也只是提醒你,平时能反省自身,心平气和。
酒色财气,气最为伤身。会冲昏头脑,然后讲多错多。

我承认自己的思想也很怪诞,我也不奢求别人的认同,
之所以有现在这样的心态,很大程度与年轻时候看的小说有关,
古龙,对于七十年代人,影响不可谓不深。
建议有时间可以看看他的后期小说来慰解寂寥,
你会发现,世界其实可以更大一些。

--------------
FoxBase,FoxPro,Visual FoxPro一路走来不容易,
对数据库发展也产生了不小的影响,
今天事至今日,它已经算是一个低级的初级的数据库系统了,
大型的高级数据库系统已经走了很远很远了。
而编程中对象的属性方法等等大部份也只是操作系统的调用,
真正数据库操作VFP是比较落后的技术。
我已经没有基础和精力和时间和条件去学习更好的更高的东西了,
也只是在落后的回忆里寻找慰藉,这就是我在论坛上的理由。
对于国家来说,历史与社会的特点,导致了我们的落后也环境的限制,
美国人之所以能在这一二十年里把操作系统把软件把VFP进步得那么快,
是因为他们心无杂念,一心一意为技术为效率为改进为进步。
我们输在起跑线上,输在中途对待态度上,输在目标上,输在环境条件上。
中国人贪图捷径,好大喜功,破解,盗版技术比创造技术发展得快得多。

30 楼

MoZ的楼上贴子我看了,有思想.

我来回复

您尚未登录,请登录后再回复。点此登录或注册