ReSQL.ru
     
powered by simpleCommunicator - 2.0.53     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Ошибка 5
13 сообщений из 13, страница 1 из 1
Ошибка 5
    #38219650
катастрофа
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
катастрофа
Участник
Здравствуйте, имеются строки кода в цикле:

Код: vbnet
1.
2.
3.
4.
 If Две_последн = "ую" Then
                Первое_слово1 = Left$(Первое_слово, (Len(Первое_слово) - 2)) & "ну"
                FunctionПроверка_орфографии_слова Первое_слово1, Сгенерирован
            End If



На строке кода
Код: vbnet
1.
Первое_слово1 = Left$(Первое_слово, (Len(Первое_слово) - 2)) & "ну"


получаю ошибку № 5 Invalid procedur call or argument
В момент ошибки
Код: vbnet
1.
2.
Первое_слово = "впрессую"
Две_последн = "ую"


Код: vbnet
1.
Option Explicit


имеется. Что это может быть?, спасибо
...
Рейтинг: 0 / 0
10.04.2013, 05:39
| Ответить | Цитировать | Написать  
Ошибка 5
    #38219654
Фотография AndreTM
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AndreTM
Участник
Лишние скобки?
Код: vbnet
1.
Первое_слово1 = Left$(Первое_слово, Len(Первое_слово) - 2) & "ну"
...
Рейтинг: 0 / 0
10.04.2013, 05:50
| Ответить | Цитировать | Написать  
Ошибка 5
    #38219687
Фотография HandKot
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
HandKot
Участник
AndreTM, скобки тут не причем
есть подозрение, что
Код: vbnet
1.
Len(Первое_слово) - 2

возвращает отрицательное значение и тогда и будет такая ошибка

причин может быть две:
1. у автора в коде очепятка и вместо Len(Первое_слово) у него Len(Первое_слово1), а строка еще пустая
2. на вход подается строка менее одного символа

ЗЫЖ может я и ошибаюсь
...
Рейтинг: 0 / 0
10.04.2013, 08:05
| Ответить | Цитировать | Написать  
Ошибка 5
    #38219701
Фотография mds_world
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
mds_world
Участник
Как вариант - слетела ссылка (миссинг) в референсах и компилятор останавливается на первой же встреченной функции. Хотя имеет в виду совсем не ее.
...
Рейтинг: 0 / 0
10.04.2013, 08:28
| Ответить | Цитировать | Написать  
Ошибка 5
    #38220056
катастрофа
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
катастрофа
Участник
mds_world,
когда код дошёл до Первое_слово = "впрессую" у него до этого Две_последн = "ую" было уже 141 раз
Первое_слово1 = Left$(Первое_слово, (Len(Первое_слово) - 2)) & "ну - нет онечатки
на вход подается строка менее одного символа - подаётся Первое_слово = "впрессую"
>Как вариант - слетела ссылка (миссинг) в референсах и компилятор останавливается на первой же встреченной функции. Хотя имеет в виду совсем не ее. - как это узнать и как лечить?
...
Рейтинг: 0 / 0
10.04.2013, 11:57
| Ответить | Цитировать | Написать  
Ошибка 5
    #38220262
Фотография mds_world
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
mds_world
Участник
катастрофа>Как вариант - слетела ссылка (миссинг) в референсах и компилятор останавливается на первой же встреченной функции. Хотя имеет в виду совсем не ее. - как это узнать и как лечить?Открыть редактор ВБА, далее меню Tools-References. Смотреть, нет ли среди ссылок с галочками слова MISSING. Если есть, снять галку и заново пробовать код.
...
Рейтинг: 0 / 0
10.04.2013, 13:23
| Ответить | Цитировать | Написать  
Ошибка 5
    #38220924
катастрофа
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
катастрофа
Участник
mds_world,
итак если тупо кусочек запустить
Код: vbnet
1.
2.
Первое_слово = ""
    Первое_слово1 = Left$(Первое_слово, Len(Первое_слово) - 2) & "ну"


