powered by simpleCommunicator - 2.0.51     © 2025 Programmizd 02
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Проверка текста
9 сообщений из 9, страница 1 из 1
Проверка текста
    #39300019
Kiu
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Kiu
Гость
Задача очень простая, нужно проверять или текст, который находится в переменной совпадает ли с заданной переменной, из-за этого у меня не работала программа, потом выяснил, что идёт несовпадение, у меня в переменную asd занесён текст - среднее.
Я написал такое условие, но почему текст не совпадает?
Код: vbnet
1.
2.
3.
if asd = "среднее" then
MsgBox("yes")
else MsgBox("no")


Выдаёт no
Вот снимок MsgBox(asd)
...
Рейтинг: 0 / 0
Проверка текста
    #39300030
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
потому что первая буква не русская "с", а английская "Цэ"
...
Рейтинг: 0 / 0
Проверка текста
    #39300040
Kiu
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Kiu
Гость
Shocker.Proпотому что первая буква не русская "с", а английская "Цэ"
Неа, везде где надо слова переписал, все равно не идёт
...
Рейтинг: 0 / 0
Проверка текста
    #39300056
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ну значит пробел, перевод строки, табуляция или еще что
посмотри ASCII-код первого и последнего символа в переменной
...
Рейтинг: 0 / 0
Проверка текста
    #39300057
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
или просто длину строки посмотри
...
Рейтинг: 0 / 0
Проверка текста
    #39300065
Фотография The_Prist
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ага, а еще надо посмотреть регистр. Вдруг в переменной буквы заглавные...Но если бы посмотрели по коду ASCII - то это выявилось бы.
...
Рейтинг: 0 / 0
Проверка текста
    #39300135
Фотография Akina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
if asd = "среднее" then
    MsgBox("yes")
else 
    if len(asd)<>len("среднее") then
        msgbox "Несовпадение длины"
    else
        for i = 1 to len(asd)
            if asc(mid(asd,i))<>asc(mid("среднее",i)) then
                 msgbox "Символ № " & i & ", код = " & asc(mid(asd,i)) & ", ожидался код " & asc(mid("среднее",i))
            end if
        next i
    endif
end if
...
Рейтинг: 0 / 0
Проверка текста
    #39300179
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Akina, безобразие! константа употребляется литерально четыре раза!
...
Рейтинг: 0 / 0
Проверка текста
    #39300246
Фотография Akina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Shocker.Pro, я ж не виноват, что у ТС она литералом, а не private const... а ну как не поймёт...
...
Рейтинг: 0 / 0
9 сообщений из 9, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Проверка текста
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]