private type eins
    eins as string
end type
 
private type zwei
   zwei as string
end type
 
private sub test
    auswertung eins
    auswertung zwei
end sub
 
private sub auswertung(byref stru as type)
 
    ' so hier muss die Struktur (stru) übergeben werden können.
 
    ' und ich muss sie ansprechen und ggf. bearbeiten können
 
end sub