Перевести программу из С++ на Visual Basic. Найти на заданном диапазоне число, имеющее наибольшее количество делителей

#include <stdafx.h>
#include <stdlib.h>
#include <iostream>
 
using namespace std;
 
int main()
{
    //включение русской кодировки
    setlocale(LC_ALL, "rus");
 
    long n1, n2;
    cout << "Найти на заданном диапазоне натуральное число, имеющее наибольшее количество делителей.\n"
        "Введите начало диапазона: ";
    cin >> n1;
    cout << "Введите конец диапазона: ";
    cin >> n2;
 
    while(1) {
        // проверим правильность задания интервала
        if( n1 <= 0 || n2 <= 0 ) {   // поиск натурального числа
            cout << "Границы должны быть натуральными числами.\n";
            break;
        }
 
        if( n2 <n1 ) {
            cout << "Границы заданы в обратном порядке. Обмениваем.\n";
            long t = n1;
            n1 = n2;
            n2 = t;
        }
 
        long num;       // число с максимальным кол-вом делителей
        int nDivMax = 0;               // максимальное кол-во делителей
        long n = n1;               // текущее проверяемое число
 
        if( n1 == 1 ) {                // обрабатываем особый случай, чтобы исключить проверку в цикле
            nDivMax = 1;
            num = 1;
            n = n1 + 1;
        }
        for ( ; n <= n2; ++n ) {
            int nDiv = 2;   // кол-во делителей проверяемого числа
            // каждое число делится на 1 и само себя (особый случай (1) обработан перед циклом)
 
            for ( long div = n/2; div > 1; --div )
                if( n % div == 0 ) ++nDiv;
 
            if ( nDiv > nDivMax ) {
                nDivMax = nDiv;
                num = n;
            }
        }
 
        cout << "На диапазоне [" << n1 << ", " << n2 << "] наибольшее количество делителей (" << nDivMax << ") у числа " << num << endl;
        break;
    }
    system( "pause" );
    return 0;
}