随笔分类 -  VBS

摘要:1.新建Word文档 '使用Add方法 Dim ObjWD,ObjDOC Set ObjWD=CreateObject("Word.application")Set ObjDOC=ObjWD.Documents.Add '使用完毕需要关闭doc和word程序 ObjDOC.SaveAs("C:/Te 阅读全文
posted @ 2017-04-19 18:32 老乌鸡 阅读(9741) 评论(0) 推荐(1) 编辑
摘要:1.if...then...end if if [条件] then [执行语句] end if 可以嵌套 多个if if [条件] then [执行语句] else if [条件] then [执行语句] end if eg. Dim a,b a=inputbox("please input a") 阅读全文
posted @ 2017-04-19 18:07 老乌鸡 阅读(1004) 评论(0) 推荐(0) 编辑