Как можно проверить, что в строке нету кириллических символов?

Кириллические символы имеют коды во второй половние кодовой таблицы - после 127 до 255, но не все эти коды - буквы, что-то еще и знаки всякие. Так что открой командную строку в виндах, набнри charmap и втыкай

также можно использовать Regexp

(0)
http://help1c.com/faq7/view/992.html

(3) !оно
там же: http://help1c.com/faq82/view/475.html

а чо старое доброе:

Если Найти("АБВГ...абвг...",НашСИмвол)>0 Тогда
Предупреждение("Есть русские буквы!");
Прервать;
КонецЕсли;

(5) это чо?

(6) это проверка символа на алфавит

(7) а цыкл где?

(8) это проверка символа, а не строки. Вытащить в цикле Н-ный символ из строки, надеюсь, не представляет сложностей..

(9) а использование Найти() значит представляет особую сложность?

(8) Ты ещё спроси - почему в алфавите среди русских букв точки затесались :-)

(10) Судя по тому, что ответ с Найти был под номером 5...

Функция ЭтоСимволКир(С)
С1=Врег(С);
Если (С1="Ё") ИЛИ ((С1>="А") И (С1<="Я")) Тогда Возврат 1; КонецЕсли;
Возврат 0;
КонецФункции

Рез=0;
Для нс=1 По СтрДлина(НашаСтрока) Цикл Рез=Рез+ЭтоСимволКир(Сред(НашаСтрока,нс,1));
Если Рез>0 Тогда
Предупреждение("Есть символы кириллицы!!!");
Иначе
Предупреждение("Нет символов кириллицы!!!");
КонецЕсли;

даже так:
Для нс=1 По СтрДлина(НашаСтрока) Цикл
Если ЭтоСимволКир(Сред(НашаСтрока,нс,1))=1 Тогда Рез=Рез+1; Прервать; КонецЕсли;
КонецЦикла;

(14) Был уже как-то спор на форуме - что быстрее: RegExp, Найти или циклом бежать. Поищи, интересно на самом деле было. С решением от Схамбара. Там, правда, искали цифры, а не буквы - но принцип-то тот же.

(15) ты хотел сказать: смахарбА?

с цифрами быстрее всего вложенные СтрЗаменить(), если это про ту ветку, в которой я участвовал

(0)

Ежели  OemToAnsi(Стр)<>Стр Тогда
   Сообщить("В строке есть кириллица");
КонецЕжели;

(16) Ага, очепятался. Правда, сейчас уже сомнения гложут - может, не он, а NS.
Не знаю насчёт СтрЗаменить, там было именно про поиск. Найти()  всех уделало в итоге (при правильном использовании).

(17) это нечестные методы! :-)

(17) Читер

(17) "ADB ®" - кириллицы нет.

+(21) А указанный тест говорит, что есть.

(6)
Функция ПрверитьНаРусскиеБуквы(Путькфайлу)
       //Проверка на русские буквы АБВГДЕЁЗИЙКЛМНОПРСТУФХЪЫЭабвгдеёзийклмнопрстуфхъыэ
       РусскийШрифт="АБВГДЕЁЗИЙКЛМНОПРСТУФХЬЪЫЭабвгдеёзийклмнопрстуфхьъыэ";
   ДлинаПути=СтрДлина(Путькфайлу);
   Для НомерВСтроке=1 По ДлинаПути Цикл  
       СимволИзСтроки=Сред(Путькфайлу,НомерВСтроке,1);    
       Если Найти(РусскийШрифт,СимволИзСтроки)>0 Тогда
           Сообщить("Найдены русские буквы в "+Путькфайлу);      
           Возврат 1;
       КонецЕсли;
   КонецЦикла;
   Возврат 0;
КонецФункции

зачем использовать большие и малые буквы ?

и до кучи, смена кодировки:

//*******************************************
Функция ПреобразоватьСтрокуИзУТФ8(Стр)
   Длина=СтрДлина(Стр);
   Итог="";
   Для Н=1 По Длина Цикл
       Знак=Сред(Стр,Н,1);
       Код=КодСимв(Знак);
       Если Код<128 Тогда
           Итог=Итог+Знак;
       ИначеЕсли (Код>=128)И(Код<192) Тогда
       Иначе
           Н=Н+1;
           Знак2=Сред(Стр,Н,1);
           Код2=КодСимв(Знак2);
           Если Код=208 Тогда
               Если Код2=129 Тогда Итог=Итог+"Ё";
               Иначе Итог=Итог+Симв(КодСимв("А")+Код2-144);
               КонецЕсли;
           ИначеЕсли Код=209 Тогда
               Если Код2=145 Тогда Итог=Итог+"ё";
               Иначе Итог=Итог+Симв(КодСимв("р")+Код2-128);
               КонецЕсли;
           КонецЕсли;
       КонецЕсли;
   КонецЦикла;
   Возврат Итог;
КонецФункции  

я эти функции брал из архиовов этого форума

(24) чтобы не тратить время на преобразование Нрег, или Врег