Vb6, Как получить код символа

Здрасьте всем!
Поможите плиз!
Как в басике получить код символа, обратную операции chr$(), или аналогично как в С++
char a = 'A';