I'm looking for a line of vb code that will close the active part or assembly file but keep the active drawing file open.

Can anybody help?