帮忙做一道Vb的题目

建立一个text的文本框和一个cmd的命令按钮，单击命令按钮后，编写一个程序，判断1到100的自然数中的素数，然后再将素数的和放入一个text的文本框中，

sub cmd_click()

text=""

for i = 1 to 100

for j = 2 to i-1

if i mod j=0 then exit for

next j

if j=i then text=text & i & vbcrlf

next i

end sub