то и будет ошибка 5 - вроде давным давно знакомился с возможностями не замечал...
...
Рейтинг: 0 / 0
10.04.2013, 18:54
| Ответить | Цитировать | Написать  
Ошибка 5
    #38220936
катастрофа
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
катастрофа
Участник
я Вас ввёл в заблуждение, в момент ошибки всё же
Код: vbnet
1.
2.
Первое_слово1 = "юсь" - хотя это не имеет значения
Первое_слово = "ю"


тогда всё понятно, но как отследить почему так стало, по коду так не должно быть!?
должно быть
Код: vbnet
1.
Первое_слово = "впрессую"
...
Рейтинг: 0 / 0
10.04.2013, 19:07
| Ответить | Цитировать | Написать  
Ошибка 5
    #38221222
Фотография HandKot
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
HandKot
Участник
катастрофая Вас ввёл в заблуждение, в момент ошибки всё же
Код: vbnet
1.
2.
Первое_слово1 = "юсь" - хотя это не имеет значения
Первое_слово = "ю"


тогда всё понятно, но как отследить почему так стало, по коду так не должно быть!?
должно быть
Код: vbnet
1.
Первое_слово = "впрессую"



ну вот и разобрались.
а почему, по ходу, вместо "впрессую" оказалось "ю", то это надо код смотреть. Ставте засечки и смотрите
...
Рейтинг: 0 / 0
11.04.2013, 08:01
| Ответить | Цитировать | Написать  
Ошибка 5
    #38222143
катастрофа
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
катастрофа
Участник
катастрофаmds_world,
итак если тупо кусочек запустить
Код: vbnet
1.
2.
Первое_слово = ""
    Первое_слово1 = Left$(Первое_слово, Len(Первое_слово) - 2) & "ну"


то и будет ошибка 5 - вроде давным давно знакомился с возможностями не замечал...
а тогда вместо этого что лучше использовать?? чтобы было пофиг на длину строки
...
Рейтинг: 0 / 0
11.04.2013, 16:12
| Ответить | Цитировать | Написать  
Ошибка 5
    #38222414
Фотография HandKot
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
HandKot
Участник
катастрофакатастрофаmds_world,
итак если тупо кусочек запустить
Код: vbnet
1.
2.
Первое_слово = ""
    Первое_слово1 = Left$(Первое_слово, Len(Первое_слово) - 2) & "ну"


то и будет ошибка 5 - вроде давным давно знакомился с возможностями не замечал...
а тогда вместо этого что лучше использовать?? чтобы было пофиг на длину строки

лучше делать проверку
...
Рейтинг: 0 / 0
11.04.2013, 17:33
| Ответить | Цитировать | Написать  
Ошибка 5
    #38222574
катастрофа
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
катастрофа
Участник
HandKot,
в том то и дело, уже не помню каким именно способом - Mid или другим я опробывал и ему было пофигу...
...
Рейтинг: 0 / 0
11.04.2013, 18:44
| Ответить | Цитировать | Написать  
Ошибка 5
    #38222893
Фотография HandKot
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
HandKot
Участник
катастрофаHandKot,
в том то и дело, уже не помню каким именно способом - Mid или другим я опробывал и ему было пофигу...

да мне кажется, что все будет ругаться при нарушении границ массива
...
Рейтинг: 0 / 0
12.04.2013, 08:01
| Ответить | Цитировать | Написать  
13 сообщений из 13, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Ошибка 5
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/search_topic.php?author=HolyG&author_mode=last_topics&do_search=1]:
 0ms
get settings:
 11ms
get forum list:
 15ms
get settings:
 9ms
get forum list:
 13ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 52ms
get topic data:
 11ms
get forum data:
 3ms
get page messages:
 49ms
get tp. blocked users:
 1ms
others: 685ms
total:  857ms
созд. / загр.: 857ms
x
x
Закрыть


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