PDM与Excel利用VB脚本进行互导(三)

2015-11-21 02:05:01 · 作者: · 浏览: 34
Dim intFileNum As String intFileNum = FreeFile Open strFullFileName For Append As #intFileNum Print #intFileNum, strSQL Close #intFileNum End Function

?