В общем, я, кажется, разобрался с проблемой. Вот в этой части кода.
Local space = Instr(A$, " ")
If space = 0 Then space = Len(A$)
Local temp$ = Left(A$, space)
Local trimmed$ = Trim(temp)
Local extra = 0
If (StringWidth (b$ + temp$) > W) And (StringWidth (b$ + trimmed$) <= W) Then
temp = trimmed
extra = 1
EndIf
В этой строке:
If (StringWidth (b$ + temp$) > W) And (StringWidth (b$ + trimmed$) <= W) Then
Переменная W означает ширину текста, если кто не понял.
Я поменял знаки ">" и "<" местами. В итоге, текст стал отображаться нормально.