|
网站首页
|
业界新闻
|
小组
|
威客
|
人才
|
下载频道
|
博客
|
代码贴
|
在线编程
|
编程论坛
|
登录
注册
短消息
我发表的主题
我参与的主题
我收藏的贴子
我上传的附件
我下过的附件
编辑个人资料
我的博客
用户控制面板
搜索
道具
恢复默认风格
碧海青天
秋意盎然
棕红预览
粉色回忆
蓝雅绿
紫色淡雅
青青河草
e点小镇
橘子红了
红红夜思
水晶紫色
雪花飘飘
新年快乐
风格
短消息
论坛展区
帮助
编程论坛
→
数据库技术
→
『 VFP论坛 』
→ 想写一个PRG,显示如内容
我的收件箱(0)
欢迎加入我们,一同切磋技术
用户名:
密 码:
共有
869
人关注过本帖
标题:
想写一个PRG,显示如内容
只看楼主
加入收藏
qq402716710
等 级:
新手上路
帖 子:91
专家分:0
注 册:2013-1-14
结帖率:
92.86%
楼主
收藏
已结贴
√
问题点数:14 回复次数:5
想写一个PRG,显示如内容
例如,我输入的是2
那么他就会显示99
98
97
。
。
。
1
如此类推
我是这样写的
程序代码:
x
=
''
y
=
''
for
i
=
1
to
n
&&
n是变量,这次是2 x
=
x
+
'
9
'
endf m
=
val(x)
for
j
=
1
to
m z
=
z
+
str
(m
+
1
-
j)
+
chr(
10
) endf ?z
这样写,2或者3都能显示,没有问题,但是到10就会卡死了,如果我输入变量为1000,怎样才能显示到出来。
2013-05-17 01:06
举报帖子
使用道具
赠送鲜花
qjbzjp
来 自:尧的故乡
等 级:
贵宾
威 望:
48
帖 子:1914
专家分:4397
注 册:2007-3-14
第
2
楼
收藏
得分:4
CLEAR
input to n
m=REPLICATE("9",n)
FOR i=VAL(m) to 1 step -1
?TRANSFORM(i)
NEXT
相互学习,互相交流,共同提高。
2013-05-17 08:05
举报帖子
使用道具
赠送鲜花
taifu945
等 级:
贵宾
威 望:
80
帖 子:1545
专家分:3298
注 册:2012-7-6
第
3
楼
收藏
得分:4
看你的意思是用户输入数值的宽度,也就是位数,然后显示从1到指定宽度的最大值。我想提醒楼主一下:FoxPro对整数是有位数限制的,不是可以任意宽度的。事实上,不仅是FoxPro,任何软件对数值都有最宽位数的限制,超过这个限制就会有问题。
2013-05-17 08:35
举报帖子
使用道具
赠送鲜花
qq402716710
等 级:
新手上路
帖 子:91
专家分:0
注 册:2013-1-14
第
4
楼
收藏
得分:0
回复 2楼 qjbzjp
我就是想要这种效果,但是你跟我的差不多
CLEAR
input to n
m=REPLICATE("9",n)
FOR i=VAL(m) to 1 step -1
?TRANSFORM(i)
NEXT
但是现在的问题是VAL()后,字符串太长的会变成1.00E+...这样的,但是字符串又不能直接拿来使用,因为要不停-1,现在有什么方法能解决吗?
2013-05-17 10:17
举报帖子
使用道具
赠送鲜花
qingfameng
等 级:
贵宾
威 望:
35
帖 子:964
专家分:3019
注 册:2010-2-6
第
5
楼
收藏
得分:4
在给定数据小的情况,此题看来好像很简单。但是,当给定数据较大时,它开始复杂起来。数据巨大时,这是个很大的工程。
这好比寻找自然数中的素数一样,在浩瀚的天文数字中一直的向前找.向前找,素数越来越少了,但是终点还是遥遥无期 ...,无限的宇宙永远到不了尽头吧 ...
2013-05-18 22:00
举报帖子
使用道具
赠送鲜花
TonyDeng
等 级:
贵宾
威 望:
304
帖 子:25859
专家分:48889
注 册:2011-6-22
第
6
楼
收藏
得分:4
写这个用在什麽地方呀?
授人以渔,不授人以鱼。
2013-05-18 22:38
举报帖子
使用道具
赠送鲜花
6
1/1页
1
快速回复:
想写一个PRG,显示如内容
数据加载中...
关于我们
|
广告合作
|
编程中国
|
清除Cookies
|
TOP
|
手机版
编程中国
版权所有,并保留所有权利。
Powered by
Discuz
, Processed in 0.033977 second(s), 10 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved