VB 找出50~500之间所有的素数，求解我怎么错了，为啥不显示啊

VB 找出50~500之间所有的素数，求解我怎么错了，为啥不显示啊

t = True这一句放到For i = 50 To 100后面，否则只要出现一个素数，t=false，后面全是false了

病情分析：
你好，从你上述的情况来看，你的胎儿稍微有点偏小，胎盘也增厚。
指导意见：
孕晚期建议平时多加强营养，多注意休息，清淡温热饮食，多吃水果、蔬菜，避免过于劳累，定期做好孕检，及时补充钙片，胎儿体重=胎儿双顶径X81.29-4409G=1.85KG,祝健康。
病情分析：
你好，根据你的叙述，双顶径77相当于怀孕31周，头围268相当于怀孕29周，腹围269相当于怀孕30周加，股骨长56相当于怀孕29周，胎心率正常在120-160次/分钟。
指导意见：
你的胎儿约为怀孕30周减，胎儿与实际怀孕的周数相比偏小，胎心和胎盘的厚度在正常范围内，胎儿的体重约1700g，你不用担心胎儿的体重因为怀孕的最后一个月才是胎儿体重增长的最快的时候，建议你一个半月后再复查胎儿的变化。
病情分析：
您好，你这个胎儿发育偏小，不到32周，综合考虑的话，大约只有30周的样子
指导意见：
这个胎儿大小大约是在1700~1800克之间，误差上下10%的样子，你这个需要在饮食上多吃一些补充营养的食物或者适当吃一些钙片