前往小程序,Get更优阅读体验!
立即前往
首页
学习
活动
专区
工具
TVP
发布
社区首页 >专栏 >VFP汇总GRID全部数值列到游标的函数

VFP汇总GRID全部数值列到游标的函数

作者头像
加菲猫的VFP
发布2022-01-05 09:26:47
3000
发布2022-01-05 09:26:47
举报
文章被收录于专栏:加菲猫的VFP

红楼梦里面说,所有的仆人,老了之后,那双眼睛就会变成死鱼眼。小的时候很不理解,现在在社会上,到处能看到这种没有神采的眼神。

这种神采奕奕的眼睛,却在小朋友的眼晴随处可见,我们到底怎么了?

昨晚上帮一位同学,主持他们一场会议,有一位6岁的小女孩,竟然要主动上台,要唱歌,歌名叫“骁”,我把她送到台上,我蹲下来采访他,那分别是双神彩奕奕的眼睛啊,有灵气。歌也唱得好。

我们成年之后,失去了什么东西?

拥有孩子般的好奇心,所有成功人士的唯一共同之处

保持对这个世界的好奇心,积极主动这个品质,是古往今来,所有成功人士的唯一共同之处。

就是,他们无论遇到任何问题,始终都会思考:在所有影响结果的变量之中,我可以改变哪些变量,让结果变得更好。

而不是抱怨不可改变外部因素,指责、抱怨他人、环境、时代等等。

《人生只有一件事》里说的:人生三件事,自己的事,别人的事,老天的事。我们要关注自己的事,少管别人的事,不管老天的事。

所以,如果我们能把积极主动这个习惯,用到生活中的方方面面,那其实人生就没有烦恼了。

商业模式的明暗两条线

我们写程序有明暗两条线,绝大数的狐友,特别是自学出师的狐友,只会写明线,不会写暗线,当然参加我们社群,我都会细细讲来,一点就透。

而我们的任何商业模式,都有明暗两条线。

这次的会议,甲方叫万盛叫车,他的商业模式明线是结合了滴滴、T3、神州的优点,但是暗线呢?不适在这里说,以后在社群里面猫猫到时会分享。

我们要看懂一个商业模式,一定要从明线看到后面的暗线,才能看到事物的本质。

技术本身从来不值钱,而是替客户解决需求值钱,所以不要停留在语言高不高端,而是看本质,理需求,谈销售。

VFP汇总GRID全部数值列到游标的函数

来自VFP MIX ALL狐友会社群|实易软件梁总分享

代码语言:javascript
复制
* 汇总全部数值列到游标
Local myGrd,lcFields,lcField,lnI,lcFlag
myGrd = Thisform.myGrd1
lcFlag = ''
lcFields = ''
For lnI=1 To myGrd.ColumnCount
lcField = Getwordnum(myGrd.Columns(lnI).ControlSource,2,[.])
If Inlist(Type('&lcField'),'N','I')
  lcFields = lcFields + ',SUM(' + lcField + ') AS ' + lcField
Else
  If Type('&lcField')='C' And lcFlag == ''
   lcFields = lcFields + ',[-合计-] AS ' + lcField
   lcFlag = '合计OK'
  Endif
Endif
If Getwordcount(lcFields,[,]) = 128  && 最多 128 列
  Exit
Endif
Endfor
lcFields = Substr(lcFields,2)
Select &lcFields From (myGrd.RecordSource) Into Cursor tmp_Total Readwrite
本文参与 腾讯云自媒体同步曝光计划,分享自微信公众号。
原始发表:2021-12-31,如有侵权请联系 cloudcommunity@tencent.com 删除

本文分享自 加菲猫的VFP 微信公众号,前往查看

如有侵权,请联系 cloudcommunity@tencent.com 删除。

本文参与 腾讯云自媒体同步曝光计划  ,欢迎热爱写作的你一起参与!

评论
登录后参与评论
0 条评论
热度
最新
推荐阅读
目录
  • 拥有孩子般的好奇心,所有成功人士的唯一共同之处
  • 商业模式的明暗两条线
  • VFP汇总GRID全部数值列到游标的函数
领券
问题归档专栏文章快讯文章归档关键词归档开发者手册归档开发者手册 Section 归档