コードレビューをしていて不思議に思うこと2

Dim ○○済 As Boolean

で良いのに、

Private Const ○○済 As String = "1"

Private Const 未○○ As String = "0"

という宣言がしてある。