Проблема с кодировкой в буфере обмена - VB

Формулировка задачи:

Добрый день. Возникла проблема следующего рода: при занесении некоторой текстовой строки в буфер обмена и попытки ее вставить в другое приложение (например, Notepad или в файлер Windows) строка (русские буквы в строке) при вставке превращается в иероглифы. Проблема, как я заметил, возникает только на ПК, где не стоит VB6. Как это исправить? Может нужен ей какой-то файл или можеть быть надо прописывать кодировку в теле программы?

Решение задачи: «Проблема с кодировкой в буфере обмена»

textual
                            Листинг программы 
                        
                            CStr(CLng(Left$(...))) = <font color="darkblue"><b>409</b></font>