if ji1 then print i 对于j的内循环来说结束循环有两种情况，1，是发现i不是素数2，循环结束后，i 是素数这句就是用来判定，内循环是第一种情况结束也就 i 不是素数，还是第二种情况结束的，这时；Private Sub Form_ClickDim i%， j%， f As Boolean For i = 2 To 100 For j = 2 To SqriIf i Mod j = 0 Then f = True End If Next j If Not f Then Print i Else f = False End If Next。
For m = 2 To 100 ’1不是素数 For i = 2 To sqrm #39验证到根号m即可，减少运算量 If m Mod i = 0 Then Flag=1 Exit For End if Next i If Flag = 0 Then Print m End if Flag = 0；n = n + 1 If n Mod 5 = 0 Then Print End If Next i End Sub 追问 定义PRINT 回答 你想问什么问题，还有你的vb是什么版本的 print在窗体打印输出 追问 VB2008 就是你现在写的 程序。
首先，你得做一个素数判断的函数，例如可以输入下面的代码当Num为素数时，输出True，反之则输出false，Num取值范围为2及以上的整数Function IsPrmNum As Long As Boolean For a = 2 To IntSqrNum If Num；代码Private Sub Command1_ClickMeCls Dim yn As Boolean #39为真表示是素数 Dim i As Integer， j As Integer， x As Integer For i = 1 To 100 yn = True #39为真表示是素数，否则就不是，先默认为是素。
vb求素数的算法
1输出1100以内的素数2同样，也是输出1100以内的素数，这个构造一个数组，将其所有元素初始化为1，表示素数，这时取x从2开始，到100以内做循环若x为素数，即primex=0，使得每个i*x位置元素置0primei。
为素数的特性s = s + n #39s相当于累加器，将满足k=2条件的n加起来End IfNext n #39结束for循环Print s #39输出sEnd Sub以上是我的一种枚举的方法，还有多种解法，希望可以帮助你要理解这段代码并不难。
Dim i As IntegerDim j As IntegerDim n As Integern = 0For i = 100 To 200 For j = 2 To i 1 If i Mod j = 0 Then Exit For Next j If j i 1 Then Print i， n =。
Option ExplicitPrivate Sub Command1_Click Dim i As Integer， ImmaculacyPrimeNumber As Integer Dim InversionNumber， Counter As Integer For i = 100 To 900 ImmaculacyPrimeNumber = 100 * i Mod 10。
素数在vb中的表达式
1、For i = 2 To Sqrn #392~该数开放加快速度 #39 \ 函 If n Mod i = 0 Then p = 1 #39返回0为素数，1为合数 #39 数 Next i #39 #39 End Function。
2、这完全是根据数学中关于素数的概念，进行代码编写利用计算机的高速度解决烦琐的计算素数只能被自身和1整除的自然数，叫做素数，1不是素数，2是最小的素数也就是说，要判断一个自然数n，是否素数，最基本的思路就。
3、Private Sub Form_ClickDim i As Integer， j As Integer， x As Integer For i = 1 To 100 x = 0 ‘X用作标志位，即表示X=0表示 i 是素数，1则不是 For j = 2 To i 1 If i Mod j = 0。
4、Private Sub Command1_ClickDim k As Integer， i As Integer Dim m k = 0 For m = 999 To 100 Step 1 i = 2 Do While m Mod i lt 0 #39判断是否是素数 i = i + 1 Loop If i = m Then。
5、k = k + 1 If k Mod 5 = 0 Then Print End If End If Next i 这个程序我以上机运行过，中间我加入了一段程序quotKquot，这段程序的作用是在输出时每5个一行输出，这样你就可以在界面上看到200以内的全部素数了。
6、思路定义一个判断素数函数，接着依次从2到100遍历判断，如果是则输出，每输出是10次输出换行#include ltstdiohint ispint n判断一个数是否是素数 int i fori=2iltni++ ifn%i==0。
