Amigos...Bien¿Cómo borrar un archivo con Dirección Relativa?

Buenas noches amigos...

Bien, envío esta pregunta por el hecho de que tengo un problema al eliminar archivos con direcciones relativas...

Tengo Windows 7, y supongamos que deseo eliminar un archivo que es el siguiente

C:\Users\Viejito\AppData\Roaming\Foxit Software\RMS\FXRMS_Log.txt

En mi maquina va a funcionar perfectamente, ya que mi nombre de usuario es "Viejito", pero supongamos que desee hacer un programa que funcione en cualquier maquina con CUALQUIER nombre de usuario, he probado y ejecutando desde windows 7 %USERPROFILE% abre el nombre de usuario y si pongo la ruta completa me abre el archivo, pero yo necesito hacer un programa en Visual basic y que al hacer click en un botón de comando me lo elimine...

He probado con muuuuuuucho código, y este es el ultimo que estoy probando, demás esta decir que todavía no encontré la solución...

Imports System.IO

Public Class Form1
Private Sub cmdBorrar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdBorrar.Click
Dim archivo As String
archivo = Environ(%USERPROFILE%\AppData\Roaming\Foxit Software\RMS\FXRMS_Log.txt))
File.Delete(archivo)
End Sub

End Class

Soy nuevo en Visual asique perdón si hay incoherencias ne el código...

Espero que me puedan ayudar, desde ya muchas gracias por su ayuda...

Uso Visual basic.NET 2005

Windows7