利用VB编程计算100之内所有质数和。

要说明步骤、谢谢谢谢。

追问：来自手机问问就是说我如果用就把所有的mn替换掉就可以了对么？这是个循环么？

答案：我给你个程序，可以求出任意正整数M到正整数N之间的所有质数。（N-M>50）
先创建两个文本框，一个命令按钮，一个图片框，代码如下：
Private Sub Command1_Click()
Dim m, n, i, s, t As Integer
m = Val(Text1)
n = Val(Text2)
For i = m To n
s = 1
Do
s = s + 1
Loop While s <= Int(i / 2) And i Mod s <> 0
If s > Int(i / 2) Then
Picture1.Print i;
t = t + 1
If t Mod 5 = 0 Then Picture1.Print
End If
Next i
End Sub

Private Sub Form_Load()
Text1 = ""
Text2 = ""
Picture1.Width = 3100
Picture1.Height = 3000
End Sub

上一个：关于VB编程的列表框练习的问题。
下一个：VB 编程代码解释！麻烦详细点哦。