考生文件夹下有工程文件sjt5．vbp。考生文件夹下in5．txt文件中保存有全校300名同学对某位教师教学质量的网上评价等级结果，共分为A、B、C、D 4个等级，表示分数为95、85、75、65分。
窗体的设计界面、各控件初始属性及有关代码见窗体文件。程序的功能是，程序运行时，单击“读取并统计”按钮，则按行读取in5．txt文件的内容，并显示到文本框Textl中，然后调用Calculate过程统计A、B、C、D各等级出现的次数、计算该教师的最后评价成绩(评价成绩=各等级出现次数与相应等级得分乘积之和／评价总人数，结果要求四舍五入取整)，将结果分别存储到窗体层变量m1、m2、m3、m4、S中，然后将它们的值分别显示到文本框Text2、Text3、Text4、Text5、Text6中。
单击“保存结果”按钮，则保存结果。
“读取并统计”和“保存结果”按钮的Click事件过程已经给出，请编写Calculate过程中的代码，以实现上述功能。下图是程序对某个输入文件运行的界面。
 
注意：考生不得修改窗体文件中已经存在的控件和程序，在结束程序运行之前，必须进行“读取并统计”，且必须单击“保存结果”按钮保存结果，否则无成绩。最后，程序按原文件名存盘。

答案解析

【解题思路】Calculate过程中利用For循环逐个取出文本字符串s1中的字符，然后把每个判断语句中的相对应的字母个数加1存到相对应的变量中，将所得平均值放入变量S中，最后结果显示在窗体中。
【操作步骤】
步骤1：打开本题工程文件。
步骤2：打开代码编辑窗口，填入相应的代码以实现题目的功能。
参考答案(阴影部分是需要填入的内容)
 
 
步骤3：调试并运行程序，单击“读取并统计”按钮，再单击“保存结果”按钮，最后关闭程序后按题目要求存盘。