For consistency’s sake, use this routine wherever your version numbers appear in code:
Public Function GetMyVersion() As String ' Turn version info into something ' like "1.02.0001" Static strMyVer As String If strMyVer = "" Then ' Only call once for performance strMyVer = Trim$(Str$_ (App.Major)) & "." & _ Format$(App.Minor, "##00") _ & "." Format$(App.Revision, _ "000") End If GetMyVersion = strMyVerEnd Function