vb.net中paint VBNET编程宝典

在vb.net中,paintcanvas里面填满了颜色,我想通过点击一个按钮来完成清除整个画布内容的效果,

要用GreateGrahpics函数,比如要向 Panel1,填充颜色:

创新互联公司专业为企业提供东海网站建设、东海做网站、东海网站设计、东海网站制作等企业网站建设、网页设计与制作、东海企业网站模板建站服务,10余年东海做网站经验,不只是建网站,更提供有价值的思路和整体网络服务。

Dim g As Graphic=Panel1.CreateGraphics

Dim b as New Brush(Color.Blue)

g.FillRectangle(b,Panel1)

写的比较粗,意思就是这样的,你可以边看帮助边细细完成

请问vb中的 PaintPicture在vb.net中代码是什么。最好有实例

获取控件的Graphic对象,绘图方法都集中在了该对像中了。

1. 通过控件GreateGrapic方法获得

2. Paint 事件参数e中也有此对象

相应的图形方法是DrawImage,vb.net中没有自动重绘功能,图形不是持久的,所以应当在Paint事件中绘图。

Private Sub PictureBox2_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles PictureBox2.Paint

e.Graphics.SetClip(e.ClipRectangle)

e.Graphics.DrawImage(PictureBox1.Image, New Rectangle(0, 0, PictureBox1.ClientSize.Width, PictureBox1.ClientSize.Height), New Rectangle(5, 5, 100, 100), GraphicsUnit.Pixel)

End Sub

vb.net 类中 定义了 dim withevents mpc as picturebox 还有picturebox的paint 事件 该怎么使用这个类

大体看一下这个类里的事件都是私有的(Private) 如果想在窗体中使用这个事件就把类中事件前的Private关键字改成Public如:

Public Sub PicCurve_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles PicCurve.Paint

在窗体中调用的方法就是实例化类就行了。因为这个类有NEW所以在实例化的时候要赋参数

代码如下数值是我临时写的。调用的时候你根据实际情况改一下就行。参数PictureBox1是在窗体上添加的PictureBox控件。

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

Dim AA() As Single = {0.1, 1.2, 1.5, 1.6, 1.8}

Dim clsPaint As New bbbb(PictureBox1, AA, "PictureBox_1")

clsPaint.PicCurve_Paint(Me, Nothing)

End Sub

vb.net 怎么触发paint事件

Paint事件中写好代码,然后按钮事件中,这句就行。

picturebox1.Refresh


网站名称:vb.net中paint VBNET编程宝典
本文路径:http://scyanting.com/article/docssjp.html