VS 2010 复制代码到word出现乱码解决办法

来源:互联网 发布:网络教学平台软件下载 编辑:程序博客网 时间:2024/05/17 14:16

今天写报告贴代码的时候遇到这个问题,中文注释之间会有乱码。

网上搜了搜,找到了三种解决办法。

在此陈列一下:

补充0:如果是word2007以上版本,可以在右键选择粘贴方式的时候,选择“只保留文本”。

1.先是我自己的解决办法,发现又不少人也这末做的。那就是先复制到记事本里,然后再从记事本里复制粘贴到word。

2.这是某位勤快的自己写的代码(原文链接http://blog.sina.com.cn/s/blog_6697a7290100sq3c.html)

using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Text;
using System.Windows.Forms;
using System.Text.RegularExpressions;

namespace Take_Out_Messy_Code
{
    public partial class Form1 : Form
    {
        public Form1()
        {
            InitializeComponent();
        }

        private void buttonBegin_Click(object sender, EventArgs e)
        {
            //取得剪貼簿內容
            IDataObject dataObject = Clipboard.GetDataObject();
            if (dataObject.GetDataPresent(DataFormats.Rtf))
            {
                //取出RTF格式
                string rtf = dataObject.GetData(DataFormats.Rtf) as string;
                //以Regex.Replace去除多餘字元(註: 不管是否有問題,一律強制處理)
                string fixedRtf =
                  Regex.Replace(rtf, @"\\uinput2(?<uc>\\u-?\d*)\s..",
                (m) =>
                {
                    return m.Groups["uc"].Value + "?";
                });
                //另建新DataObject物件
                DataObject newDataObject = new DataObject();
                //RTF格式用修正後的字串,其餘依原值
                foreach (String t in dataObject.GetFormats())
                    newDataObject.SetData(t,
                    t == "Rich Text Format" ? fixedRtf :
                    dataObject.GetData(t));
                //將修正後內容寫入剪貼簿
                Clipboard.SetDataObject(newDataObject, true);
                MessageBox.Show("Take Out Pessy Code successful!");
            }
        }
    }
}

3.开始菜单中的Office工具,修改Office 语言设置中的主要编辑语言为原编辑状态下的语言。


反正这个事让人又开始有点儿牢骚了,编码标准太杂乱了,软件商们该多做些工作啊。