お前ら人格攻撃は手馴れてるけど技術的な話になるととたんに雑魚になるよな。
前スレでJava 7のtryステートメントが出てたけどあれをVBでやるならこうだからな。

Sub Try(ByVal objCloseable)
　　Call Process(objCloseable)
　　Call objCloseable.Close()
End Sub

Sub Process(ByVal objCloseable)
　　On Error Resume Next
　　Call objCloseable.Process()
　　If Err.Number <> 0 Then
　　End If
End Sub

Class Closeable
　　Public Sub Process()
　　End Sub
　　
　　Public Sub Close()
　　End Sub
End Class

Sub Main()
　　Call Try(New Closeable)
End Sub