繁體中文当前位置: 首页 > 图文教程 > 网络编程 > ASP.NET > VB.NET窗口渐淡关闭
- ASP.NET
- .Net将如何影响我们？（一）
- .Net将如何影响我们？（二）
- 开发者面临的.Net挑战（一）
- 开发者面临的.Net挑战（三）
- .Net的精髓-XML和SOAP（一）
- .Net的精髓-XML和SOAP（二）
- .Net的精髓-XML和SOAP（三）
- .net的reflection (1)
- .net的reflection (2)
- Asp.net编写的PING工具
- .NET语言的选择
- 且看微软的.Net和Sun公司的J2EE如何对垒
- 从 Visual Basic 6.0 到 Visual Basic.NET 的转换(1)
- 从 Visual Basic 6.0 到 Visual Basic.NET 的转换(2)
- 从 Visual Basic 6.0 到 Visual Basic.NET 的转换(3)
- 从 Visual Basic 6.0 到 Visual Basic.NET 的转换(4)
- 从 Visual Basic 6.0 到 Visual Basic.NET 的转换(5)
- 什么是配件(assembly)?
- 什么是映射(reflection)?
- 从一个舆论调查的制作谈面向对象的编程思路（一）
ASP.NET 中的 VB.NET窗口渐淡关闭
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-11-03 浏览: 54 ::
收藏到网摘: 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
