当前有一段autodesk的inventor中的ilogic代码如下Dim doc As Document = ThisApplicationActiveDocumentDim fileName As String = docFullFileNameMessageBoxShow当前激活的项目文件的名称是: & fileName 项目文件名称需要对其进行修改使其能够显示当前文件所属项目的名称而不是当

Dim doc As Document = ThisApplication.ActiveDocument
Dim proj As Project = doc.ReferenceProject
Dim projFileName As String = proj.FullFileName
MessageBox.Show(“当前激活的项目文件所属项目的名称是:” & projFileName, “项目文件所属项目名称”)