这是一道在两次考试中都出现过的题：
　在考生文件夹下有一个工程文件sjt5.vbp，其窗体上有一个文本框，名称 为Text1；还有两个命令按钮，名称分别为C1、C2，标题分别为"计算"、 "存盘"，如图所示。并有一个函数过程 isprime可以在程序中直接调用， 其功能是判断参数 a 是否为素数，如果是素数，则返回 True，否则返回 False。 请编写适当的事件过程，使得在运行时，单击"计算"按钮，则找出小于 18000的最大的素数，并显示在Text1中；单击"存盘"按钮，则把 Text1 中的计算结果存入考生文件夹下的out5.txt文件中
　　我是这样写的，为什么不能用啊？请大家帮帮忙
Prvaite sub c1-click()
dim i as long
dim MaxPr as long
for i = 18000 to 0 '找最大的素数
if isprime(i) then'找到，返回值并退出循环
MaxPr = i
exit for
next i
Text1.Text=MaxPr'赋值显示
end sub
Prvaite sub c2-click()
dim fr as new io.filewriter("out5.txt",file.create)
fr.write(Text1.Text)'把结果写到文本文件
end sub

谢谢楼上的帮助，我是菜鸟，请问一下什么是两分法？