说明：
用户可用 Windows API 函数读出路径。
实例：
Private Sub Projectpath()
Dim obj As grafexe.Application
Set obj = Applicatio
MsgBox Left(obj.ApplicationDataPath, Len(obj.ApplicationDataPath) - 7)
End Sub
关键字：
Visual Basic，脚本，编程
原创文章，作者：ximenziask，如若转载，请注明出处：https://www.zhaoplc.com/plc337874.html
微信扫一扫
支付宝扫一扫