繁體中文当前位置: 首页 > 图文教程 > 网络编程 > ASP.NET > VB.NET窗口渐淡关闭
- ASP.NET
- ASP.NET 多附件上传实现代码
- asp.net 类库中使用ConfigurationManager.ConnectionStrings
- asp.net AjaxControlToolKit--TabContainer控件的介绍
- ASP.NET环境下为网站增加IP过滤功能
- asp.net访问Access数据库溢出错误
- ASP.NET AJAX 4.0的模版编程(Template Programming)介绍
- asp.net StringBuilder的用法 实例代码
- asp.net Accee数据库连接不稳定解决方案
- ASP.NET2.0 SQL Server数据库连接详解
- asp.net Repeater之非常好的数据分页
- C# 生转换网页为pdf
- 浅谈ASP.NET的Postback 实例代码
- asp.net Ext grid 显示列表
- 通过ASP.net实现flash对数据库的访问
- 如何创建一个AJAXControlToolKit的扩展控件
- asp.net 简单验证码验证实现代码
- asp.net 在客户端显示服务器端任务处理进度条的探讨
- Asp.net treeview实现无限级树实现代码
- asp.net INI文件读写类
- asp.net下检测SQL注入式攻击代码
ASP.NET 中的 VB.NET窗口渐淡关闭
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-11-03 浏览: 235 ::
收藏到网摘: n/a
Private Sub Form1_Closing(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles MyBase.Closing
If MsgBox("請注意看關閉的視窗", MsgBoxStyle.Question + MsgBoxStyle.OKCancel, "關閉") = MsgBoxResult.OK Then
Dim d As Double
For d = 1 To 0 + 0.2 Step -0.2
System.Threading.Thread.Sleep(50)
Application.DoEvents()
Me.Opacity = d
Me.Refresh()
Next d
Else
e.Cancel = True
End If
'1.設視窗為Form1
'2.將變數命名為d
'3.依物件名稱適當更改程式碼
End Sub
--蓝色小铺（ASP.NET">http://www.blueshop.com.tw/SkillBoard/show.asp?repno=1232&page=1&PgmType=ASP.NET）
评论 (0) All
