Visual Basic - Como poner fuentes de letra en Vb

Me gustaría añadir tipos de letra a los que vienen por defecto en Windows, me he bajado fuentes pero no se como activarlos en windows para que se carge en Vb.

Tienes dos opciones:

1. Desde el panel de control abres la carpeta de fuentes; ahí, en el menú Archivo, tienes una opción para instalar una nueva fuente.

2. Si lo que quieres es que tu programa sea capaz de trabajar con fuentes nuevas de forma automática, tienes que utilizar una función del API, la función AddFontResource. Para ello añade las siguientes declaraciones:

Declare Function AddFontResource Lib "gdi32" Alias "AddFontResourceA" (ByVal lpFileName As String) As Long
Declare Function RemoveFontResource Lib "gdi32" Alias "RemoveFontResourceA" (ByVal lpFileName As String) As Long

Para añadir una nueva fuente:

Dim result As Long

result = AddFontResource("c:\ruta\fuente.ttf")

Si quieres después eliminarla, entonces utilizas RemoveFontResource:

result = RemoveFontResource("c:\ruta\fuente.ttf")