文字を記述する

//Wordを操作するためのタイプライブラリを読みこむ(Word2000用)
#import "C:\Program Files\Microsoft Office 2000\Office\Mso9.dll" no_namespace rename("DocumentProperties", "DocumentPropertiesDOC")   
#import "C:\Program Files\Common Files\Microsoft Shared\VBA\VBA6\Vbe6ext.olb" no_namespace   
#import "C:\Program Files\Microsoft Office 2000\Office\Msword9.olb" rename("ExitWindows", "ExitWindowsDOC")


void CDocputstrDlg::OnButton1() 
{
	using namespace Word;
	_ApplicationPtr pDOC;

 	//Wordの起動
	pDOC.CreateInstance(L"Word.Application");
	pDOC->Visible = TRUE;

	//新規 Word document を追加する
	DocumentsPtr pDocuments = pDOC->GetDocuments();
	_DocumentPtr pDocument  = pDocuments->Add();

	//ドキュメントへ文字列を出力する
	pDOC->ActiveDocument->Content->Text = "aaaaaaaaaaaaaaaa\nbbbbbbbbbbbbbbb";

	AfxMessageBox("動作確認のために一時停止");

	//Wordを閉じる
	pDOC->Quit();
}