①. 使用Shell函数直接调用
语法:Shell (pathname[,windowstyle]).Pathname是指要执行的程序的名字和任何必须的参数或命令行开关,可以包括目录和驱动器名;Windowstyle是执行程序的窗口风格的数字.
使用Shell调用Word比较简单,编程量小,但必须明确指定Word所在路径,这不利于移植,而且,不能对Word进行控制,不利于程序和Word之间的数据交换.
(1)Word为OLE自动化提供一种称为"Basic"的对象,要在VB中控制Word ,首先要定义一个引用Word中"Basic"对象的对象变量:Dim Wordobj as Object
注意:"Basic"对象不支持关闭它自己的一个方法.即若在OLE自动化中关闭了Word,则对象被置为Nothing,便不能再对对象进行操作,程序出错.
(1)有一些语句和函数不能使用,包括:控制结构,如While...Wend和If...Then...Else;声明语句,如Dim;定制对话框相关的语句:FileExit语句;要求数组变量作为参数的语句或函数.
Word可以为OLE自动化给另一个应用提供对象,但是它不能使用OLE自动化访问其它应用中的对象.例如:VB和Excel可以使用OLE自动化访问Word,但是Word不能使用OLE自动化访问它们.
在VB中,要访问在包容器中嵌入的Word对象,首先要在项目中插入对象.做法如下:在窗体中插入OLE控件,对象类型选择"MicrosoftWord图片"或"Microsoft Word文档",再按"确定".
然后用Object属性访问文档或图片,并使用WordBasic语句和函数作用于它.嵌入的对象必须在可被访问之前被激活,可以使用Action属性激活OLE控件.例如,使用下面指令访问一个嵌入在称为OLE1的OLE控件中的文档:
Dim Wordobj as Object
Set Wordobj =OLE1.Object.Application. WordBasic
其他方面,使用方法同OLE自动化.使用在包容器中嵌入的Word对象,Word显示的窗口大小、位置与OLE控件定义的大小、位置相同,而且工具栏显示位置与Word脱离.这一点与OLE自动化相比,是个不足.
都说到这里了大家应该明白,要想在Microsoft Visual Basic中控制Microsoft Word,最好使用OLE自动化,通过使用WordBasic指令对Word进行全面控制,而且,用户使用起来与使用Microsoft Word一样,非常方便.
第一步,新建项目.
新建成功.
END
第二步,添加引用.
"项目"--"添加引用".
第三步,添加打开文件对话框工具.
工具箱--对话框--openfiledialog.
添加成功.
第四步,添加命令按钮控件.
工具箱--公共控件--button.
在控件上右击鼠标,进入属性设置.
text属性设置为"打开excel".
name属性也设置为"打开excel".
第五步,编写程序.
鼠标双击命令按钮,进入编程界面,编写程序.
第六步,运行程序.
鼠标单击启动调式图标,程序开始运行.
单击打开excel命令按钮,调用打开文件对话框,选择自己要打开的excel文件.
第七步,保存程序.
第一次程序运行完,关闭程序,出现关闭项目提示,选择保存.
选好自己要保存的位置.
Using?FolderBrowserDialog?As?New?FolderBrowserDialog
If?FolderBrowserDialog.ShowDialog?=?Windows.Forms.DialogResult.OK?Then
Dim?资料夹?As?String()?=?System.IO.Directory.GetFiles(FolderBrowserDialog.SelectedPath,?"*")
For?Each?文件?In?资料夹
MsgBox(My.Computer.FileSystem.ReadAllText(文件))?'读取数据
My.Computer.FileSystem.WriteAllText(文件,?"数据",?False)?'写入数据
Next
End?If
End?Using
超链接在本质上是文字式按钮,事件类型仍旧属于鼠标单击事件.
在鼠标单击事件中,使用shell命令.
例如:
dim file as string="C:\1.doc"
a=Shell("C:\Program Files\Microsoft Office\OFFICE11\WORD.EXE " file, vbNormalFocus)
注意要有空格.
System.Windows.Forms.OpenFileDialog
System.Windows.Forms.SaveFileDialog
System.Windows.Forms.FolderBrowserDialog
以上三个类均能够很好的解决楼主的需求.
具体的请lz自己查msdn
可以调用CMD
方法一:
Shell("cmd.exe?/c?call?c:\新建文本文档.txt",?AppWinStyle.NormalFocus)
缺点:不但会打开文本文件,同时还会显示一个cmd窗体.
方法二:
需要新建一个bat文件到资源里,输入start C:\新建文本文档.txt
代码
shell?"bat文件的路径.bat"
这样就好了,两种方法各有好坏.一个会显示cmd窗体,一个需要bat文件.