Obtener directorio actual archivo ejecutable windows service

Dim path As String = System.IO.Path.GetDirectoryName(Application.ExecutablePath)
Path.GetDirectoryName(System.Reflection.Assembly.GetEntryAssembly().Location