Оператор безусловного перехода - VB

Формулировка задачи:

Добрый вечер сижу мучаюсь с програмкой ПОМОГИТЕ пожалуйста кто может суть программы такова

Составить программу для проверки утверждения: «результатами вычислений по формуле х2 + х + 17 при 0 < х <15 являются простые числа». все результаты вывести на экран.

вот эта программа написанная на Паскале кто может переделайте пожалуйста под VBA

uses crt;
var
s,x,d:Integer;
Label 1;
Begin
ClrScr;
For x:=0 to 15 do
Begin
s:=x*x+x+17;
For d:=2 to x-1 do
If x=int(x/d) then
begin
Writeln('число не простое');
Goto 1;
End;
Writeln('Простые числа-',s);
1: End;
ReadKey;
end.

Заранее благодарен!!!

Решение задачи: «Оператор безусловного перехода»

textual
                            Листинг программы 
                        
                            For i = 1 To 15
If i > 1 And i < 15 Then