开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 电子书籍 > 其他书籍
word自动评分祥解
上传用户：manband
上传日期：2024-11-24
文件大小： 38k
源码售价： 10 个金币 积分规则     积分充值
充值1元得10金币   
资源说明：1．双击“命令按钮”对象，进入按钮单击事件的编辑状态，输入代码如下： Private Sub CommandButton1_Click() Dim wdnumber As Integer, tempnumber As Integer, wderror As String '定义变量类型，wdnumber用于存放学生成绩，tempnumber用于存放临时成绩，wderror用于存放操作评价 Label1.Caption = "" wdnumber = 0 tempnumber = 0 wderror = "1." '初始化变量 ActiveDocument.Paragraphs(1).Range.Select Selection.MoveRight unit:=wdCharacter, Count:=1, Extend:=wdExtend '选择第一段标题行的文字部分 If Selection.Font.Name = "楷体_GB2312" Then wdnumber = wdnumber + 6
部分文件列表（点击文件名可查看文件内容）
本源码包内暂不包含可直接显示的源代码文件，请下载源码包。
最新本分类资源
本类热门下载