[Vb.net] =?iso-8859-1?Q?AW=3A_=5BVb=2Enet=5D_AW=3A_=5BVb=2Enet=5D_Re=3A_=5BVb=2E?= =?iso-8859-1?Q?net=5DFunktionsr=FCckgabewert_=28e=29?=

Fri, 12 Sep 2003 07:41:03 -0700 

hallo,

hab die l�sung meines problems gefunden. eine tolle sache dieses .NET!
hier ein beispiel:



   Structure OpNReturn
       Dim Nr As Short
       Dim Datum As String
   End Structure


    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As 
System.EventArgs) Handles Button1.Click
        Dim retvalue As OpNReturn
        retvalue = test_func(2, "ossi")
    End Sub

    Function test_func(ByVal Nr1 As Short, ByVal Datum1 As String) As OpNReturn
        With test_func
            .Nr = Nr1 * 2
            .Datum = Datum1 & "OK"
        End With
    End Function

das war genau das was ich brauchte. ;)

gr��e

Oskar

_______________________________________________
Vb.net mailing list
[EMAIL PROTECTED]
http://www.glengamoi.com/mailman/listinfo/vb.net

Odpovedet emailem