...name rather than middle ititial (something I didn't realize in my first post) so the field could be: "Mary", "Mary B", or "Mary Beth". The query below converted them all to "Mary"
fname: IIf([TableName.fname] Like "* *",Left([Tablename.fname],InStr([Tablename.fname]," ")-1),[Tablename.fname])