module1.bas

------ DebugAsm Editor使用说明 ------ 本软件是采用DEUBG作ASM程式设计的工具,采用本人 自创的工程方案,令你的ASM程式设计更方便.

Attribute VB_Name = "Module1"
Option Explicit

Function GetAppVer() As String                             '取得软件版本
  GetAppVer = App.Major & "." & Format(App.Minor, "00") & "." & Format(App.Revision, "0000")
End Function