Aktuel måned +1

Hej Eksperter
På en form har jeg tekstboks, når jeg klikker på en knap køres denne kode:

txtMdr = Format(Date, "mmmm")

Nu vises så oktober i tekstboksen, så dette virker fint,men jeg ønsker at den skal vise næste måned altså november i tekstboksen, det vigtigt at måned vises med sit fulde navn,og ikke som et tal feks. 11. Jeg har forsøgt at skrive:

txtMdr = Format(Date, "mmmm")+ 1 ,men det virker jo ikke da jeg ikke benytter talværdien for måned, nogen ideer :o)

Hilsen Anders.