在VBA中的平面文件中打印不带引号的字符串

Question

我正在创建一个vba函数创建一个只有一行的平面文件，在我的Excel文件的同一目录下，一切正常

但是当我打印出包含在字符串中的那一行时，我的消息在引号内

如果我期待像

那样的话

  

HDR201412101136452014121090105500000000000000000000

我明白了

  

“HDR201412101136452014121090105500000000000000000000”

这是我的代码：

Public Function generateFlatFile()

    Open ThisWorkbook.Path & "\" & FLAT_FILE_NAME For Output As #1

    Dim header As String
    header = "HDR"
    header = header & Format(Now, "yyyymmddhhnnss")
    header = header & Format(Now, "yyyymmdd")
    header = header & Worksheets(BD).Cells(2, 3)
    header = header & 5
    header = header & "00000000000000000000"

    Write #1, header

    Close #1
End Function

Answer 1

Write #n会将字符串括在引号中。如果您想完全控制文件的编写方式，则需要使用Print #n代替。