Dim f Set f = CreateObject("testvbscriptcallabledll") msgbox f.testmethod Set f = Nothing