Форум программистов, компьютерный форум, киберфорум
Visual Basic
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
 
Рейтинг 4.83/18: Рейтинг темы: голосов - 18, средняя оценка - 4.83
0 / 0 / 0
Регистрация: 04.04.2015
Сообщений: 37

Книга не работает на другом ПК "Invalid outside procedure"

19.05.2015, 15:15. Показов 3621. Ответов 20
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Всем, доброго дня. Подскажите пожалуйста в чем может быть проблема. Вот отсюда: Готовые решения и полезные коды на Visual Basic 6.0
взял 11 пример. Попробовал скомпилировать его но компилятор на второй же строке выдал ошибку "Invalid otside procedure". На мой взгляд вроде все верно. В чем может быть проблема. Файлы проекта прилагаю.
Вложения
Тип файла: rar Сохранение в ексель формате.rar (1.5 Кб, 6 просмотров)
0
Лучшие ответы (1)
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
19.05.2015, 15:15
Ответы с готовыми решениями:

Invalid procedure call or argument
здравствуйте, искал в интеренете ответа не нашел, для каждой задачи свое решение ошибка в этой строке For Each entry In...

VBA и ошибка: invalid outside procedure
Задание: Создать файл «Протокол.txt». При работе с приложением Word в нем должны фиксироваться дата и время запуска Microsoft Word, время...

Invalid procedure call or argument
здравствуйте, Ворд 2003, как можно на строке SelectionText = Selection.Text 'откидываем три первые буквы выделенного текста ...

20
es geht mir gut
 Аватар для SoftIce
11274 / 4760 / 1183
Регистрация: 27.07.2011
Сообщений: 11,439
19.05.2015, 15:45
Там код похоже для Net.
0
0 / 0 / 0
Регистрация: 04.04.2015
Сообщений: 37
19.05.2015, 15:48  [ТС]
А в чем разница?
0
es geht mir gut
 Аватар для SoftIce
11274 / 4760 / 1183
Регистрация: 27.07.2011
Сообщений: 11,439
19.05.2015, 15:49
Разные языки.
0
0 / 0 / 0
Регистрация: 04.04.2015
Сообщений: 37
19.05.2015, 20:05  [ТС]
Вообще в заголовке написано "Готовые решения и полезные коды на Visual Basic 6.0". Да и языки вроде должны быть похожими?

Добавлено через 4 часа 4 минуты
Да и потом, причем здесь для другого языка? Для VB здесь правильно написано.
0
es geht mir gut
 Аватар для SoftIce
11274 / 4760 / 1183
Регистрация: 27.07.2011
Сообщений: 11,439
19.05.2015, 22:25
Цитата Сообщение от vladh Посмотреть сообщение
Да и потом, причем здесь для другого языка? Для VB здесь правильно написано.
Мало ли что где написано. Using ...End Using - это чуждая конструкция.
0
0 / 0 / 0
Регистрация: 04.04.2015
Сообщений: 37
20.05.2015, 05:43  [ТС]
Цитата Сообщение от SoftIce Посмотреть сообщение
Мало ли что где написано. Using ...End Using - это чуждая конструкция.
Может быть, не знаю, но конструкция:
Dim tFile As String
tFile = ""
бейсиковская?! А мой компилятор Указывает на кавычки как на ошибку. Почему?
0
es geht mir gut
 Аватар для SoftIce
11274 / 4760 / 1183
Регистрация: 27.07.2011
Сообщений: 11,439
20.05.2015, 06:24
Цитата Сообщение от vladh Посмотреть сообщение
А мой компилятор Указывает на кавычки как на ошибку. Почему?
Потому что Ваш компилятор поддерживает мою точку зрения, а Вы нет
0
0 / 0 / 0
Регистрация: 04.04.2015
Сообщений: 37
20.05.2015, 06:28  [ТС]
Это здорово, что Вы "спелись" с моим компилятором, но все же, почему я в окне кода записываю только эти две строки, затем запускаю программу, а мне выдается ошибка?
0
es geht mir gut
 Аватар для SoftIce
11274 / 4760 / 1183
Регистрация: 27.07.2011
Сообщений: 11,439
20.05.2015, 06:36
Цитата Сообщение от vladh Посмотреть сообщение
почему я в окне кода записываю только эти две строки
Какие две строки?

tFile = ""
- это должно быть в процедуре
0
0 / 0 / 0
Регистрация: 04.04.2015
Сообщений: 37
20.05.2015, 06:44  [ТС]
Объясните пожалуйста подробнее. Почему присвоение переменной значения должно обязательно находится в процедуре? Почему этого не может быть просто в тексте программы?
0
es geht mir gut
 Аватар для SoftIce
