Здравствуйте!
1С 7.7 + Сканер штрих кода (USB). Сканер Ganton NT-8800 эмулирует клавиатуру. Испльзую компоненту : "vk_rs232

Процедура ПриНачалеРаботыСистемы() //Предопределенная процедура 1С
    
    ок=1;
    Если глЗагрузитьВнешнююКомпоненту("vk_rs232")=0 Тогда
        Сообщить("Внешняя компонента не была загружена!","!");
    Иначе
        rs232=СоздатьОбъект("AddIn.vk_rs232");
        rs232_2=СоздатьОбъект("AddIn.vk_rs232");
    КонецЕсли;
    
    Сообщить("При считывании кода, который завершается символами #13#10, здесь должны появляться считанные строки.");
    Сообщить("Слушаются порты: COM1 и COM2.");
    Сообщить("Чтобы послать тестовые символы в порт, используйте обработку ОтправитьДанныеВComПорт в меню Обработки.");
    Сообщить("(актуально при наличии кабеля COM-COM)");
    
    //Начинаем слушать порт
    rs232.ОткрытьПорт("COM1"); 
    rs232.КонецСтроки=Симв(13);
    
    rs232.ПерехватКлавиатуры(1);
    
КонецПроцедуры

При сканирование идет искажение (дублирование) кодов.

Данные=40045577222001199
Данные=40045577222001199
Данные=0887722995504448833
Данные=0887722995504448833
Данные=0887722995504448833
Данные=0887722995504448833
Данные=488220004400226644
Данные=488220004400226644

А зачем 2 раза создаете объект внешней компоненты?

Это был пример, не заметил. Убрал лишние строки.

Внешнее событие: Источник=vk_rs232 Событие=BarCodeValue Данные=40045577222001199
Внешнее событие: Источник=vk_rs232 Событие=BarCodeValue Данные=40045577222001199
Внешнее событие: Источник=vk_rs232 Событие=BarCodeValue Данные=0887722995504448833
Внешнее событие: Источник=vk_rs232 Событие=BarCodeValue Данные=0887722995504448833

Переделал :

Процедура ПриНачалеРаботыСистемы() //Предопределенная процедура 1С
    
    ок=1;
    Если глЗагрузитьВнешнююКомпоненту("vk_rs232")=0 Тогда
        Сообщить("Внешняя компонента не была загружена!","!");
    Иначе
        rs232=СоздатьОбъект("AddIn.vk_rs232");
    КонецЕсли;
    
    //Начинаем слушать порт
    rs232.ОткрытьПорт("COM1"); 
    //rs232.КонецСтроки=Симв(13);
    
    rs232.ПерехватКлавиатуры(1);
    
КонецПроцедуры

Процедура ОбработкаВнешнегоСобытия(Источник,Событие,Данные)//Предопределенная процедура 1С
    //Глобальный обработчик внешнего события
    Сообщить("Внешнее событие: Источник="+Источник+"  Событие="+Событие+"  Данные="+Данные);
КонецПроцедуры

Внешнее событие: Источник=vk_rs232 Событие=BarCodeValue Данные=0887722995504448833
Внешнее событие: Источник=vk_rs232 Событие=BarCodeValue Данные=0887722995504448833
Внешнее событие: Источник=vk_rs232 Событие=BarCodeValue Данные=0887722995504448833
Внешнее событие: Источник=vk_rs232 Событие=BarCodeValue Данные=40045577222001199
Внешнее событие: Источник=vk_rs232 Событие=BarCodeValue Данные=40045577222001199

yw_prog, может со второго раза понятнее станет: выделяйте код! И советую вообще правила почитать, чтобы недоразумений в будущем не было.

А чем старый добрый Атол не нравиться?
И что за зверь этот Ganton NT-8800? Откуда его взяли и кто его посоветовал?