Pegar Usuário Logado não que executa

Estou tentando pegar o nome do usuário logado na máquina.

Fiz dois usuários:

RAFAEL ( Administrador ) e TESTE ( Comum )

Ao executar aplicação no usuário teste como administrador ele pega o usuário que executou e não o TESTE ( logado ).

Ex:

Imports System.Security

Imports System.Security.Principal.WindowsIdentity

usuariologado = Environment.UserName

Dim pastaTempLocal As String = usuariologado + "\AppData\Local\Temp"

No caso de estar logado como teste seria:

TESTE\AppData\Local\Temp

Porem como eu executo como administrador a aplicação ele pega quem executou no caso:

RAFAEL\AppData\Local\Temp

Tem como pegar o nome do usuário logado na máquina mesmo que eu execute como administrador a aplicação??