请教大家一个VB的问题
这是一道在两次考试中都出现过的题:在考生文件夹下有一个工程文件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