Может ли модуль класса выдать переменную пользовательского типа?
Программа написана на Visual Basic 6.0
Во время написания программы возникла потребность из процедуры получать переменные пользовательского типа из модулей классса. Дойдя до этого места VB отказался выполнять команды программы.
Мои попытки оказались безуспешны. Подскажите, пожалуйста, можно ли это сделать? И если можно, то как?
С уважением.
Во время написания программы возникла потребность из процедуры получать переменные пользовательского типа из модулей классса. Дойдя до этого места VB отказался выполнять команды программы.
Мои попытки оказались безуспешны. Подскажите, пожалуйста, можно ли это сделать? И если можно, то как?
С уважением.
Извини, а что такое "переменные пользовательского типа" ?
Что значит "отказался выполнять команды программы"?
Вообще то VB генерит ошибку, у которой есть код и description. Или же прога зависает на каком-то операторе.
Вообще то VB генерит ошибку, у которой есть код и description. Или же прога зависает на каком-то операторе.
[QUOTE=Bard]Извини, а что такое "переменные пользовательского типа" ?[/QUOTE]
'В качестве ответа - пример (частично взят из программы)
'Тип, созданный пользователем
Public Type DataOne 'один источник данных
NameData As String 'наименование источника данных
NameIsp As String 'наименования для внутреннего использования
RS As Integer 'Регистр состояния
FistIstDan As Integer '0/N - вызов первичный/втричный
IdnIst As Integer 'идентификатор источника
End Type
dim Demo as DataOne 'переменная пользовательского типа
'В качестве ответа - пример (частично взят из программы)
'Тип, созданный пользователем
Public Type DataOne 'один источник данных
NameData As String 'наименование источника данных
NameIsp As String 'наименования для внутреннего использования
RS As Integer 'Регистр состояния
FistIstDan As Integer '0/N - вызов первичный/втричный
IdnIst As Integer 'идентификатор источника
End Type
dim Demo as DataOne 'переменная пользовательского типа
[QUOTE=Tiraspolsky]Что значит "отказался выполнять команды программы"?
Вообще то VB генерит ошибку, у которой есть код и description. Или же прога зависает на каком-то операторе.[/QUOTE]
При попытке выполнить команду извлечения переменной из модуля классса, VB сообщил, "из модуля класса передаются переменные, имеюшие стандартный тип. Для передачи данных, имеющих тип, созданных пользователем, необходимо описать их в ...". И далее как вопрос можно решить.
Путь покался сложным, поступил проще: убрал модули класса - и получил доступ к переменной.
С уважением ко всем ответившим и заглянувшим сюда
Вообще то VB генерит ошибку, у которой есть код и description. Или же прога зависает на каком-то операторе.[/QUOTE]
При попытке выполнить команду извлечения переменной из модуля классса, VB сообщил, "из модуля класса передаются переменные, имеюшие стандартный тип. Для передачи данных, имеющих тип, созданных пользователем, необходимо описать их в ...". И далее как вопрос можно решить.
Путь покался сложным, поступил проще: убрал модули класса - и получил доступ к переменной.
С уважением ко всем ответившим и заглянувшим сюда
[QUOTE=patq] Путь покался сложным, поступил проще: убрал модули класса - и получил доступ к переменной.[/QUOTE]
VB не умеет возвращать из классов описание пользовательского типа, посему и переменную не может вернуть. о чем, собственно, в мессаге и говорит.
НО! он может возвращать экземпляры ЛЮБЫХ классов. т.о. тип DataOne превращаем в класс СDataOne, а переменную объявляем как Public Demo as New CDataOne
VB не умеет возвращать из классов описание пользовательского типа, посему и переменную не может вернуть. о чем, собственно, в мессаге и говорит.
НО! он может возвращать экземпляры ЛЮБЫХ классов. т.о. тип DataOne превращаем в класс СDataOne, а переменную объявляем как Public Demo as New CDataOne