在onPAINT中的问题

ado_ 2003-10-23 12:17:23
我在button中的边框上画了几条线,但发现有工具提示信息或有另一个窗口在其中有
经过之后,button中就在经过的位置重画出相应的我要画的线条?

给人的感觉就是,在onpaint中画了线之后,不要有什么东西在上面经过,如有就有
我添加的线条出现,但线条位置已变化!!

请教各位!感谢!!
...全文
29 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
ado_ 2003-10-30
  • 打赏
  • 举报
回复
Private Sub Label1_Paint(ByVal sender As System.Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles Label1.Paint
Dim p As New Pen(Color.White, 1)
e.Graphics.DrawLine(p, e.ClipRectangle.X, e.ClipRectangle.Y, e.ClipRectangle.X + e.ClipRectangle.Width, e.ClipRectangle.Y)
e.Graphics.DrawLine(p, e.ClipRectangle.X, e.ClipRectangle.Y, e.ClipRectangle.X, e.ClipRectangle.Y + e.ClipRectangle.Height)
p.Dispose()
End Sub

还是不行呀!!!
Montaque 2003-10-23
  • 打赏
  • 举报
回复
重画之前,最好清除上次的结果 。

Graphics.Clear(color.White )
dunheng 2003-10-23
  • 打赏
  • 举报
回复
为什么要在onpaint中写,每次重画都会触发的。你可以在graphics中画你要的线嘛,这样就不会受到外界影响了。

16,554

社区成员

发帖
与我相关
我的任务
社区描述
VB技术相关讨论,主要为经典vb,即VB6.0
社区管理员
  • VB.NET
  • 水哥阿乐
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