Visual Basic - Seleccionar

Hola a todos, miren con el siguiente codigo cargo las fuentes a un listbox:

Dim i As Integer

For i=0 to Screen.FontCount -1
List1.AddItem Screen.Fonts(i)
Next i

Me funciona perfectamente, pero necesito que se seleccione por default la fuente arial, es decir como le hago para que en el evento load el item del listbox que dice "Arial" ya este seleccionado, gracias!!.

Creo que sería algo asi

Dim i As Integer,N as integer

For i=0 to Screen.FontCount -1
List1.AddItem Screen.Fonts(i)
if Screen.Fonts(i)="Arial" then N=i
Next i
List1.ListIndex=N

Simplemente despues de cargar el List

List1.Text = "Arial"

Suerte!