Перевести код с C# в VB.NET с Windows Forms - Visual Basic .NET

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

Здравствуйте, помогите перевести код с c# в vb.net и чтобы программа работала не через консоль, а через форму

using System;
namespace ex4
{
    class Program
    {
        public static bool Prost(double n)
        {
            for (int i = 2; i <= (Math.Sqrt(n)); i++)
            {
                if ((n > 2) && (n % i == 0))
                {
                    return false;
                }
            }
            return true;
        }
        static void Main(string[] args)
        {
            Console.WriteLine("введите n");
            int n = Convert.ToInt32(Console.ReadLine());
            int k = 0;
            int i = n + 1;
            while (i <= 2 * n - 2)
            {
                if (Prost(i) && Prost(i + 2))
                {
                    if (k == 0)
                    {
                        Console.WriteLine("Простые числа с разностью 2 на интервале {0} - {1} есть: ", n + 1, 2 * n);
                        k = 1;
                    }
                    Console.WriteLine("{0} {1}", i, i + 2);
                }
                i++;
            }
            if (k == 0) Console.WriteLine("Простых чисел с разностью 2 на интервале {0} - {1} нет", n + 1, 2 * n);
            Console.ReadLine();
        }
    }
}

Решение задачи: «Перевести код с C# в VB.NET с Windows Forms»

textual
                            Листинг программы 
                        

                            Public Class Form1
 
    Function Prost(n As Double) As Boolean
        For i As Integer = 2 To (Math.Sqrt(n))
            If (n > 2) AndAlso (n Mod i = 0) Then
                Return False
            End If
        Next
        Return True
    End Function
 
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim n As Integer = Convert.ToInt32(InputBox("Введите число N:"))
        Dim k As Integer = 0
        Dim i As Integer = n + 1
        While i <= 2 * n - 2
            If Prost(i) AndAlso Prost(i + 2) Then
                If k = 0 Then
                    ListBox1.Items.Add(String.Format("Простые числа с разностью 2 на интервале {0} - {1} есть: ", n + 1, 2 * n))
                    k = 1
                End If
                ListBox1.Items.Add(i & " " & i + 2)
            End If
            i += 1
        End While
        If k = 0 Then
            MsgBox(String.Format("Простых чисел с разностью 2 на интервале {0} - {1} нет", n + 1, 2 * n))
        End If
    End Sub
End Class
                        