IIf(InStrRev([name],".")>0,Mid([name],InStrRev([name],".")+1),"")
Assumes a single field labeled [name] contains a filename without the leading path. Should a file not have an extension, or a period contained within the resulting value will be blank.