21ic电子技术开发论坛 › 单片机与嵌入式系统 › 侃单片机论坛 › VB函数画线
返回列表 发新帖我要提问

VB函数画线

[复制链接]
1950|2
 楼主| tao180539 发表于 2012-7-1 22:24 | 显示全部楼层 |阅读模式
函数, single, FOR, ST, nex
本帖最后由 tao180539 于 2012-7-3 22:41 编辑

Dim x As Single

Dim y As Single

For x = -1 To 1 Step 0.01
   
    For y = -1 To 1 Step 0.001
    If Abs(x * x + y * y - 1) < 0.01 Then
     Picture1.PSet (x + 100, y + 100)
    End If
    Next y
   
   

Next x
我想画个圆  看看 哪里不行
回复

收藏 举报

相关帖子
李冬发 发表于 2012-7-2 06:07 | 显示全部楼层
从上世纪90年代开始，计算机作图就有“窗口”和“视图”的概念。
回复

收藏 举报

diweo 发表于 2012-7-2 07:04 | 显示全部楼层
到底是画线还是画点啊？
回复

收藏 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 注册

本版积分规则

tao180539

321

主题

515

帖子

3

粉丝
快速回复 在线客服 返回列表 返回顶部