网页
资讯
视频
图片
知道
文库
贴吧
地图
采购
进入贴吧
全吧搜索
吧内搜索
搜贴
搜人
进吧
搜标签
日
一
二
三
四
五
六
签到排名:今日本吧第
个签到,
本吧因你更精彩,明天继续来努力!
本吧签到人数:0
一键签到
成为超级会员,使用一键签到
一键签到
本月漏签
0
次!
0
成为超级会员,赠送8张补签卡
如何使用?
点击日历上漏签日期,即可进行
补签
。
连续签到:
天 累计签到:
天
0
超级会员单次开通12个月以上,赠送连续签到卡3张
使用连续签到卡
05月30日
漏签
0
天
vb吧
关注:
156,290
贴子:
1,165,220
看贴
图片
吧主推荐
游戏
7
回复贴,共
1
页
<<返回vb吧
>0< 加载中...
请问下大神 这个图形用单循环的话怎么做
只看楼主
收藏
回复
那年de愤怒
啥也不懂
1
该楼层疑似违规已被系统折叠
隐藏此楼
查看此楼
那年de愤怒
啥也不懂
1
该楼层疑似违规已被系统折叠
隐藏此楼
查看此楼
来人
wang1234051
小吧主
10
该楼层疑似违规已被系统折叠
隐藏此楼
查看此楼
print 语句即可
sunruisunrui
小吧主
12
该楼层疑似违规已被系统折叠
隐藏此楼
查看此楼
使用绝对值来控制星星个数和空格个数,
看看你领会没有。
时空穿梭lumia
简易程序
9
该楼层疑似违规已被系统折叠
隐藏此楼
查看此楼
单循环加判断可以
——来自 爱贴吧 Windows Phone 客户端
HeiJin_Studio
暴力枚举
8
该楼层疑似违规已被系统折叠
隐藏此楼
查看此楼
Dim a As String, b As String
Dim temp As String, t As Integer
a = Space(4): b = "****"
For i = 1 To 7
t = IIf(i > 4, 8 - i, i)
temp = Left(a, 4 - t) & Left(b, t)
Print temp
Next i
骄傲地蚂蚁
网络通信
11
该楼层疑似违规已被系统折叠
隐藏此楼
查看此楼
拿去用吧,骚年。
for i=-3 to 3
if i<1 then ? format(string(4+i, "*"), "@@@@")
if i>0 then ? format(string(4-i, "*"), "@@@@")
next
HeiJin_Studio
暴力枚举
8
该楼层疑似违规已被系统折叠
隐藏此楼
查看此楼
借用8楼,还写为:
for i=-3 to 3
print format(string(4-abs(i), "*"), "@@@@")
next i
登录百度账号
扫二维码下载贴吧客户端
下载贴吧APP
看高清直播、视频!
贴吧页面意见反馈
违规贴吧举报反馈通道
贴吧违规信息处理公示