用VB语言找出大于2345的最小的质数

来源:学生作业帮助网 编辑:六六作业网 时间:2024/05/05 17:23:50
用VB语言找出大于2345的最小的质数用VB语言找出大于2345的最小的质数用VB语言找出大于2345的最小的质数PrivateSubCommand1_Click()i=2344Doi=i+1Forj

用VB语言找出大于2345的最小的质数
用VB语言找出大于2345的最小的质数

用VB语言找出大于2345的最小的质数
Private Sub Command1_Click()
i = 2344
Do
i = i + 1
For j = 2 To i - 1
If i Mod j = 0 Then Exit For
Next
Loop Until i = j
Print i
End Sub