测试一下代码格式.

马大哈

本帖是为了测试发帖时的代码格式.   
以下是代码:

1. '*************************************************************************
   
2. '**模 块 名：ModQuit
   
3. '**说    明：退出程序时自动卸载所有窗口
   
4. '**创 建 人：马大哈
   
5. '**日    期：2003年10月26日
   
6. '*************************************************************************
   
7. Option Explicit
   
8. Public Sub Quit()
   
9.     Dim X As Form
   
10.     For Each X In Forms
    
11.         Unload X
    
12.     Next
    
13. End Sub

复制代码