---

Hejsa

Jeg er ny i vb, og sidder og bikser med at få en funktion til at returnere
et simpelt objekt jeg selv har lavet. Men jeg kan ikke hitte ud af
syntaksen, jeg har søgt det meste af nettet men har intet fundet. Det jeg
vil er:
- Jeg vil kalde en funktion i en modelklasse f.eks. modelKlasse som
returnerer et dataobjekt.
Lige nu har jeg følgende i vb:

Min dataklasse indeholder følgende: og hedder f.eks. dataObjekt
Public m_strKommentar As String
Public m_nID As Integer
Public m_dDato As Date
Public m_dFakturaDato As Date
Public m_strKundeNavn As String

Modelklassen indeholder:
Public Function Hent() As dataObjekt
Set data = New dataObjekt
data.m_strKommentar = "Test"
Return data
End Function

Compileren giver mig: Expected: end of statement - efter return statement.
Hvad gør jeg galt?

MVH
Lasse Kjærsgaard

---

Lasse Kjærsgaard skrev:
> Public Function Hent() As dataObjekt
> Set data = New dataObjekt
> data.m_strKommentar = "Test"
> Return data
> End Function
>
> Compileren giver mig: Expected: end of statement - efter return statement.
> Hvad gør jeg galt?

Return bruges til at returnere fra et GoSub-kald!

Du skal i stedet bruge denne linie:
Set Hent = data

-------
Tomas

---

Lasse Kjærsgaard wrote:
> Hejsa
>
> Jeg er ny i vb, og sidder og bikser med at få en funktion til at returnere
> et simpelt objekt jeg selv har lavet. Men jeg kan ikke hitte ud af
> syntaksen, jeg har søgt det meste af nettet men har intet fundet. Det jeg
> vil er:
> - Jeg vil kalde en funktion i en modelklasse f.eks. modelKlasse som
> returnerer et dataobjekt.
> Lige nu har jeg følgende i vb:
>
> Min dataklasse indeholder følgende: og hedder f.eks. dataObjekt
> Public m_strKommentar As String
> Public m_nID As Integer
> Public m_dDato As Date
> Public m_dFakturaDato As Date
> Public m_strKundeNavn As String
>
> Modelklassen indeholder:
> Public Function Hent() As dataObjekt
> Set data = New dataObjekt
> data.m_strKommentar = "Test"
> Return data
> End Function
>
> Compileren giver mig: Expected: end of statement - efter return statement.
> Hvad gør jeg galt?
>
> MVH
> Lasse Kjærsgaard
>
>


Hej Lasse,

Du skal returnere værdien i funktionsnavnet. Altså:

Hent = data

/ Jan