代码: ```vb Option Explicit Const TRAININGDIR As String = _ "D:\Application Data\SolidWorks\文章\TRN_CDT2315_API2023\SOLIDWORKS Training Files\API Fundame