>>>???

Alex,

The example follows
**********dummy1.prg**********
DEFINE CLASS dummy_class AS custom OLEPUBLIC
procedure dummer
PARAMETER myname
messagebox("Hello . My name is "+myname)
endproc
enddefine
**************

*******from command line ********
build projecet dummy1 from dummy1.prg
build dll dummy1 from build1 recompile
***after successful building ******
run/n regsvr32 c:\dummy1.dll
** give exact path name of dll***

****************************
'Now open VisualBasic and write following code.
'in the module write
declare sub dummer lib "c:\dummy1.dll"( kpk as string)

'''now in form command click event write the code

Set ofox = CreateObject("dummy1.dummy_class")

Call ofox.dummer("Dangerous")
Set ofox = Nothing
'this will clear the ofox object

''''''''''