关于vfp解决方案

关于vfp
谁能告诉我从1到100的中的质数相加之和的程序！

[解决办法]
try:
aa=0
FOR i=2 TO 100
d=0
FOR j=2 TO i
IF i/j=INT(i/j) AND i<>j
d=1
EXIT 
ENDIF 
NEXT
IF d=1
aa=aa+i
endif 
NEXT 
?aa