% - Integer
& - Long
! – Single
@ - Currency
# - Double
$ - String (только для строк переменной длины)

Тогда как второй вариант, предоставляет немного больше свободы :
DefBool - Boolean
DefByte - Byte
DefInt - Integer
DefLng - Long
DefCur - Currency
DefSng - Single
DefDbl - Double
DefDate - Date
DefStr - String
DefObj - Object
DefVar - Variant

Что касается осмысленных имён переменных, то использование инструкции Def… это позволяет, хотя для этого и придётся пойти на небольшой компромисс, например :

Код:

DefStr S, DefInt I

…
strDirectory
strInputData
intMaxTrueAnswers
intNumberTrueAnswers