论文部分内容阅读
学生在基于Excel工作表的试卷中输完全部答案后才可保存或删除答案,而检查并确保在保存答案试卷文档后才能清除答案的相应代码如下:
’保证选择或输入班级号、姓名与学号
If ComboBoxClass = "" Or ComboBoxNum = "" Or TextBoxName = "" Then
MsgBox ("请选择输入班级号、序号,并输入姓名,然后再单击本按钮")
Exit Sub
End If
’根据学生输入的班号和学号自动组合出Excel工作簿文档名
ExcelFilePath = "《Internet网络及其应用》试卷_"
’保证选择或输入班级号、姓名与学号
If ComboBoxClass = "" Or ComboBoxNum = "" Or TextBoxName = "" Then
MsgBox ("请选择输入班级号、序号,并输入姓名,然后再单击本按钮")
Exit Sub
End If
’根据学生输入的班号和学号自动组合出Excel工作簿文档名
ExcelFilePath = "《Internet网络及其应用》试卷_"