国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁(yè) > 學(xué)院 > 開(kāi)發(fā)設(shè)計(jì) > 正文

C#操作Word文檔(Office 2007)

2019-11-18 16:48:47
字體:
來(lái)源:轉(zhuǎn)載
供稿:網(wǎng)友

首先引入類(lèi)庫(kù),Microsoft.Office.Interop.Word,然后進(jìn)行編程。代碼如下:

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 myWordApp = new Microsoft.Office.Interop.Word.ApplicationClass();
        Document myWordDoc;
        string strContent = "";

        public Form1()
        {
            InitializeComponent();
        }

        PRivate void button1_Click(object sender, EventArgs e)
        {
            createWord();      
            //openWord();
        }

        private void createWord()
        {
            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;
            myWordDoc = myWordApp.Documents.Add(ref Nothing, ref Nothing, ref Nothing, ref Nothing);

            #region 將數(shù)據(jù)庫(kù)中讀取得數(shù)據(jù)寫(xiě)入到word文件中

            strContent = "你好/n/n/r";
            myWordDoc.Paragraphs.Last.Range.Text = strContent;

            strContent = "這是測(cè)試程序";
            myWordDoc.Paragraphs.Last.Range.Text = strContent;


            #endregion

            //將WordDoc文檔對(duì)象的內(nèi)容保存為DOC文檔
            myWordDoc.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);
            //關(guān)閉WordDoc文檔對(duì)象
            myWordDoc.Close(ref Nothing, ref Nothing, ref Nothing);
            //關(guān)閉WordApp組件對(duì)象
            myWordApp.Quit(ref Nothing, ref Nothing, ref Nothing);

            this.richTextBox1.Text = strFileName + "/r/n" + "創(chuàng)建成功";

        }
        private void openWord()
        {
            fontDialog1.ShowDialog();
            System.Drawing.Font font = fontDialog1.Font;
            object filepath = "D://asp.docx";
            object oMissing = System.Reflection.Missing.Value;
            myWordDoc = myWordApp.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);
            myWordDoc.Content.Font.Size = font.Size;
            myWordDoc.Content.Font.Name = font.Name;
            myWordDoc.Save();
            richTextBox1.Text = myWordDoc.Content.Text;
           
           
            myWordDoc.Close(ref oMissing, ref oMissing, ref oMissing);
            myWordApp.Quit(ref oMissing, ref oMissing, ref oMissing);
        }

}

http://m.survivalescaperooms.com/wrtandy/archive/2006/12/13/andy.html


發(fā)表評(píng)論 共有條評(píng)論
用戶(hù)名: 密碼:
驗(yàn)證碼: 匿名發(fā)表
主站蜘蛛池模板: 四会市| 凉城县| 洪洞县| 鸡东县| 资阳市| 曲松县| 六枝特区| 安多县| 西乡县| 新郑市| 隆林| 淮南市| 亳州市| 延长县| 桂东县| 东乡族自治县| 建瓯市| 罗城| 额尔古纳市| 湘潭市| 琼海市| 乌拉特中旗| 牟定县| 新宾| 堆龙德庆县| 密山市| 昌都县| 洛宁县| 永修县| 馆陶县| 景泰县| 隆回县| 崇礼县| 巨野县| 吐鲁番市| 嵊州市| 靖宇县| 南宫市| 康马县| 高青县| 土默特右旗|