Yang ingin saya lakukan adalah mendeklarasikan objek tanpa menginisialisasi, tetapi menyetel nilai defaultnya ke Nothing
. Kemudian, di akhir loop saya menulis:
If anObject IsNot Nothing Then anObject.Dispose()
Berikut contoh lengkapnya:
Public Sub Example()
Dim inputPdf As PdfReader = Nothing, inputDoc As Document = Nothing, outputWriter As PdfWriter = Nothing
GoodExit:
If inputPdf IsNot Nothing Then inputPdf.Dispose()
If inputDoc IsNot Nothing Then inputDoc.Dispose()
If outputWriter IsNot Nothing Then outputWriter.Dispose()
End Sub
Ini juga berfungsi dengan baik untuk menempatkan objek utama Anda di bagian atas rutinitas, menggunakannya di dalam Try
rutinitas, dan kemudian membuangnya dalam satu Finally
blok:
Private Sub Test()
Dim aForm As System.Windows.Forms.Form = Nothing
Try
Dim sName As String = aForm.Name
Catch ex As Exception
Finally
If aForm IsNot Nothing Then aForm.Dispose()
End Try
End Sub
bool IsDisposed { get; }
deklarasi tentangSystem.IDisposable
.