Write: как вставить спец. символ? (в VB6)

Требуется сделать замену символов в Write на специальные символы. Например, заменить выражение в тексте на символ квадратного корня с кодом 8730 (Unicode). Использую следующий код для замены, но как тут спец. символ вставить? Код: Set Replace1 = oDoc.createReplaceDescriptor Replace1.SearchString = "" Replace1.ReplaceString = iUni '??? oDoc.replaceAll Replace1Еще проблема преобразования кода символа в символ chr(8730) в VB6 не работает (только коды до 255). Вообщем, как написать программный код для этой задачи в VB6 ?