Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
System.IO.Directory.CreateDirectory("C:\我的文件夹") '创建目录,路径就自己改吧,如果路径存在,就没必要创建了
System.IO.File.Create("C:\我的文件夹\我的文件.doc") '在指定目录下创建word文档
End Sub
将Word文档嵌入到WinForm窗体显示Word文档内容
private void 打开ToolStripMenuItem_Click(object sender, EventArgs e)
{
OpenFileDialog P_GetFile = new OpenFileDialog();//创建打开文件对话框对象
DialogResult P_dr = P_GetFile.ShowDialog();//显示打开文件对话框
WebBrowser.Navigate(P_GetFile.FileName);//打开Word文档并显示
}
//在Word文档中插入图片
private void btn_New_Click(object sender, EventArgs e)
btn_New.Enabled = false;//停用新建按钮
ThreadPool.QueueUserWorkItem(//使用线程池
(P_temp) =//使用lambda表达式
G_wa = new Word.Application();//创建Word应用程序对象
Word.Document P_wd = G_wa.Documents.Add(//建立新文档
ref G_missing, ref G_missing, ref G_missing, ref G_missing);
Word.Range P_Range = P_wd.Paragraphs[1].Range;//得到段落范围
object P_Ranges = P_Range;//创建ojbect对象
P_wd.InlineShapes.AddPicture(//向文档中插入图片
G_OpenFileDialog.FileName, ref G_missing, ref G_missing, ref P_Ranges);
G_str_path = string.Format(//计算文件保存路径
@"{0}\{1}", G_FolderBrowserDialog.SelectedPath,
DateTime.Now.ToString("yyyy年M月d日h时s分m秒fff毫秒") + ".doc");
P_wd.SaveAs(//保存Word文件
ref G_str_path,
ref G_missing, ref G_missing, ref G_missing, ref G_missing,
ref G_missing, ref G_missing, ref G_missing);
((Word._Application)G_wa.Application).Quit(//退出应用程序
this.Invoke(//开始执行窗体线程
(MethodInvoker)(() =//使用lambda表达式
btn_Display.Enabled = true;//启用显示按钮
MessageBox.Show("成功创建Word文档！", "提示！");
}));
});
首先说明,你这样是写TXT,不是DOC,虽然Word可以打开,但根本就不是Word文件.当然不能存储图片了.请参考我以下的代码.建一个Command1.
================
Dim
ap
As
Word.Application,
doc
Document
Private
Sub
Form_Load()
'这个过程不必做修改,是建立一个新的Word文档
Set
=
CreateObject("word.application")
ap.Visible
True
ap.Documents.Add
End
Command1_Click()
doc.Content.InsertAfter
Text:="请输入你要输入的内容"
'插入文字,请使用这种格式
doc.Shapes.AddPicture
FileName:="D:\a.jpg"
'插入图片,请使用这种格式,路径自己写
其他问题再找我.
转换表格的时候应该有选项的（光标一般放置在外层表格区域）,如图,取消 转换嵌套表格.
当然,对于特别复杂及不规则的表格（粘贴过程中也可能导致表格错乱）,用FRONTPAGE调整一下也是不错的主意.
参考文献：OFFICE XP测试
以上就是土嘎嘎小编为大家整理的vb.net生成word相关主题介绍,如果您觉得小编更新的文章只要能对粉丝们有用,就是我们最大的鼓励和动力,不要忘记讲本站分享给您身边的朋友哦！！