VB.net已经有专门绘图的类。
可以定义笔刷然后用Drawing类中的方法绘制。
Private Sub DrawEllipse()
Dim myPen As New System.Drawing.Pen(System.Drawing.Color.Red)
Dim formGraphics as System.Drawing.Graphics
formGraphics = Me.CreateGraphics()
formGraphics.DrawEllipse(myPen, New Rectangle(0,0,200,300))
myPen.Dispose()
formGraphics.Dispose()
End Sub
Private Sub DrawRectangle()
Dim myPen As New System.Drawing.Pen(System.Drawing.Color.Red)
Dim formGraphics as System.Drawing.Graphics
formGraphics = Me.CreateGraphics()
formGraphics.DrawRectangle(myPen, New Rectangle(0,0,200,300))
myPen.Dispose()
formGraphics.Dispose()
End Sub
vb.net中如何把picturebox定义为画布
Dim huabu As Graphicshuabu = picturebox.CreateGraphics使用的时候还需要定义画笔 Dim pen As New Pen(Brushes.Black, 1)然后就可以画图了 huabu.DrawLine(pen, 0, 0, 10, 10)更多的关于绘图和坐标变换的东西可以参考 http:\/\/www.codesky.net\/article\/201001\/124261.html http:\/\/blog.csdn....
vb.net画图控件如何画三角网图形?
Public Class Form1 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Dim g As Graphics = PictureBox1.CreateGraphics Dim hs As HatchStyle = HatchStyle.Cross Dim sb As HatchBrush = New HatchBrush(hs, Color.Black, Color.White)Dim p(3) As Point ...
vb.net怎样在当前已打开的AutoCAD画图? 最好有个判断语句, 如果CAD已打...
Private Function isopen() As AutoCAD.AcadApplication Try dim CADapp_temp AutoCAD.AcadApplication = GetObject(, "AutoCAD.Application")return CADapp_temp Catch ex As Exception Return Nothing End Try End Function '调用上面的函数,如果为nothing表示没有打开，否则打开并返回对象 ...
关于vb.net中绘图并保存图片的问题
Public Class Form1 Dim imageName As String = "C:\\Documents and Settings\\...\\1126.jpg "Dim i As Image = Image.FromFile(imageName)Dim g As Graphics = Graphics.FromImage(i) '此处从背景图创建Greaphics Private Sub ...
vb6 paintpicture及API Bitblt函数如何运用??
来进行修改，或者就是重新组建工程开发新工具。微软后来开发了VB的继任者Visual Basic .NET，同时也是.NET平台的一部分。VB.NET编程语言是一种真正的面向对象编程语言（VB4-VB6 只能称为基于对象而不是面向对象，最明显的特征就是 VB4-VB6 都不支持类的继承），和传统 Visual Basic 并不完全兼容。
vb.net picture 保存图片
ClientSize.Height Dim bm As New Bitmap(wid, hgt)Dim g As Graphics = Graphics.FromImage(bm)'画图代码，比如下面的直线 g.DrawLine(Pens.Red, 10, 10, 500, 10)'画图代码 PictureBox1.Image = bm PictureBox1.Refresh()g.Dispose()PictureBox1.Image.Save("C:\\1.jpg")End Sub ...
VB.net绘图具体如何设置双缓冲
VB.NET画图是不能设置双缓冲的，双缓冲是指窗体，从来没说是针对控件。不用graphic.clear清理重画就不会闪烁。你可以先把容器删了再重新建立一个再去画。简单举例：Graphics g;Pen p;Panel pl;构造函数初始化：p=new Pen(Color.Red,2);pl=panel1;造成闪烁的画法：g=pl.CreateGraphics();g.Clear...
...2010怎么样能画出图表或者说如何能用Excel表格的画图功能 VB.net
Rnd(8)) Randomize() '支出 dr.Item(2) = 600 + Int(2000 * Rnd(7)) dt.Rows.Add(dr) Next dr = Nothing With Me.Chart1 .DataSource = dt 'dt作为chart1的数据源 .Series.Clear(
vb.net GDI+
就像你画画，画上去如果你要擦掉当然是擦到底色咯。（当然GDI+也可以像你画画一样只擦一部分）GDI+时钟我写过一个VB6的。代码详见我博客。地址显然百度不让贴上= =。所以你可以看下我的资料。你可以模拟层，就是把所有绘制信息都保存起来。你的流程应当是：如果要绘制了，更新绘制信息（可以是数组啥...
用VB对图象进行黑白二值化处理的代码。
我有一个笨办法。调用windows的“画图”打开图片，然后“另存为”黑白模式。这两部都可以用vb实现。
