VB6 app gives run-time error 6 overflow

[imperialdata]

Daft question I suppose but was surprised to learn you could have 32,767 single characters or 32,767 large strings