L'unico modo è ricorrere ad uno stratagemma:

inserisci uno shape, che abbia come borderwidth = 2 (minimo)e come bordercolor il colore che desideri te.

Nell'evento Load del form inserisci questo:

With Shape1
.Width = List1.Width + 20
.Height = List1.Height + 30
.Left = List1.Left
.Top = List1.Top
End With

Prova a vedere se il risultato ti soddisfa..

Ciao