Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > VB6 > вопрос по синтаксису функция возвращает тип запись

Автор: msdmsd 27.12.2010, 12:27

Подскажите как исправить.
код такой:

файл Module1:

Код


Public Type T
    i As Integer
    s As String
End Type

файл Class1:

Код


Public Function f() As T
    f.i = 5
    f.s = "s"
End Function

файл Form1:

Код


Private Sub Form_Load()
    Dim c As New Class1
    Dim v As T
    
    v = c.f
End Sub

VB выдает диагностику: на строке в Class1 Public Function f() As T - Compile error: Only public user defined types...

но ведь тип T определен как public в public модуле. В чем тут дело?

Автор: Dexx 27.12.2010, 14:59

Цитата(msdmsd @ 27.12.2010, 12:27

)

файл Class1:

Код


Public Function f() As T
    f.i = 5
    f.s = "s"
End Function

вот так

Код


Friend Function f() As T
    f.i = 5
    f.s = "s"
End Function

Автор: Dexx 29.12.2010, 05:33