基于Excel的试卷自动生成系统的设计与实现
e=choice（k，1）ThisWorkbook.Sheets（"答案"）.Cells（t，1）.Font.ColorIndex=3ThisWorkbook.Sheets（"答案"）.Range（Cells（t+1，1），Cells（t+1，3））.PasteSpecial_Paste：=xlPasteValuesAndNumberFormatsThisWorkbook.Sheets（"答案"）.Cells（1，1）.Selectt=t+selnum+1 '下一种题型的位置End IfNextNextwb.Close savechanges：=FalseSet wb=Nothing4 结束语本文介绍
<<上一页 下一页>>
广州市越秀区图书馆版权所有。
联系电话：020-87673002
本站访问人数：