编写一个计算最小素数的程序。要求由程序的输入一个整数，然后由程序输出大于该整数的最小素数。

用VB可以吗？
Dim flag As Integer
Dim s As Integer
Private Sub Form_Click()
x = Val(InputBox("Enter a Integer"))
s = x
Do
x = x + 1
Call tt(x)
Loop While flag < 1
End Sub
Private Sub tt(ByVal var As Integer)
flag = 0
For i = 2 To Int(Sqr(var + 1))
If var Mod i = 0 Then
flag = flag + 1
End If
Next i
If flag = 0 Then
Print "比"; s; "大的最小素数是"; var
flag = 1
Else: flag = 0
End If
End Sub
无控件，单击输入一个数字，即可求出你要求的数字。

一个数，如果只有1和它本身两个因数，这样的数叫做质数

就是说要做循环求模```循环过程中模为0的话```就退出``在原来输入的数上加1
再归递（调用循环求模的方法）``直到求出质数
思路大概是这样``其他的就靠你自己了``

package com.cyber.lang;

import java.util.Scanner;

public class TestPrime {
public static void main(String[] args) {
Scanner sc = new Scanner(System.in);
System.out.println("输入一个整数：");
int num = sc.nextInt();
while(true){