读取本地磁盘中的文本文件，将文本文件的内容插入到文本块的指定位置。

参考代码

Sub test()
	' 将当前选中美术字的（部分）文本内容，导出到D盘下面的 temp.txt 文件中
	ActiveShape.Text.ExportToFile "D:\temp.txt", 2, 4, cdrParagraphIndexing
	' 从文件导入内容，并指定插入到美术字的位置
	ActiveShape.Text.ImportFromFile "D:\temp.txt", 1, cdrParagraphIndexing
End Sub