using?System;
using?System.Collections.Generic;
using?System.IO;
using?System.Linq;
using?System.Runtime.InteropServices;
using?System.Text;
using?System.Threading.Tasks;
using?System.Windows.Forms;

namespace?WindowsFormsApplication1
{
????class?Class1:?RichTextBox
????{
????????const?string?DLL_RICHEDIT?=?“msftedit.dll“;
????????const?string?WC_RICHEDITW?=?“RICHEDIT50W“;
????????private?IntPtr?moduleHandle;
????????private?bool?attemptedLoad;
?
????????[DllImport（“Kernel32.dll“）]
????????internal?static?extern?IntPtr?LoadLibraryA（string?libname）;
?
?
????????public?void?NewRichTextBox（）
????????{
????????????//?This?is?where?we?store?the?riched?library.
????????????moduleHandle?=?IntPtr.Zero;
????????????attemptedLoad?=?false;
????????}
?
????????protected?override?CreateParams?CreateParams
????????{
????????????get
????????????{
????????????????CreateParams?cp?=?base.CreateParams;
????????????????AttemptToLoadNewRichEdit（）;
????????????????if?（moduleHandle?!=?IntPtr.Zero）
????????????????{
????????????????????cp.ClassName?=?WC_RICHEDITW;
????????????????}
????????????????return?cp;
????????????}
????????}
?
????????void?AttemptToLoadNewRichEdit（）
????????{
????????????//?Check?for?library
????????????if?（false?==?attemptedLoad）
????????????{
????????????????attemptedLoad?=?true;
????????????????string?strFile?=?Path.Combine（Environment.SystemDirectory?DLL_RICHEDIT）;
????????????????moduleHandle?=?LoadLibraryA（strFile）;
????????????}
????????}
????}
}

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----

?????文件????????187??2017-06-05?15:04??TransferOfficeVBA\TransferOfficeVBA\App.config

?????文件??????36913??2017-06-19?17:02??TransferOfficeVBA\TransferOfficeVBA\bin\Debug\123.pptm

?????文件????????476??2017-07-04?11:36??TransferOfficeVBA\TransferOfficeVBA\bin\Debug\123.vbs

?????文件????????480??2017-07-04?11:21??TransferOfficeVBA\TransferOfficeVBA\bin\Debug\ExecPPTMaroc.vbs

?????文件??????14848??2011-03-25?13:18??TransferOfficeVBA\TransferOfficeVBA\bin\Debug\Interop.MSscriptControl.dll

?????文件????????509??2017-07-04?11:24??TransferOfficeVBA\TransferOfficeVBA\bin\Debug\temp.vbs

?????文件??????22528??2017-07-04?11:39??TransferOfficeVBA\TransferOfficeVBA\bin\Debug\TransferOfficeVBA.exe

?????文件????????187??2017-06-05?15:04??TransferOfficeVBA\TransferOfficeVBA\bin\Debug\TransferOfficeVBA.exe.config

?????文件??????44544??2017-07-04?11:39??TransferOfficeVBA\TransferOfficeVBA\bin\Debug\TransferOfficeVBA.pdb

?????文件??????22984??2017-07-04?11:39??TransferOfficeVBA\TransferOfficeVBA\bin\Debug\TransferOfficeVBA.vshost.exe

?????文件????????187??2017-06-05?15:04??TransferOfficeVBA\TransferOfficeVBA\bin\Debug\TransferOfficeVBA.vshost.exe.config

?????文件????????490??2012-06-06?02:06??TransferOfficeVBA\TransferOfficeVBA\bin\Debug\TransferOfficeVBA.vshost.exe.manifest

?????文件??????15905??2017-06-06?12:30??TransferOfficeVBA\TransferOfficeVBA\bin\Debug\ts.xlsm

?????文件??????47597??2017-06-19?17:16??TransferOfficeVBA\TransferOfficeVBA\bin\Release\123.pptm

?????文件??????14336??2017-06-19?17:17??TransferOfficeVBA\TransferOfficeVBA\bin\Release\TransferOfficeVBA.exe

?????文件????????187??2017-06-05?15:04??TransferOfficeVBA\TransferOfficeVBA\bin\Release\TransferOfficeVBA.exe.config

?????文件??????24064??2017-06-19?17:17??TransferOfficeVBA\TransferOfficeVBA\bin\Release\TransferOfficeVBA.pdb

?????文件??????22984??2017-06-19?17:17??TransferOfficeVBA\TransferOfficeVBA\bin\Release\TransferOfficeVBA.vshost.exe

?????文件????????187??2017-06-05?15:04??TransferOfficeVBA\TransferOfficeVBA\bin\Release\TransferOfficeVBA.vshost.exe.config

?????文件????????490??2012-06-06?02:06??TransferOfficeVBA\TransferOfficeVBA\bin\Release\TransferOfficeVBA.vshost.exe.manifest

?????文件???????1537??2017-06-21?17:52??TransferOfficeVBA\TransferOfficeVBA\Class1.cs

?????文件??????10592??2017-07-04?11:40??TransferOfficeVBA\TransferOfficeVBA\Form1.cs

?????文件???????7640??2017-07-04?11:40??TransferOfficeVBA\TransferOfficeVBA\Form1.Designer.cs

?????文件???????6217??2017-07-04?11:40??TransferOfficeVBA\TransferOfficeVBA\Form1.resx

?????文件??????14848??2011-03-25?13:18??TransferOfficeVBA\TransferOfficeVBA\Interop.MSscriptControl.dll

?????文件???????6620??2017-06-30?17:53??TransferOfficeVBA\TransferOfficeVBA\myClass.cs

?????文件???????8981??2017-07-04?11:39??TransferOfficeVBA\TransferOfficeVBA\obj\Debug\DesignTimeResolveAssemblyReferences.cache

?????文件???????7584??2017-06-30?17:14??TransferOfficeVBA\TransferOfficeVBA\obj\Debug\DesignTimeResolveAssemblyReferencesInput.cache

?????文件??????????0??2017-06-05?15:04??TransferOfficeVBA\TransferOfficeVBA\obj\Debug\TemporaryGeneratedFile_036C0B5B-1481-4323-8D20-8F5ADCB23D92.cs

?????文件??????????0??2017-06-05?15:04??TransferOfficeVBA\TransferOfficeVBA\obj\Debug\TemporaryGeneratedFile_5937a670-0e60-4077-877b-f7221da3dda1.cs

............此處省略48個文件信息