🚀 go-pugleaf

$B$O$8$a$^$7$F(J $B@6?e$H?=$7$^$9!#(J

$B=iJbE*$J<ALd$G$9$,!"8f65<x$*4j$$$7$^$9!#(J

$B#V#B#4!%#0$+$i<+:n$N#D#L#L$r%3!<%k$7$?$$$N$G$9$,$&$^$/9T$-$^$;$s!#(J
$B$I$J$?$+65$($F$/$@$5$$!#(J

$B!{8=>](J

$B<!$N4JC1$J#D#L#L$r:n@.!##C%W%m%0%i%`$+$i$O%3!<%k$G$-$k$3$H$r3NG'!#(J

long dlltest( long xxx);

long dlltest( long xxx)
{
	return xxx;
}

*$B%b%8%e!<%kDj5A%U%!%$%k(J

LIBBARY TlistDll
EXPORTS
	dlltest	@1



$B<!$N$h$&$K(JVB$B$r:n@.(J

*Module$B%3!<%I(J

Declare Function dlltest Lib "TlistDll" (ByVal xxx As Long) As Long


*Form Load

Private Sub Form_Load()
	Dim tnum	 As Long
	Dim Ret As Long

	tnum = 1
	Ret = dlltest( tnum )


$B<B9T$9$k$H!"(J
	$B<B9T;~%(%i!<(J '49':
	DLL$B$,$?$@$7$/8F$S=P$;$^$;$s!#(J
$B$H$J$j$^$9!#(J

-- 
------------------------------
$B@6?e(J $B??0l(J   $B2#2OEE5!!J3t!K(J
shimshin@facmp.yokogawa.co.jp
------------------------------