11274 / 4760 / 1183
Регистрация: 27.07.2011
Сообщений: 11,439
20.05.2015, 06:49
Лучший ответ Сообщение было отмечено The trick как решение

Решение

Цитата Сообщение от vladh Посмотреть сообщение
Почему присвоение переменной значения должно обязательно находится в процедуре?
Это вопрос не ко мне, а к разработчикам Бейсика.

Оставьте тот пример в покое, он для VB.Net.

Посмотрите другой пример, может он вам больше понравится.
Вложения
Тип файла: rar Запись и чтение Excel.rar (8.2 Кб, 5 просмотров)
2
es geht mir gut
 Аватар для SoftIce
11274 / 4760 / 1183
Регистрация: 27.07.2011
Сообщений: 11,439
20.05.2015, 06:50
Цитата Сообщение от vladh Посмотреть сообщение
Почему этого не может быть просто в тексте программы?
А процедура - это разве не текст программы?

Вы просто скопипастили код, и даже не обозвали процедуру, хотя в конце этого кривого примера есть End Sub
0
0 / 0 / 0
Регистрация: 04.04.2015
Сообщений: 37
20.05.2015, 08:37  [ТС]
Цитата Сообщение от SoftIce Посмотреть сообщение
Это вопрос не ко мне, а к разработчикам Бейсика.
Вы это серьезно? А почему я этого нигде пока не увидел?

Добавлено через 2 минуты
Цитата Сообщение от SoftIce Посмотреть сообщение
А процедура - это разве не текст программы?
Разумеется. Но Вы же наверное поняли о сем я?
И спасибо за пример. Попытаю. Правда сейчас побежал на работу, и уже там через час буду его посмотреть.

Добавлено через 1 час 43 минуты
Цитата Сообщение от SoftIce Посмотреть сообщение
Посмотрите другой пример, может он вам больше понравится.
Спасибо, понравился. Так значит, получается, в VB присвоение значений переменным вне таких структур как процедуры, функции невозможно? Почему нигде об этом в самоучителях я не увидел?
0
Эксперт WindowsАвтор FAQ
 Аватар для Dragokas
18030 / 7733 / 892
Регистрация: 25.12.2011
Сообщений: 11,502
Записей в блоге: 16
20.05.2015, 14:00
Цитата Сообщение от vladh Посмотреть сообщение
Так значит, получается, в VB присвоение значений переменным вне таких структур как процедуры, функции невозможно?
Можно. Как перечисление (Enum) или константа (Const).
Это же касается и большинства других языков, не только VB.
0
0 / 0 / 0
Регистрация: 04.04.2015
Сообщений: 37
20.05.2015, 14:08  [ТС]
Цитата Сообщение от Dragokas Посмотреть сообщение
Это же касается и большинства других языков, не только VB.
А вот в Pure Basic можно.
0
Эксперт по электронике
6558 / 3185 / 335
Регистрация: 28.10.2011
Сообщений: 12,462
Записей в блоге: 7
20.05.2015, 14:23
Цитата Сообщение от vladh Посмотреть сообщение
Это здорово, что Вы "спелись" с моим компилятором
Нужно принимать правила языка и компилятора пусть даже не все нравится, иначе ничего не получится. Вместо установки своих правил, лучше изучит правила ЯП, а то получится как в этой теме. Отладчик работает не так как казалось бы должен
Отладчик работает так как должен и не его вина в том, что программа выполняется под управлением ОС, а не наоборот.

Цитата Сообщение от vladh Посмотреть сообщение
А вот в Pure Basic можно.
Там другие правила и метод организации программы, который отличается от того что в VB.
0
0 / 0 / 0
Регистрация: 04.04.2015
Сообщений: 37
20.05.2015, 15:00  [ТС]
Цитата Сообщение от locm Посмотреть сообщение
Нужно принимать правила языка и компилятора пусть даже не все нравится
Разумеется я должен выполнять все правила языка. Попробовал бы я их не выполнить и мне сразу же идут сообщения об ошибках.
Цитата Сообщение от locm Посмотреть сообщение
Вместо установки своих правил, лучше изучит правила ЯП,
Чем я усердно последнее время и занимаюсь. Другое дело, что нигде пока я явно не прочел о том, что присваивать значения переменным можно не в любом месте программы. Хорошо, что мне здесь на это указали.

Добавлено через 16 минут
Вот, например, я сейчас смотрю "Вводный курс в Visual Basic. Крепкий орешек". И там в разделе функции и операторы в подразделе "Операторы VB (F-G)" я вижу пример:

