首先引入类库,
Microsoft.
Office.Interop.
Word,然后进行
编程。代码如下:
首先引入类库,
Microsoft.
Office.Interop.
Word,然后进行编程。代码如下:
using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Text;
using System.
Windows.Forms;
using
Microsoft.
Office.Interop.
Word;
namespace
WordTest
{
public partial class Form1 : Form
{
object strFileName;
Object Nothing;
Microsoft.
Office.Interop.
Word.Application my
WordApp = new
Microsoft.
Office.Interop.
Word.ApplicationClass();
Document my
WordDoc;
string strContent = "";
public Form1()
{
InitializeComponent();
}
private void button1_Click(object sender, EventArgs e)
{
create
Word();
//open
Word();
}
private void create
Word()
{
strFileName = System.
Windows.Forms.Application.StartupPath + "test.doc";
if (System.IO.File.Exists((string)strFileName))
System.IO.File.Delete((string)strFileName);
Object Nothing = System.Reflection.Missing.Value;
my
WordDoc = my
WordApp.Documents.Add(ref Nothing, ref Nothing, ref Nothing, ref Nothing);
#region 将数据库中读取得数据写入到word文件中
strContent = "你好nnr";
my
WordDoc.Paragraphs.Last.Range.Text = strContent;
strContent = "这是测试程序";
my
WordDoc.Paragraphs.Last.Range.Text = strContent;
#endregion
//将
WordDoc文档对象的内容保存为DOC文档
my
WordDoc.SaveAs(ref
strFileName, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref
Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref
Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref
Nothing);
//关闭
WordDoc文档对象
my
WordDoc.Close(ref Nothing, ref Nothing, ref Nothing);
//关闭
WordApp组件对象
my
WordApp.Quit(ref Nothing, ref Nothing, ref Nothing);
this.richTextBox1.Text = strFileName + "rn" + "创建成功";
}
private void open
Word()
{
fontDialog1.ShowDialog();
System.Drawing.Font font = fontDialog1.Font;
object filepath = "D:asp.docx";
object ōMissing = System.Reflection.Missing.Value;
my
WordDoc = my
WordApp.Documents.Open(ref filepath, ref oMissing, ref oMissing, ref oMissing, ref oMissing,
ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing,
ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing);
my
WordDoc.Content.Font.Size = font.Size;
my
WordDoc.Content.Font.Name = font.Name;
my
WordDoc.Save();
richTextBox1.Text = my
WordDoc.Content.Text;
my
WordDoc.Close(ref oMissing, ref oMissing, ref oMissing);
my
WordApp.Quit(ref oMissing, ref oMissing, ref oMissing);
}
}