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

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Alexandrius
Обычный пользователь
Обычный пользователь
Аватара пользователя
 
Сообщения: 55
Зарегистрирован: 01.11.2009 (Вс) 14:09
Откуда: Украина

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

Сообщение Alexandrius » 01.11.2009 (Вс) 14:32

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

Viper
Артефакт VBStreets
Артефакт VBStreets
Аватара пользователя
 
Сообщения: 4394
Зарегистрирован: 12.04.2005 (Вт) 17:50
Откуда: Н.Новгород

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

Сообщение Viper » 01.11.2009 (Вс) 14:39

InStr, это функция такая.
Весь мир матрица, а мы в нем потоки байтов!

Хакер
Телепат
Телепат
Аватара пользователя
 
Сообщения: 16489
Зарегистрирован: 13.11.2005 (Вс) 2:43
Откуда: Казахстан, Петропавловск

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

Сообщение Хакер » 01.11.2009 (Вс) 16:10

Но она работает с юникодом. У автора же ANSI. Хотя, конечно, он, скорее всего, заблуждается.
—We separate their smiling faces from the rest of their body, Captain.
—That's right! We decapitate them.

Viper
Артефакт VBStreets
Артефакт VBStreets
Аватара пользователя
 
Сообщения: 4394
Зарегистрирован: 12.04.2005 (Вт) 17:50
Откуда: Н.Новгород

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

Сообщение Viper » 01.11.2009 (Вс) 20:05

Хакер писал(а):Но она работает с юникодом. У автора же ANSI. Хотя, конечно, он, скорее всего, заблуждается.
Скорее всего таки да, заблуждается.
Весь мир матрица, а мы в нем потоки байтов!

Alexandrius
Обычный пользователь
Обычный пользователь
Аватара пользователя
 
Сообщения: 55
Зарегистрирован: 01.11.2009 (Вс) 14:09
Откуда: Украина

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

Сообщение Alexandrius » 01.11.2009 (Вс) 20:58

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

Хакер
Телепат
Телепат
Аватара пользователя
 
Сообщения: 16489
Зарегистрирован: 13.11.2005 (Вс) 2:43
Откуда: Казахстан, Петропавловск

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

Сообщение Хакер » 01.11.2009 (Вс) 21:04

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

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

Откуда ты взял строку в ANSI? Как ты её хранишь в VB6 (который не позволяет иметь ANSI-строки)?
—We separate their smiling faces from the rest of their body, Captain.
—That's right! We decapitate them.

Alexandrius
Обычный пользователь
Обычный пользователь
Аватара пользователя
 
Сообщения: 55
Зарегистрирован: 01.11.2009 (Вс) 14:09
Откуда: Украина

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

Сообщение Alexandrius » 01.11.2009 (Вс) 21:14

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

Денис
Доктор VB наук
Доктор VB наук
Аватара пользователя
 
Сообщения: 2734
Зарегистрирован: 07.11.2006 (Вт) 13:55
Откуда: Ейск, Краснодарский край

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

Сообщение Денис » 02.11.2009 (Пн) 10:49

Код: Выделить всё
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
Изобретатель велосипедов
Изобретатель велосипедов
Аватара пользователя
 
Сообщения: 4158
Зарегистрирован: 25.03.2003 (Вт) 14:02
Откуда: Туапсе

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

Сообщение Mikle » 03.11.2009 (Вт) 11:17

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


Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 25

    TopList