某考试的多选题有“A、B、C、D、E”5个答案选项。
例如,标准答案为“ABE”,则对应得分表如下所示。
学生答案 | ABE | AB | AE | BE | A | B | E | AC | ...... |
字符串 | 11001 | 11000 | 10001 | 01001 | 10000 | 01000 | 00001 | 10100 | ...... |
十进制数(x) | 25 | 24 | 17 | 9 | 16 | 8 | 1 | 20 | ...... |
ans(x) | 2 | 1 | 1 | 1 | 1 | 1 | 1 | 0 | 0 |
小温依据上述描述设计了“多选题阅卷”的VB程序,实现如下功能:在文本框Text1中输入标准答案(大写字母),先单击“初始化”按钮Command1,在数组ans中生成所有答案组合对应的分值,然后单击“阅卷”按钮Command2,从数据库中读取学生的答案并进行阅卷,在列表框List1中显示得分结果。程序运行界面如图所示。