[我班的区域设置]我们的班级场地小，如何利用好有限的空间设置区域呢？我在设置前主要是先考虑设置哪几个活动区才最有利于目标的实现，避免因内容相近或设置不当而浪费有限的空间。所以，我根据自己...+阅读
通常，一般情况下，我们打印文档都是直接从应用程序中打印，例如Word，这个方法对于单个文件打印比较方便，但是对于文秘等经常需要打印大批量文件的工作人员，如果仍然用WORD一个一个进行打印就比较麻烦了。
应我公司文管中心的要求，我制作了一个多文档打印程序，方便了文秘人员，现介绍如下：
运行VB，新建一个应用程序工程，在Form中添加一个DriveListBox 控件、DirListBox 控件和FileListBox 控件，分别取名为：Drive1、Dir1和File1。设置File1的Pattern 属性为*.doc，设置FileListBox 控件中显示的文件名为DOC文档。
在Form_Load()事件中添加一行代码：Drive1.Drive = "c:"，用来设置运行时所选择的驱动器。
在Drive1_Change()事件中添加一行代码：Dir1.Path = Drive1.Drive，这样当驱动器改变时，使目录路径随之改变。
同样在Dir1_Change()事件中添加一行代码：File1.Path = Dir1.Path，当目录改变时，使文件列表同时改变。
因为一般来说，文档都会保存在统一的目录下，所以没有使用monDialog 控件进行文件名选择，使操作更为简单方便。
在Form中添加一个mandButton 控件取名为Print，用来进行打印操作。
A、在mand1_Click()中添加如下代码：
Dim i As Integer
Dim strfile As String
Dim word As Object
Set word = CreateObject("word.Basic")
word.appshow
For i = 0 To File1.ListCount - 1
If Right(Dir1.Path, 1) "" Then
strfile = Dir1.Path + "" + File1.List(i)
Else
strfile = Dir1.Path + File1.List(i)
End If
word.fileopen strfile
word.fileprint
word.fileclose
Next
word.appclose
Set word = Nothing
B、代码说明：定义一个对象变量word；
使用CreateObject创建一个WORD对象并赋值给word；
以FileListBox 控件的列表部分项目的个数作为数进行循环打印
判断目录名的最后一个字母是否为“”，如果不是，则添加“"进行修正通过目录名和文件名获得完整的文件名
使用word对象的fileopen方法打开文件
使用word对象的fileprint方法进行文件打印
使用word对象的fileclose方法关闭文件
最后调用word对象的appclose方法关闭word程序，以及释放对象资源Set word = Nothing。
这样，我们就很简单的实现了多文档的打印，希望对文秘人员有所帮助。
以下为关联文档：
word2013中如何设置自动保存文档2选择左上角的文件命令，如图：3点击文件命令，找到选项这个命令，如图：4点击选项，从弹出的对话框中找到保存选项，如图：5设定好需要自动保存的时间，如图6在对话框中找到高级，如图：7从...
英语作业设计，优化设置教学作业多样性、趣味化的英语作业形式能够成功吸引学生的学习积极性，让现如今的小学英语教学变得更加丰富多彩，从宏观的角度上来看，目前我国小学五年级英语作业的形式仅仅局限于笔头，实...
word2013中如何设置打钩方框2点击开发工具功能，选择如下图所示的功能框，如下图所示3点击后如下图所示4选择方框，点击属性5点击如下图所示的修改功能6选择Wingdings，找到对勾功能，点击确定7设置完毕后，点...
WPS表格中如何设置表格颜色WPS文字常用快捷键创建新文档 Ctrl+N或者Alt+F+N(对应New) 打开文档 Ctrl+O或者Alt+F+O(对应Open) 关闭文档 Ctrl+W或者Alt+W+C 保存当前文档 Ctrl+S或者Alt+F+S(对应Se) 文...
在Excle表格中如何设置上标2、选中需要设置的文字。3、单击功能区域开始选项卡。4、单击字体区域右下方斜拉箭头。5、在弹出的设置单元格格式对话框中，勾选上标并单击确定。6、设置完成。处理工作...
Excle表格中怎样设置下标2、选中需要设置的文字。3、单击Excle功能区域的开始选项卡。4、单击字体区域右下方的斜拉箭头。5、在弹出的设置单元格格式对话框中，勾选下标，然后单击确定。6、设置成功...
信息课堂教学中如何设置网上邻居利用网络来实现资源共享的方法有很多，比如 网上邻居 、FTP、博客、包括五年级上小学信息技术教材中所提供的学科教育平台。经过一段时间的课堂使用，我发现这些方式各有各的优...
将班级特色渗透到班级环境，区域设置一、确定班级特色的背景，上学期我们有了嘟嘟养成记这一教学平台，教师与家长的互动变得明显了。老师会上传孩子在园的新鲜事，家长会上传孩子在家的新鲜事。这使我们双方都更加地...
在word2010中如何设置稿纸2里面有稿纸设置，鼠标单击就可以了3就会弹出一个对话框，里面有稿纸设置的一些基本编辑选项4比如，稿纸的大小，稿纸的形状，页眉页脚等5最后如果编辑完了的话，点击确认就好了，就已...
