用vb(visual basic)来画图,最多能画成什么程度,解答越详细越好!

用vb(visual basic)来画图,最多能画成什么程度,解答越详细越好!,第1张

用内部函数画的图处理速度很慢,而且功能有限。用GDI基本上能满足各种二维的绘图要求,类似“画图”“AutoCAD”等。用DirectX接口可以实现3D功能,如3D游戏。由于VB是标准的Windows编程,所以画图能力看Windows能画到什么程度。但是VB在复杂的算法处理时速度比较慢,例如3D模型的大量基础数据计算,那是远不如C语言。

Sub Form_Click()

Dim CX, CY, Radius, Limit ' Declare variable

Picture1AutoRedraw = True

Picture1ScaleMode = 3 ' 以像素为单位。

CX = Picture1ScaleWidth / 2 ' X 位置。

CY = Picture1ScaleHeight / 2 ' Y 位置。

If CX > CY Then Limit = CY Else Limit = CX

For Radius = 0 To Limit ' 半径。

Picture1Circle (CX, CY), Radius, RGB(Rnd 255, Rnd 255, Rnd 255)

Next Radius

For I = 0 To 50 Step 2 ' Set up loop

F = I / 50 ' 执行中间。

f1 = 1 - F: f2 = 1 + F ' 计算。

Picture1Line (CX f1, CY)-(CX, CY f1) ' 画左上角。

Picture1Line -(CX f2, CY) ' 画右上角。

Picture1Line -(CX, CY f2) ' 画右下角。

Picture1Line -(CX f1, CY) ' 画左下角

ForeColor = QBColor(I Mod 15) ' 每次改变颜色。

Next I

SavePicture Picture1Image, "z:\testbmp"

End Sub

以上就是关于用vb(visual basic)来画图,最多能画成什么程度,解答越详细越好!全部的内容,包括:用vb(visual basic)来画图,最多能画成什么程度,解答越详细越好!、如何在vb中的picturebox 里画图、等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!

欢迎分享,转载请注明来源:内存溢出

原文地址: https://outofmemory.cn/zz/9487994.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-04-28
下一篇 2023-04-28

发表评论

登录后才能评论

评论列表(0条)

保存