VB 6 Проблема с объявлением API функции

Кирилл

Команда форума
Администратор
Ассоциация VN
Сообщения
14,054
Реакции
5,745
Пытаюсь объявить такое:
VB.NET / VBA:
Declare Function OemToChar Lib "user32" Alias "OemToCharA" (ByVal lpszSrc As String, ByVal lpszDst As String) As Long

Declare Function CharToOem Lib "user32" Alias "CharToOemA" (ByVal lpszSrc As String, ByVal lpszDst As String) As Long

А получаю фигу:
upload_2015-9-20_10-36-6.png


Выношу за комменты в general,тогда получаю это:

upload_2015-9-20_11-5-50.png
 
Прототип Declare Function без явного указания области видимости по-умолчанию считается Public.
В модуле формы запрещено объявлять любые виды объектов с областью видимости Public. (только в обычном модуле можно)
Тебе нужно явно указать:

Private Declare Function

А получаю фигу:
Правильно пишет. Функции и процедуры должны идти после объявления глобальных переменных, типов, прототипов ...
 
Назад
Сверху Снизу