Small Basic中文站-快乐编程

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 478|回复: 0

For To Step EndFor的实例

[复制链接]
发表于 2017-6-28 13:15:37 | 显示全部楼层 |阅读模式
本帖最后由 鱼二六 于 2017-6-28 13:17 编辑

效果图:
sb02.png

实例代码如下:
GraphicsWindow.Title = "Pinstripe"
GraphicsWindow.BackgroundColor = "Black"
GraphicsWindow.PenColor = "White"
GraphicsWindow.PenWidth = 1
For x = 0 To 624 Step 50
  For y = 0 To 441 Step 6
    GraphicsWindow.DrawLine(x, y, x, y + 4)
  EndFor
EndFor

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|手机版|Small Basic中文站-快乐编程 ( 闽ICP备09051788号 |

GMT+8, 2019-12-8 12:48 , Processed in 0.223680 second(s), 10 queries , File On.

Powered by Discuz! X3.3

快速回复 返回顶部 返回列表