Visual Basic
1
2
3
4
5
6
7
Dim a, b As Integer
b = 5
a = 1
If a = 1 Then GoTo METKA
b = 10 ' Этот участок никогда не выполнится
METKA:
Debug.Print b ' Выведет цифру 5
Я беру этот пример и заношу его в новый проект. Пытаюсь его откомпилировать и разумеется мне выскакивает сообщение об ошибке. Как мне к этому относиться?
0
20.05.2015, 15:09

Не по теме:

Цитата Сообщение от vladh Посмотреть сообщение
Вот, например, я сейчас смотрю "Вводный курс в Visual Basic. Крепкий орешек"
Цитата Сообщение от vladh Посмотреть сообщение
If a = 1 Then GoTo METKA
Выбросите этот вводный курс. Ничему хорошему он не научит.

0
0 / 0 / 0
Регистрация: 04.04.2015
Сообщений: 37
20.05.2015, 15:16  [ТС]
Цитата Сообщение от locm Посмотреть сообщение
Выбросите этот вводный курс. Ничему хорошему он не научит.
Вот видите, как подчас тяжело новичку. Можно и в трех соснах заплутать. И как теперь выбрать из скачанного в сети, что можно изучать, а что опасно?

Добавлено через 2 минуты
Странно, а почему изменили название темы. Теперешнее её название не соответствует поставленной в начале проблеме.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
20.05.2015, 15:16
Помогаю со студенческими работами здесь

Invalid procedure call or argument
Доброго времени суток всем:) Есть такой скрипт: Sub AutoForm() ' -------------- ' Перенос ячеек ' -------------- ...

Invalid procedure or function reference
Ошибка в методе loading 45 строка, при скидывании названия процедуры. unit GUI; interface uses Graph, crt; type typeProc =...

Ошибка invalid procedure or function reference
program z_10; uses crt; procedure z10_1; const k=20; type mas=array of integer; procedure massiv_1(var a:mas;c:char); ...

Ошибка: invalid procedure call or argument
Sub Stage1() Open ThisWorkbook.Path & "/rezult.txt" For Input As #1 Input #1, s Close #1 i = 0 For i = 1 To 100 k1 =...

Вычисление выражения и ошибка: invalid outside procedure
DEF FNf(x, y) = Tan(((x * x) - (y * y)) / (x * x * y)) Sub odindva() Z = ((FNf(9, -1) + FNf(1, 0.1)) / 2) MsgBox ("z=" & Z) End...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
20
Ответ Создать тему
Новые блоги и статьи
http://iceja.net/ математические сервисы
iceja 20.01.2026
Обновила свой сайт http:/ / iceja. net/ , приделала Fast Fourier Transform экстраполяцию сигналов. Однако предсказывает далеко не каждый сигнал (см ограничения http:/ / iceja. net/ fourier/ docs ). Также. . .
http://iceja.net/ сервер решения полиномов
iceja 18.01.2026
Выкатила http:/ / iceja. net/ сервер решения полиномов (находит действительные корни полиномов методом Штурма). На сайте документация по API, но скажу прямо VPS слабенький и 200 000 полиномов. . .
Расчёт переходных процессов в цепи постоянного тока
igorrr37 16.01.2026
/ * Дана цепь постоянного тока с R, L, C, k(ключ), U, E, J. Программа составляет систему уравнений по 1 и 2 законам Кирхгофа, решает её и находит переходные токи и напряжения на элементах схемы. . . .
Восстановить юзерскрипты Greasemonkey из бэкапа браузера
damix 15.01.2026
Если восстановить из бэкапа профиль Firefox после переустановки винды, то список юзерскриптов в Greasemonkey будет пустым. Но восстановить их можно так. Для этого понадобится консольная утилита. . .
Сукцессия микоризы: основная теория в виде двух уравнений.
anaschu 11.01.2026
https:/ / rutube. ru/ video/ 7a537f578d808e67a3c6fd818a44a5c4/
WordPad для Windows 11
Jel 10.01.2026
WordPad для Windows 11 — это приложение, которое восстанавливает классический текстовый редактор WordPad в операционной системе Windows 11. После того как Microsoft исключила WordPad из. . .
Classic Notepad for Windows 11
Jel 10.01.2026
Old Classic Notepad for Windows 11 Приложение для Windows 11, позволяющее пользователям вернуть классическую версию текстового редактора «Блокнот» из Windows 10. Программа предоставляет более. . .
Почему дизайн решает?
Neotwalker 09.01.2026
В современном мире, где конкуренция за внимание потребителя достигла пика, дизайн становится мощным инструментом для успеха бренда. Это не просто красивый внешний вид продукта или сайта — это. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru