江苏省计算机等级二级考试VB+素数练习

【题目】编写程序,找出1000以内既是因子之和又是素数的数。Option ExplicitPrivate Sub Command1_Click()Dim i As IntegerFor i = 2 T