题目内容：
(1)在窗体上绘制一个名称为Text1的文本框，再绘制一个名称为Cmd1、标题为“计算”的命令按钮，如图24-3所示。要求程序运行后，单击命令按钮，将计算100～200所有素数之和，并在文本框中显示结果，同时把结果存人文件out．txt中(在考生文件夹中有标准模块mode．bas，其中的PutData过程可以把结果存入文件，而isprime函数可以判断整数x是否为素数，如果是素数，则函数返回True，否则返回False，考生可以把该模块文件添加到自己的工程中)。
注意：保存时必须存放在考生文件夹下，窗体文件名为sj3．frm，工程文件名为sj3．vbp，结果存入result．txt文件，否则没有成绩。
(2)新建一个工程文件，在窗体Form1上绘制一个列表框。名称为List1，并输入3个表项“6”、“21”、“43”；绘制一个文本框，名称为Text1。请编写适当的事件过程，使得程序运行时，在列表框内选中一个数字并双击，则计算出1500以内能被该数整除的所有数之和，并在Text1中显示出来。
注意：考生完成程序编写后，将工程文件与窗体文件保存到考生文件夹下，文件名分别为sj4．vbp与sj4．frm。程序运行时的窗体界面如图24-4所示。|
参考答案：
答案解析：