社区
其他开发语言
帖子详情
有人学vfp 的吗?
languagec
2004-05-08 05:43:38
我没学过vfp,外系的同学要我给他做几个题目。
我自己已经搞定两个,还有一个不会呀。
哪位兄弟帮帮忙呀!
编写一个表单完成时钟显示功能,如图 22:40:41
要求:1.在图上标明可见和不可见控件的名称
要求表单在运行期间动态显示当前系统时间
2.写出主要控件的时间处理代码。
...全文
19
6
打赏
收藏
有人学vfp 的吗?
我没学过vfp,外系的同学要我给他做几个题目。 我自己已经搞定两个,还有一个不会呀。 哪位兄弟帮帮忙呀! 编写一个表单完成时钟显示功能,如图 22:40:41 要求:1.在图上标明可见和不可见控件的名称 要求表单在运行期间动态显示当前系统时间 2.写出主要控件的时间处理代码。
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
6 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
ymize
2004-05-08
打赏
举报
回复
....在表单里加上一个标签或者txt控件
然后在timer控件里动态刷新就是了啊
例如 在表单from1中
添加一个标签控件lblTime
然后在表单里添加一个timer控件timer1
设定timer1的属性值interval=500(间隔500毫秒运行一次timer方法)
并在这个控件的timer方法中添加如下代码
IF THISFORM.lblTime.Caption !=Time()
THISFORM.lblTime.Caption =Time()
ENDIF
/*time()取当前系统时间 当libltimer.caption的值
不等于当前系统时间时用当前时间值刷新
libltimer.caption*/
这样就可以了
languagec
2004-05-08
打赏
举报
回复
我学C 的,今天看了一下vfp的语法才凑了一个 n!
这个可真的搞不定了。
能不能详细点?
languagec
2004-05-08
打赏
举报
回复
大哥,我不懂呀!
要不要写程序的?
gjd111686
2004-05-08
打赏
举报
回复
拖个文本框,在定时器中取系统时间赋值给文本框
languagec
2004-05-08
打赏
举报
回复
剩下这个表单一时搞不定了!
languagec
2004-05-08
打赏
举报
回复
我自己写好了n!
s=1
input "input n please :" to n
for i=1 to n
s=s*i
next
? "the n!=",s
认识VF--
VFP
为什么?
初学者的天堂,看了的人肯定有好多东西能学到的
VFP
中实现选择排序
水仙花数的
vfp
实现 时间:2009-05-08来源:编程入门网 作者:老马 本文作者“老马”为编程入门网
VFP
专栏作家,转载请保留这句话。 记得看过朋友的文章中有句话大致是这个意思:一个人编程的水平与实现同一目的所需的代码数量成反比。其实这句话很有道理,如果用这个观点来评价我自己,我应该是一个苍老的菜鸟,我做出来的东西勉强可用,但代码在高手看来却是惨不忍睹。我所走过的轨迹与常人大概也有所不同:计算机专业科班的可能在毕业后从事coding多年之后,当感觉自己力不从心时转行做管理或教师;而我恰恰相反,外贸专业毕业后狂热地自学了一些东西,教了几年C语言、vb、
vfp
及asp等课程,几乎所有的业余时间都用到了接活来做上,这一点也差不多达到了狂热的程度。不过后来发现自己似乎是走进了死胡同:我试图走进VC的世界,可是被MFC、SDK这些东西折磨得痛苦之极;当我为自己开始能用asp做些东西而沾沾自喜的时候,一个强调代码与界面分离的asp.net一天比一天时髦起来,而它的身后是一个.NET家族。更新的技术何时出现?天知道,或许就在明天。我终于开始明白,我实际并不象身边的人说的那样聪明,我也只是一个平庸的人;我终于开始明白,如果在我所从事的这个没有任何保障的“挨踢”行业继续做下去,过几年我会成为40、50人员,那时恐怕连愿意为我交社保、医保的地方都找不到了。所以现在我进入了企业,不再是教师,因为这需要很大的精力来证明自己的能力和水平;也不再为了些“水票管理”之类的东西而通宵达旦,因为这样做得到的是几个小钱,失去的却是最宝贵的健康。 今天和几个高中同学小聚了一下,或许是人岁数大了愿意回忆从前的事,或许是还有些酒意,所以有了上面的这一段话。不过我想这不应该算是牢骚,应该说是一个菜鸟对自己的可笑经历的总结。 我始终认为C语言是一个基础性的语言,以前无论是VB或
VFP
课,我总会要求同学自己找本谭浩强的《C程序设计》,把预处理命令、指针、结构体与共用体等几部分内容pass过去,阅读其基础部分的内容;而在课时充足的情况下,我也会经常拿C程序书中诸如“鸡兔同笼”这样有趣的题来“折磨”一下班上的同学。 而现在有些日子了,有两个高中同学总跑到我家里来。人活到老、学到老,这本是件好事,不过我还是有些苦恼。因为他们到我家里来学习,不仅不交学费,我还得管他们饭。他们问到的
vfp
的东西比较多,所以我打算继续把这方面的一些东西翻出来晒晒。从本文开始会探讨一下C程序书中比较经典的几个算法在
VFP
中实现的问题,当然纯属菜鸟之见,有没有用那可两说,得自己去分析。觉得有用的话,或许可以开拓思路、扩充您的知识面,我很高兴;觉得没用的话,您权当我是吃撑了,您能忍受我罗嗦了这么长时间,我一样很高兴,呵呵。 水仙花数的实现是一个比较经典的算法题,今天我们首先在
vfp
中来实现它。 首先我们了解一下什么是“水仙花数”。所谓水仙花数是指一个n位数,其各位数字立方和等于该数本身的值,例如:153=13+53+33 ,所以153是一个水仙花数。 我们来做一个简单点儿的:求解3位数的水仙花数,即100至999之间的水仙花数。很明显这个程序需要使用循环,并且从水仙花数的概念可知,其重点是求解出循环变量当前值的各位数字的值。剩下的工作就简单了,把求解出的各位数字的立方和与循环变量当前值进行比较,如果相等则说明这是一个水仙花数,输出它即可。相关说明见代码注释。本文发表于编程入门网:www.bianceng.cn 我们用表单来实现这个例子,运行时如下图: 参照上图开始我们的制作: 一、新建表单,向表单上添加一个标签控件,caption属性值设置为“显示100到999间的水仙花数”;添加两个命令按钮command1和command2,并将它们的caption属性值分别设置为“开始”和“清除”;添加一个编辑框控件Edit1,属性值均采用默认的。 二、添加事件代码: 1、“清除”按钮的click事件: thisform.edit1.value="" thisform.refresh 2、“开始”按钮的click事件: local i,a,b,c for i=100 to 999 a=int(i/100) &&百位的值等于这个三位数除以100后取整 b=int((i-100*a)/10) &&用这个三位数减去它的百位数字与100乘积, &&对得到的差除以10后进行取整,结果就是十位的值 c=i-int(i/10)*10 &&与上面原理相同,这是求个位的值 if i=a^3+b^3+c^3 &&成立说明是水仙花数并输出 thisform.edit1.value=thisform.edit1.value+str(i,5)+chr(13) &&用chr(13)换行 endif endfor
水仙花数的
vfp
实现
水仙花数的
vfp
实现 时间:2009-05-08来源:编程入门网 作者:老马 本文作者“老马”为编程入门网
VFP
专栏作家,转载请保留这句话。 记得看过朋友的文章中有句话大致是这个意思:一个人编程的水平与实现同一目的所需的代码数量成反比。其实这句话很有道理,如果用这个观点来评价我自己,我应该是一个苍老的菜鸟,我做出来的东西勉强可用,但代码在高手看来却是惨不忍睹。我所走过的轨迹与常人大概也有所不同:计算机专业科班的可能在毕业后从事coding多年之后,当感觉自己力不从心时转行做管理或教师;而我恰恰相反,外贸专业毕业后狂热地自学了一些东西,教了几年C语言、vb、
vfp
及asp等课程,几乎所有的业余时间都用到了接活来做上,这一点也差不多达到了狂热的程度。不过后来发现自己似乎是走进了死胡同:我试图走进VC的世界,可是被MFC、SDK这些东西折磨得痛苦之极;当我为自己开始能用asp做些东西而沾沾自喜的时候,一个强调代码与界面分离的asp.net一天比一天时髦起来,而它的身后是一个.NET家族。更新的技术何时出现?天知道,或许就在明天。我终于开始明白,我实际并不象身边的人说的那样聪明,我也只是一个平庸的人;我终于开始明白,如果在我所从事的这个没有任何保障的“挨踢”行业继续做下去,过几年我会成为40、50人员,那时恐怕连愿意为我交社保、医保的地方都找不到了。所以现在我进入了企业,不再是教师,因为这需要很大的精力来证明自己的能力和水平;也不再为了些“水票管理”之类的东西而通宵达旦,因为这样做得到的是几个小钱,失去的却是最宝贵的健康。 今天和几个高中同学小聚了一下,或许是人岁数大了愿意回忆从前的事,或许是还有些酒意,所以有了上面的这一段话。不过我想这不应该算是牢骚,应该说是一个菜鸟对自己的可笑经历的总结。 我始终认为C语言是一个基础性的语言,以前无论是VB或
VFP
课,我总会要求同学自己找本谭浩强的《C程序设计》,把预处理命令、指针、结构体与共用体等几部分内容pass过去,阅读其基础部分的内容;而在课时充足的情况下,我也会经常拿C程序书中诸如“鸡兔同笼”这样有趣的题来“折磨”一下班上的同学。 而现在有些日子了,有两个高中同学总跑到我家里来。人活到老、学到老,这本是件好事,不过我还是有些苦恼。因为他们到我家里来学习,不仅不交学费,我还得管他们饭。他们问到的
vfp
的东西比较多,所以我打算继续把这方面的一些东西翻出来晒晒。从本文开始会探讨一下C程序书中比较经典的几个算法在
VFP
中实现的问题,当然纯属菜鸟之见,有没有用那可两说,得自己去分析。觉得有用的话,或许可以开拓思路、扩充您的知识面,我很高兴;觉得没用的话,您权当我是吃撑了,您能忍受我罗嗦了这么长时间,我一样很高兴,呵呵。 水仙花数的实现是一个比较经典的算法题,今天我们首先在
vfp
中来实现它。 首先我们了解一下什么是“水仙花数”。所谓水仙花数是指一个n位数,其各位数字立方和等于该数本身的值,例如:153=13+53+33 ,所以153是一个水仙花数。 我们来做一个简单点儿的:求解3位数的水仙花数,即100至999之间的水仙花数。很明显这个程序需要使用循环,并且从水仙花数的概念可知,其重点是求解出循环变量当前值的各位数字的值。剩下的工作就简单了,把求解出的各位数字的立方和与循环变量当前值进行比较,如果相等则说明这是一个水仙花数,输出它即可。相关说明见代码注释。本文发表于编程入门网:www.bianceng.cn 我们用表单来实现这个例子,运行时如下图: 参照上图开始我们的制作: 一、新建表单,向表单上添加一个标签控件,caption属性值设置为“显示100到999间的水仙花数”;添加两个命令按钮command1和command2,并将它们的caption属性值分别设置为“开始”和“清除”;添加一个编辑框控件Edit1,属性值均采用默认的。 二、添加事件代码: 1、“清除”按钮的click事件: thisform.edit1.value="" thisform.refresh 2、“开始”按钮的click事件: local i,a,b,c for i=100 to 999 a=int(i/100) &&百位的值等于这个三位数除以100后取整 b=int((i-100*a)/10) &&用这个三位数减去它的百位数字与100乘积, &&对得到的差除以10后进行取整,结果就是十位的值 c=i-int(i/10)*10 &&与上面原理相同,这是求个位的值 if i=a^3+b^3+c^3 &&成立说明是水仙花数并输出 thisform.edit1.value=thisform.edit1.value+str(i,5)+chr(13) &&用chr(13)换行 endif endfor
锐浪报表
VFP
9 全示例文件
被人安利了许久的锐浪报表,一直没空去学习。终于碰到对
VFP
来说极为棘手的报表问题了,下决找一个专业的报表来替换掉
VFP
自带的报表。于是在网上找了一圈,最后也是选择了轻量级的锐浪报表,而且它是免费的,仅是设计与预览时会显示水印而己。但如此强大的锐浪却没有
VFP
任何示例,本着好记性不如烂笔头的精神,趁着春节假期比较有时间,开始了学习锐浪报表并逐一移值原锐浪的示例到
VFP
。 如果你己安装有锐浪报表,只需将 Samples 下的
VFP
目录解压至您的锐浪安装目录即可,如果你仅注册锐浪控件或未注册,那你需要完整解压此压缩,然后执行
VFP
\lib 目录下的(注册控件.bat)。此示例使用的演示文件均为锐浪官方原版安装文件,所有
VFP
示例文件也均为锐浪其他开发语言中进行的移植一共 26 个,极少部份功能可能是
VFP
问题示例结果与原移值版本略有出入,暂未深究。
VFP
SQL必知必会笔记
此文档时
VFP
SQL语言的一次大汇总,对学习SQL语言的人来说,有一定程度的帮助。
其他开发语言
3,424
社区成员
15,635
社区内容
发帖
与我相关
我的任务
其他开发语言
其他开发语言 其他开发语言
复制链接
扫一扫
分享
社区描述
其他开发语言 其他开发语言
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章