Try creating a variable to hold the DLookup value.
ie
Dim EmailStr As String
EmailStr = DLookUp("Email","Addresses","Street = Forms!Input!Street")
DoCmd.SendObject acReport, "letter", "SnapshotFormat(*.snp)", EmailStr, "", "Living Material Cards ", "", True,