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


Выдаёт no
Вот снимок MsgBox(asd)
...
Рейтинг: 0 / 0
30.08.2016, 10:32
    #39300030
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проверка текста
потому что первая буква не русская "с", а английская "Цэ"
...
Рейтинг: 0 / 0
30.08.2016, 10:42
    #39300040
Kiu
Kiu
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проверка текста
Shocker.Proпотому что первая буква не русская "с", а английская "Цэ"
Неа, везде где надо слова переписал, все равно не идёт
...
Рейтинг: 0 / 0
30.08.2016, 10:51
    #39300056
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проверка текста
ну значит пробел, перевод строки, табуляция или еще что
посмотри ASCII-код первого и последнего символа в переменной
...
Рейтинг: 0 / 0
30.08.2016, 10:52
    #39300057
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проверка текста
или просто длину строки посмотри
...
Рейтинг: 0 / 0
30.08.2016, 10:57
    #39300065
The_Prist
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проверка текста
ага, а еще надо посмотреть регистр. Вдруг в переменной буквы заглавные...Но если бы посмотрели по коду ASCII - то это выявилось бы.
...
Рейтинг: 0 / 0
30.08.2016, 11:48
    #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
30.08.2016, 12:24
    #39300179
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проверка текста
Akina, безобразие! константа употребляется литерально четыре раза!
...
Рейтинг: 0 / 0
30.08.2016, 13:39
    #39300246
Akina
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проверка текста
Shocker.Pro, я ж не виноват, что у ТС она литералом, а не private const... а ну как не поймёт...
...
Рейтинг: 0 / 0
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Проверка текста / 9 сообщений из 9, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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