【SolidWorks宏】向指定的文件写入一行数据

最新推荐文章于 2024-07-15 10:05:02 发布

少莫千华

最新推荐文章于 2024-07-15 10:05:02 发布

阅读量770

点赞数

分类专栏：语言-VBA

本文链接：https://blog.csdn.net/chenlu5201314/article/details/80287486

版权

语言-VBA 专栏收录该内容

7 篇文章 2 订阅

订阅专栏

Rem 向指定的文件写入一行数据
Public Sub WriteFirstLineDataToFile(filePath As String, content As String)
    '声明
    Dim fs As Object
    Dim ctf As Object
    
    '执行过程
    Set fs = CreateObject("Scripting.FileSystemObject")
    Set ctf = fs.CreateTextFile(filePath, True)
    ctf.WriteLine (content)
    ctf.Close
End Sub
Rem 调用示例
Sub main()
  WriteFirstLineDataToFile "C:\Test.txt", "I Love You!"
End Sub