Visual Basic 6.0 Дано целое число от 100 до 999. Вывести строку-словесное описание числа (814=восемьсот четырнадцать)

Если первый разряд равен 1, то СТО, если 2 - то ДВЕСТИ и так далее.
Если второй равен 10, то десять, если 11 - то одинадцать и теде до 20, потом 30, 40.

Ну и аналогично младший разряд.