VPF::Как определить в каком месте строк стоит знак "="

XPurple

Дата 22.5.2006, 06:16 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 140
Регистрация: 4.5.2006
Где: Челябинск

Репутация: 1
Всего: 1

Требуется обработать строки текстового файла, в которых есть строки вида выражение1=выражение2. Вызывает затруднение то,что длина выражений в разных строках имеет разную длину. Как обработать такие выражения ?

--------------------

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

boevik

Дата 22.5.2006, 07:16 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Участник Клуба
Сообщений: 1452
Регистрация: 31.5.2004
Где: Израиль

Репутация: 12
Всего: 35

function InStr возвращает позицию начала текста2 в тексте1.

Код


instr(1, "a=b", "=", vbTextCompare)   'возвращает 2.

--------------------

Никогда не говори никогда

XPurple

Дата 22.5.2006, 07:38 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 140
Регистрация: 4.5.2006
Где: Челябинск

Репутация: 1
Всего: 1

Идея понятна, спасибо.
Вот так в итоге получилось

Код


Public Function SelectString(ByVal openReadConf As Object, ByVal CheckSlash As Boolean) _
As String
Dim valTemp As String
Dim position As Integer

valTemp = openReadConf.ReadLine()
position = InStr(1, valTemp, "=", vbTextCompare)
valTemp = Right(valTemp, Len(valTemp) - position)

If Right(valTemp, 1) <> "\" And CheckSlash Then
SelectString = valTemp + "\"

Else
SelectString = valTemp

End If
End Function

Метод Skip только на считываемые строки из файла распространяется ?
На переменные типа String не распространяется ?

Это сообщение отредактировал(а) XPurple - 22.5.2006, 08:46

--------------------

Akina

Дата 22.5.2006, 10:20 (ссылка)

(нет голосов)

Загрузка ...

Советчик

Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 34
Всего: 454

Если в строке строго один знак равенства, разумнее выполнять Split по нему - получишь сразу куски до и после знака.

--------------------

О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.

XPurple

Дата 22.5.2006, 13:04 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 140
Регистрация: 4.5.2006
Где: Челябинск

Репутация: 1
Всего: 1

Цитата(Akina @ 22.5.2006, 10:20

)

Век -живи. Век -учись. Спасибо за подсказку.

--------------------

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| VB6 \| Следующая тема »