Pues copiando de tu CODE, haz un contador antes de preguntar, algo asi:
Código vb:
Ver original'PRIMERO CUENTAS LAS LINEAS QUE TIENES SELECCIONADAS
Dim CONT as Integer
For contador = Me.LVWproveedores.ListItems.Count To 1 Step -1
If Me.LVWproveedores.ListItems(contador).Selected = True Then CONT=CONT+1
Next contador
'DESPUES HACES LAS PREGUNTAS
If CONT>1 then
multiopcion = MsgBox("¿Desea Eliminar estos " & CONT & " Proveedores?", vbExclamation + vbYesNo, "Advertencia")
Else
multiopcion = MsgBox("¿Desea Eliminar el Proveedor Seleccionado?", vbExclamation + vbYesNo, "Advertencia")
End if
If multiopcion = vbYes Then
...
...
...
OJO: No probé el CODE, pero debe funcionar bien