Visual Basic - Combo Box (datos no repetidos)

Me gustaría saber como hacer para que los datos del combo box no salgan repetidos.

Gracias

Este código evita que existan repetidos en el combo:

Private Sub Form_Load()
Dim nombres(4) As String
nombres(0) = "Pepe"
nombres(1) = "Juan"
nombres(2) = "Juan"
nombres(3) = "Pepe"
nombres(4) = "Pepe"
Dim i As Integer
Dim j As Integer
For i = 0 To 4
Combo1.AddItem nombres(i)
Next i
For i = 0 To Combo1.ListCount - 1
For j = 1 To Combo1.ListCount - 1
If Combo1.List(i) = Combo1.List(j) Then
Combo1.RemoveItem i
End If
Next j
Next i
End Sub

Mira si van por ahí los tiros. Un saludo