实现案例
使用穷举法求素数
1、明确一个范围，在什么什么范围范围的素数？手工输入一个范围
2、符合大于1，且只能被1和自己整除的整数
穷举法
穷举法也称为枚举法。
特点：
1、一般都是确定一个穷举的范围
2、每个可能的值去判断是否符合我们需要的条件
素数
质数（prime number）又称素数，有无限个。
质数定义为在大于1的自然数中，除了1和它本身以外不再有其他因数。
换句话：质数大于1的只能被1和它自己本身整除的整数
逻辑思路
1、在一个范围内先取一个数
2、将取到的数，对这个数内，从大于1的整数开始到这个数本身，依次穷举
3、把符合条件的拿下（大于等于2且小于这个数本身，这中间无法被分解的数），如果能被这个范围内的数整除（余数为0），那么它就不是素数
课堂总结
1、掌握什么是素数？
2、掌握穷举法的特点
3、学会优化我们的算法
源代码
Dim n As Long
n = Val(Text1.Text)
Dim i%, j%
For i = 2 To n Step 1 '穷举所有的数
Dim flag As Boolean
flag = True '默认为是素数
For j = 2 To i - 1 Step 1 '对每个数进行穷举判断
If i Mod j = 0 Then
flag = False '不是素数
Exit For
End If
Next j
If flag Then Text2.Text =Text2.Text & i & ","
Next i
