测试一下代码格式.
本帖是为了测试发帖时的代码格式.以下是代码:'*************************************************************************
'**模 块 名：ModQuit
'**说 明：退出程序时自动卸载所有窗口
'**创 建 人：马大哈
'**日 期：2003年10月26日
'*************************************************************************
Option Explicit
Public Sub Quit()
Dim X As Form
For Each X In Forms
Unload X
Next
End Sub
页:
[1]