Use the inStr() function to locate the first asterisk. Then use the Mid() function to grab everything to the left of the asterisk.

Mid({FIELD}, 1, inStr({FIELD}, "*")-1)