VB6能否做结构化的异常处理。
C++ Builder 对结构化异常处理做了扩展，支持 __Finally 关键字，保证了例程只有一个出口，是很科学的一种错误处理方法，体现了 C++ Builder 开发者深厚的编程经验与智慧。VB.NET 对它的模仿就是对结构化异常处理最大的赞许。
请看一个VB.NET结构化异常处理的例子。
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim i As Long, j As Long
j = 0
Try
i = 1 / j
Catch
MsgBox("ERROR")
Finally
MsgBox("Finally")
End Try
End Sub
当然，在实际编程中我们不会做仅仅弹出一个msgbox这么无聊的动作。Try 结构中
我们通常放一些可能引发异常的代码，这类的代码大多是访问文件（因为读写文件可能遇到被拒、磁盘满等情况）、访问注册表 等不可靠操作。当try结构中的代码执行出现异常时，程序直接跳转，执行catch结构中的代码，catch结构中，我们通常是放一些报告错误、处理错误的代码，比如用 Msgbox 报告给用户出了什么错，下一步用户该如何做等等信息。不论 是否发生异常，Finally结构中的代码是总是要执行的，因此我们可以在finally结构中放进去一些被称作“清理性代码”的语句，比如，关闭打开的文件、关闭打开的句炳、释放对象的实例等操作。
VB6是基于COM的开发语言，和c++中的栈上创建对象有很大的不同。VB6中的COM对象具有引用计数机制，这就意味着，在一个例程结束后，对象变量（指向对象实例的指针）会被自动销毁，那么对象实例的引用计数器的数值就会减一，如果计数器减到0，这个实例就会被系统自动销毁。而C++的栈上创建的对象则没有这种自我管理机制，它需要程序员显式的释放对象实例。（关于COM的原理，先说到这，以后专门详谈）。总之，对VB6来说，用结构化异常来保证对象实例的销毁并不是显得那么有用，但我们有足够的理由在VB6中使用结构化异常处理，显而易见，前面提到的那些情况：关闭打开的文件、关闭打开的各种句炳，这些都是使用结构化异常处理的理由。
VB6虽然没有直接提供结构化异常处理机制，但其实只要把 On Error 语句稍做变通就可以了。
请看VB6模拟出的结构化异常处理：
try: On Error GoTo catch
'{
在这里添加“不可靠代码”
'}
GoTo finally
catch:
'{
在这里添加“错误报告、错误处理代码”
'}
finally:
'{
在这里添加“清理性代码，比如：关闭文件、关闭句炳等”
'}
也许您可能持反对意见，告诉我这段代码用了 goto 语句，这是不好的编程风格。
不提倡用goto 是因为 滥用goto 会把代码变成“乱面条”，但很明显这段代码并没有
滥用goto ,而是非常谨慎了的用了一下 goto ,代码中的goto 全部整齐划一的指向
finally 语句。
如果您有“goto 洁癖”，那么只好试试这个了：
try: On Error GoTo catch
'{
在这里添加“不可靠代码”
'}
finally:
'{
在这里添加“清理性代码，比如：关闭文件、关闭句炳等”
Exit Sub
'}
catch:
'{
在这里添加“错误报告、错误处理代码”
Resume finally
'}
这种格式和前者是等效的，它没用goto,但我觉得它比前者更“面条”一些。^_^个人喜欢第一种。
后记：
1.注意：finally 中一定要放稳固的代码，如果finally中出了错，就会导致异常无法处理。
2.这种对结构化异常处理的模拟只是基本的模拟，与真正的结构化异常处理比起来，还是有差别的，比如真正的结构化异常处理是可以嵌套的，也就是说一个try..catch...finally结构中可以嵌入另一个try...catch...finally结构。
3.我并不排斥与否定vb6传统的错误处理方法，vb6的错误处理语句很强大，灵活的运用才能更好的解决问题，不要局限于本文中的一个模式。传统的错误处理方法在MSDN中已有详细的介绍和示例，本文不再赘述。