Решить задачу в visual basic 6.0

Имеется два массива N и M каждый из которых содержит десять целых чисел.Необходимо отсортировать массив М по убыванию так,чтобы вслед за перестановкой i элемента массива М переставлялся i элемент массива N
M={365,156,862,485,156,485,365,987,416,365}
N={36,81,11,75,66,23,35,16,41,4}