Henry的VB.NET之旅(二)—构造与析构

                                       韩睿

大李在Form1窗体的实例被隐藏的时候，关闭了Form2窗体的实例，使我失去了对主线程的人工控制，进程无法正常关闭了。只好使用Ctrl+Alt+Del调出系统进程管理器，强行中止了该进程。为了避免抬头看见大李的笑脸，我只好低头想办法。

有了，我只要能截获Form2实例关闭的消息，不就可以再调出隐藏的主线程窗体了吗？在Form2的基类事件(Base Class Event)中重载Closing方法进行处理：

Private Sub Form2_Closing(ByVal sender As Object, ByVal e As _

System.ComponentModel.CancelEventArgs) Handles MyBase.Closing

        frm1.Show()

    End Sub

哈，很方便，我关闭了Form2窗体的实例后，被隐藏的那个frm1又出现了。

“嗯，”大李终于发话了，“你再点击一下Form1窗体上的Button1试试。”

我背心一凉，隐隐感觉大李等待着的就是这个时候。无奈的我还只能照他说的去做。果然，弹出一个出错窗口：

“你关闭了frm2这个Form2的实例，也就结束了这个对象的生存期，”大李看来是蓄势已久了，“这就是出错提示中所说的‘无法访问名为Form2的已处置对象’。当我们关闭一个窗口的时候，会发出一个终止响应，并将该窗口对象，就象上面定义的frm2，送入终止队列，公共语言运行库的垃圾回收器跟踪着这个对象的生存期，此时就会调用此对象基类，比如Form2的Dispose方法，用于销毁对象并收回资源。所以……”

“所以我只要判断一下frm2是否被销毁就行了，如果销毁了，我就再构造一个实例不就行了？”我恍然大悟道。

大李第一次微笑地点了点头说：“用frm2.IsDisposed就可以来判断了。”

我心领神会地写道：

Private Sub Button1_Click(ByVal sender As System.Object, _

ByVal e As System.EventArgs) Handles Button1.Click

        If frm2 Is Nothing Or frm2.IsDisposed Then  ‘判断对象是否被销毁

            frm2 = New Form2()

        End If

        Me.Hide()

        frm2.Show()

    End Sub

这下完善多了，两个窗体之间的切换也不会有这么多别扭的问题了。我转过身，看到大李已经找了把椅子坐在我的身边。

“你来说说，对VB.NET的窗体实例的创建与销毁的过程吧。”

我整理了一下凌乱的思路，长吁了一口气，开始说：“一个窗体类，比如Form1类是通过调用其基类，就是Form类的New方法来创建实例、Dispose方法来销毁实例。”

“没错。”大李边说话，一边在我的程序中点击开来被代码窗口自动折叠起来的" Windows 窗体设计器生成的代码 "：

    Public Sub New()

        MyBase.New()

        ''''该调用是 Windows 窗体设计器所必需的。

        InitializeComponent()

        ''''在 InitializeComponent() 调用之后添加任何初始化

    End Sub

    ''''窗体重写处置以清理组件列表。

    Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)

        If disposing Then

            If Not (components Is Nothing) Then

                components.Dispose()

            End If

      &n

[1] [2]  下一页