'========================================================
'函数名称:Drawing5()
'函数参数:
'函数功能:绘制一个不规则线条
'=======================================================
Private Sub Drawing5()
Dim Graphics1 As Graphics = PictureBox1.CreateGraphics '在容器PictureBox1里面 创建画布
Dim Pen1 As New Pen(Color.Red) ' 创建画笔,并且制定红色
Dim points() As Point = {
New Point(90,
VB.NET绘图3---绘制不规则线条
最新推荐文章于 2024-07-17 14:09:14 发布
