在名为Form1的窗体上建立一个文本框(名称为Text1，MultiLine属性为True，ScrollBars属性为2)和两个命令按钮(名称分别为Cmd1和Cmd2，标题分别为Read和Save)，如下图所示。

要求程序运行后，如果单击Read按钮，则读入in18.txt文件中的100个整数，放入一个数组中(数组下界为1)；如果单击Save按钮，则挑出100。个整数中的所有奇数，在文本框Text1中显示出来，并把所有奇数之和存入考生文件夹中的文件out18.txt中(在考生文件夹下有标准模块model.has，其中putdata过程可以把一个整型数存入out18.txt文件，考生可以把该模块文件添加到自己的丁程中)。注意：程序中对文件的操作统一使用相对路径；文件必须存放在考生文件夹中，窗体文件名为sjt5.frm，工程文件名为sjt5.vbp；结果存入out18.txt文件，否则没有成绩。

患者男，50岁。下颌可摘局部义齿修复后初戴3天，摘戴义齿时疼痛明显，咀嚼食物有痛感。口内检查：活动义齿修复，基牙稳固，义齿固位性及稳定性好，咬合接触良好，右下颌舌骨嵴隆突处黏膜有溃疡点。造成摘戴义齿疼痛的原因是（）

A.咬合压力过大

B.卡环固位过紧

C.基托进入软组织倒凹内

D.基托与黏膜贴合过紧

E.摘戴义齿用力过大