Ich glaub ich steh auf'em Schlauch...

Ich habe einen Teil des Scriptes in eine Funktion kopiert.
Dieser habe ich den Parameter "DB" übergeben.
Jetzt bekomme ich einen: Typ-Mismatch on DB

Wenn ich in der Funktion DB neu dekl. und setze ist es OK.
Aber das ist ja nicht Sinn der Sache.
Sub Initialize
Dim s as New NotesSession
Dim db as NotesDatabase
Set db = s.CurrentDatabase
Call Test(db)
end sub
Function Test(db)
...
Set Doc = New NotesDocument(DB) <--- hier
...
End Function
Hat jemand eine Idee woran das liegen kann?
Danke und Gruss
Andreas