Foxtable(狐表)用户栏目专家坐堂 → [求助]窗体的关闭方式


  共有3894人关注过本帖树形打印复制链接

主题:[求助]窗体的关闭方式

帅哥哟,离线,有人找我吗?
liuxianjie1980
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:633 积分:4016 威望:0 精华:0 注册:2015/1/27 9:34:00
[求助]窗体的关闭方式  发帖心情 Post By:2015/11/27 16:02:00 [只看该作者]

窗体的关闭方式,如:模式窗口,就只有一种关闭方式吗?有没有其他的退出方式,比如翻转、百叶窗等。

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/11/27 18:02:00 [只看该作者]

全局代码


<DllImport("user32.dll", EntryPoint := "AnimateWindow")> _
Public Function AnimateWindow(handle As IntPtr, ms As Integer, flags As Integer) As Boolean
End Function
Public Const AW_HOR_POSITIVE As Int32 = &H1
Public Const AW_HOR_NEGATIVE As Int32 = &H2
Public Const AW_VER_POSITIVE As Int32 = &H4
Public Const AW_VER_NEGATIVE As Int32 = &H8
Public Const AW_CENTER As Int32 = &H10
Public Const AW_HIDE As Int32 = &H10000
Public Const AW_ACTIVATE As Int32 = &H20000
Public Const AW_SLIDE As Int32 = &H40000
Public Const AW_BLEND As Int32 = &H80000

 

调用代码

 

e.Form.BaseForm.FormBorderStyle = Windows.Forms.FormBorderStyle.None
AnimateWindow(e.form.Baseform.Handle, 300, AW_HIDE + AW_CENTER)
e.form.Close

 

参考资料 http://www.cnblogs.com/KeenLeung/archive/2013/05/19/3087728.html

 


 回到顶部