There is an API function (see Platform SDK)

The function is:

GetUserName

Also there is an example provided.

I am not sure about MS Access but using VB but you shoud have no problems using it from VB.