【正确答案】正确答案：【操作步骤】 步骤1：打开本题工程文件。 步骤2：分析并在适当位置编：写程序代码。 参考答案 Dim a As Integer Dim b As Integer a＝0 b＝arr(1) For i＝i To 40'确定素数个数 If prime(arr(i))Then'判断是否为素数 a＝a＋1'素数个数累加 Label3．Captioh＝a'在标签中显示 Next For i＝1 To 40'查找最小素数 If prime(arr(j))And arr(i)＜＝b Then'比较素数大小 b＝arr(i)'将较小素数赋给b Label4．Caption＝b'在标签中显示 Next 步骤3：按照题同要求调试并运行程序，效果如图3．16所示。