- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 我用图片PictureBox做了一个退出窗体的按钮,一退出就跳出出错提示 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=30977)
-- 发布时间：2013/4/8 10:03:00
-- 我用图片PictureBox做了一个退出窗体的按钮,一退出就跳出出错提示
我用图片PictureBox做了一个退出窗体的按钮，在MouseDown事件中e.Sender.BorderStyle=BorderStyle.Fixed3D
一退出就跳出出错提示
一退出就跳出出错提示
此主题相关图片如下：qq图片20130408?l0304.jpg
-- 发布时间：2013/4/8 10:05:00
--
文件发上来看看.
-- 发布时间：2013/4/8 10:16:00
--
If e.Button =MouseButtons.left Then
e.Sender.BorderStyle = BorderStyle.Fixed3D
End If
-- 发布时间：2013/4/8 10:18:00
--
根据错误提示，你出错的是MouseLeave事件哦，不是MouseDown事件，贴出MouseLeave事件的代码看看。
-- 发布时间：2013/4/8 10:21:00
--
e.Sender.BorderStyle= BorderStyle.None 抱歉贴错了
[此贴子已经被作者于2013-4-8 10:21:35编辑过]
-- 发布时间：2013/4/8 10:33:00
--
没有道理出错的，这样看看：
If e.Sender IsNot Nothing Then
e.Sender.BorderStyle= BorderStyle.None
End IF
再不行的话，将窗口模版发上来。
-- 发布时间：2013/4/8 10:39:00
--
发文件上来
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:1111.rar |
-- 发布时间：2013/4/8 11:00:00
--
e.Sender.BorderStyle= BorderStyle.FixedSingle
MouseEnter
If e.Form.Opened Then
e.Sender.BorderStyle= BorderStyle.None
End If
MouseLeave
If e.Button =MouseButtons.left Then
e.Sender.BorderStyle = BorderStyle.Fixed3D
End If
MouseDown
If e.Button =MouseButtons.left Then
e.Sender.BorderStyle = BorderStyle.None
End If
MouseUp
是关掉的原因 加个判断吧!
[此贴子已经被作者于2013-4-8 11:03:23编辑过]
-- 发布时间：2013/4/8 11:27:00
--
谢谢老朱了，果然如此，效果很好
-- 发布时间：2013/4/8 13:03:00
--
谢谢 muhua版主
的确有效