Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / подскажите / 5 сообщений из 5, страница 1 из 1
02.04.2004, 16:36
    #32467425
Intel
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
подскажите
подскажите что тута не правильно?
Private Sub Form_Load()
Form1.Height = 7635
Form1.Width = 6645
Dim sDir As String, sTemp As String * 256
nSize = GetWindowsDirectory(sTemp, 255): pWindows = Left(sTemp, nSize)
a = pWindows & "\ hotkey.yt"
b = PathFileExists(a)
If b = "0" Then GoTo m1
If b = "1" Then GoTo m2

.........
останавливается на nSize и говорит что мол "Variable not defined"=====чё за фигня?
Заранее спасибо
...
Рейтинг: 0 / 0
02.04.2004, 17:32
    #32467545
Лёшик
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
подскажите
возможно переменную неправильно малость указал
...
Рейтинг: 0 / 0
02.04.2004, 17:39
    #32467561
Intel
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
подскажите
Как это "не правильно указал"
у меня что-то вообще как-то стало в КАЖДОМ проекте глюки с переменными, то посоветуем
...
Рейтинг: 0 / 0
02.04.2004, 18:35
    #32467670
Andy154
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
подскажите
Поправьте, если ошибаюсь, но что-то объявления переменной nSize
вообще не видно...
...
Рейтинг: 0 / 0
02.04.2004, 20:43
    #32467780
Magnus23
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
подскажите
Именно тутсобака и порылась :)

Чтобы не было подобных казусов идем в Tools>options>Editor и ставим галку Require variable declaration.
после этого в каждом модуле будет добавлятся Option Explicit, что должно быть включено всегда.
В существующих модулях добавить руками.

Magnus
...
Рейтинг: 0 / 0
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / подскажите / 5 сообщений из 5, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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