Desarrollo secundario de VB solidworks

Defínelo global (no en ninguna función)

Dim swapp como objeto

Agrega la siguiente declaración al evento Form_Load:

set swapp = CreateObject (" SLD funciona . application ")

De la siguiente manera:

Dim swapp como objeto

Private subform_Load()

set swapp = CreateObject(" SLD funciona. Aplicación ")

Conector final