VBScript יצוג ערכים בשיטת בסיס הקסדצימלי

שלום,

אני כותב חדש בVBscript , כאשר אני רוצה ליצג ערכים בהקס, למשל אני כותב &H8001
היחס לערך הוא כמספר שלילי ( 32767-) בעוד הערך האמיתי שאני אמור לקבל הוא 32769 מספר חיובי.
איך אני יכול לרשום מספר בהקס ולמרות זאת לקבל מספר חיובי , או לדאוג שסיבית הסימן לא תתפרש כסימן אלא כ ערך מספרי?

בברכה.