vba中数据替换

发布网友发布时间：2022-05-06 00:59

共1个回答

热心网友时间：2022-06-28 10:24

Public Sub Test()
Dim sPath As String
Dim iFile As Long
Dim t As Integer
Dim strTemporary As String
t = 5 ' 计算出t的具体数值
strTemporary = "(10," & CStr(t) & ",5)"
sPath = "D:\Temporary.txt"
iFile = FreeFile()
Open sPath For Append As #iFile
Print #iFile, strTemporary
Close #iFile
End Sub

声明：本网页内容为用户发布，旨在传播知识，不代表本网认同其观点，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。E-MAIL:11247931@qq.com