| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 992 人关注过本帖
标题:[求助]pb中怎样实现输出对齐
只看楼主 加入收藏
hnzzc
Rank: 1
等 级:新手上路
帖 子:86
专家分:0
注 册:2006-4-26
收藏
 问题点数:0 回复次数:1 
[求助]pb中怎样实现输出对齐
刚刚学习pB,现在遇到一个输出对齐问题.下面是我写的代码.是为了实现在多文本框里输出a与b之间的素数,要求每行输出8个,实现左对齐.我的想法是:输出的第i个素数+8-第i个素数的位数=第 i+1个素数+8-第 i+1个素数的位数

int i,j,m=0
int key,temp,h1,h2
a=integer(sle_1.text)
b=integer(sle_2.text)
k=integer(sle_3.text)
for i=a to b
key=1
for j=2 to sqrt(i)
if mod(i,j)=0 then
key=0
exit
end if
next
if key=1 then
temp=i
h1=0
do //算出i的位数
temp=int(temp/10)
h1++
loop while temp<>0

h2=10 - 2*h1
mle_1.text+=string(i)+string(space(h2)) //使第i个素数和第i+1个素数所占的位数相等
m++
count++
end if
if m=k then
mle_1.text+='~013'+'~010'
m=0
end if
next
st_5.text=string(count)
st_6.text=string(h1)
搜索更多相关主题的帖子: 素数 输出 integer key sle 
2006-09-30 23:53
hnzzc
Rank: 1
等 级:新手上路
帖 子:86
专家分:0
注 册:2006-4-26
收藏
得分:0 
请问一下,pb中有不有输出控制函数,诸如对齐之类的
2006-10-10 21:42
快速回复:[求助]pb中怎样实现输出对齐
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.016801 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved