在考生文件夹下有一个工程文件sjt5.vbp，窗体上有2个标题分别是"读数据"和"查找质数"的命令按钮。请画1个名称为Text1、初始值为空的文本框，该文本框允许显示多行内容，且有垂直滚动条，如图所示...

参考解析: 【解题思路】首先读取文件中的内容保存到数组中，再循环数组中的数据并判断数据是否是质数，如果是质数再写到文本框。其中质数又称素数，有无限个。一个大于1的自然数，如果除了1和它自身外，不能被其他自然数整除（除0以外）的数称之为质数（素数）
【操作步骤】
步骤1：打开本题工程文件，在窗体中添加一个文件框控件，并按表在属性窗口中设置相应属性。
控件 文本框
属性 Text MultiLine ScrollBars
设置值 空值 true 2
步骤2：打开代码编辑窗口，在指定位置编写程序代码。
参考答案（阴影部分是需考生填入的内容）
Function prime(p As Integer) As Boolean
     Dim i As Integer
     For i = 2 To p \ 2
        If p Mod i = 0 Then
             prime = False
             Exit For
        End If
      Next i
      If i > p \ 2 Then
        prime = True
      End If   '以上程序段用于判断某数是否为质数
End Function
步骤3：调试并运行程序，关闭程序后按题目要求存盘。