>>828
AAAが16進のLong型だってことが一目で分かる。
Const AAA as Long = &H0
の方がお勧め。