vb6 - VB6中Print的一个奇怪案例

标签 vb6 stream ms-word

我在VisualBasic 6中有以下代码:

iLinha = FreeFile
Open strPath For Output As #iLinha
Dim strHeader As String

'***Assign a value to the string `Content`  

Print #iLinha, strHeader

现在,我正在尝试使用Word.Application来执行与相同的代码,您知道吗?
当我编写此代码时:
Word.Selection.TypeText strHeader  

我所得到的只是代码和字符,例如:{rtf1\ansi\ansipg1252\deff0....
谁能告诉我上面的代码?打印#iLinha
更新
streamFile.Type = adTypeBinary
streamFile.Open
streamFile.Write rstAux.Fields("text")
streamFile.SaveToFile strCaminhoTemp, adSaveCreateOverWrite
streamFile.Close  

Obs:我尝试将adTypeBinary更改为adTypeText,但是发生了一些错误...

也许这段代码与我的问题有关?!

最佳答案

看来strHeader是带格式的文本,而不是纯文本。

看起来strHeader在某个时候从RTF(RichText)控件获取其值,并且获取格式化的文本,而不是纯文本。

有关RTF控件的更多信息:MSDN

关于vb6 - VB6中Print的一个奇怪案例,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/18409262/

相关文章:

javascript - 使用嵌入式 VB6 浏览器无法加载 Google map v3.19

java - 使用java获取linux终端的输出?

c# - 从 ffmpeg 标准输出的单个流中获取多个图像

java - BufferedInputStream 如何从操作系统请求数据 block

vba - 在包含多段落单元格的 Word 表格中向下移动一行

vb6 - 从控件数组加载控件

ms-access - VB6 ADO 记录集字段名称区分大小写取决于 Windows 语言设置

windows-7 - Windows 7 下 VB 6 出现 "User-defined type not defined"错误

javascript - 将文本从 HTML 转换为 MS Word

excel - 在 Excel 文件中查找字符串并获取行索引