Проверка последовательности символов

[Alexandrius]

Пытаюсь написать свою первую программу. Пjдскажите, пожалуйста,
как проверить переменную S, содержащую строку тукста на наличие в этой строке определённой последовательности символов (например "&&A.)&&")? Кодировка ANSI.

[Viper]

InStr, это функция такая.

[Хакер]

Но она работает с юникодом. У автора же ANSI. Хотя, конечно, он, скорее всего, заблуждается.

[Viper]

Но она работает с юникодом. У автора же ANSI. Хотя, конечно, он, скорее всего, заблуждается.

Скорее всего таки да, заблуждается.

[Alexandrius]

Строка считывается из Notepad, поэтому ANSI, но можно в Юникоде сделать. А можно поподробнее о том, как реализовать функцию?

[Хакер]

Автор, ты либо ничерта не понимаешь, либо не тот, за кого себя выдаёшь.
Но, к сожалению, скорее всего первое.

Видишь ли, в COM, (как следствие) в VB, а ещё в Windows NT, (как следствие) в comctl32 и как следствие в Notepad все строки хранятся в юникоде.

Откуда ты взял строку в ANSI? Как ты её хранишь в VB6 (который не позволяет иметь ANSI-строки)?

[Alexandrius]

Спасибо, что пояснил, буду знать. Я действительно ещё мало знаю. Учиться пытаюсь по ходу составления кода.

[Денис]

Код: Выделить всё

Private Sub Form_Load()
   
   Dim FileText As String
   Dim FindText As String
   Dim Ret As Long
   
   FileText = "This is HelloWorld program"
   FindText = "HelloWorld"
   
   Ret = InStr(FileText, FindText)
   
   If Ret > 0 Then
      MsgBox "Нашел!"
   Else
      MsgBox "Не нашел!"
   End If
   
End Sub

[Mikle]

Наверное автор имел ввиду не "из нотепада", а из текстового файла, созданного при помощи нотепада.
VB, считываю строку из такого файла, автоматом переводит её в юникод.