🚀 go-pugleaf

Visual Basic4$B$G$N%S%8%M%9%"%W%j$N3+H/$K7H$o$C$F$$$k<T$G$9$,(B,
$B!J$H$$$C$F$b$^$@6H3&7P838^%v7n!K!"(B
$B<~$j$N?M$K(BVB$B$K>\$7$$?M$,>/$J$/$F0J2<$NLdBj$G:$$C$F$^$9!#(B

$B-!(BExcel95$B$J$I$N0u:~%@%$%"%m%0%\%C%/%9$K$O%W%j%s%?$N>uBV!">l=j!"%3%a%s%H!"<o(B
$BN`$N>pJs$rI=<($5$l$F$$$^$9$,!"$3$l$i$N>pJs$r$I$&$d$C$?$i(BVB$B$G<hF@$G$-$k$N$G(B
$B$9$+!)(B
VB$B$N(BPrinter$B%*%V%8%'%/%H$K$b!"0u:~%@%$%"%m%0%\%C%/%9(B ($B%3%b%s(B
$B%@%$%"%m%0(B)$B$N%W%m%Q%F%#$b8+$"$?$i$J$$$7!D!D!#$d$O$j(BAPI$B4X?t$,I,MW$G$7$g$&$+(B
$B!)(B

$B-">e5-$N$=$l$C$]$$#A#P#I4X?t$K$D$$$F$G$9$1$I(B
    GetPrinter(  
	ByVal hPrinter As Long,$B!!!!(B//$B%W%j%s%?$N%O%s%I%k(B 
	ByVal Level As Long,       //$B%W%j%s%?%l%Y%k(B(0$B!A(B3)
	pPrinter As Byte,          //PRINTER_INFO_2$B9=B$BN$NG[Ns$N%]%$%s%?(B
	ByVal cbBuf As Long,
	pcbNeeded As Long
    ) As Boolean
Borland
C++$B$N(BHelp$B$K$h$k$H;2>H$G(BpPrinter(PRINTER_INFO_2$B9=B$BN$NG[Ns$N%]%$%s%?(B)$B$,JV$C(B
$B$F$/$k$H$"$j$^$9!#(B
$B%]%$%s%?$GJV$C$F$-$?$b$N$r$I$&$9$l$P(BVB$B$G9=B$BN$N%a%s%P$r<hF@$G$-$k$N$G$7$g(B
$B$&$+!#(B

	$B0J>e!"$o$+$k?M$,$$$?$i@'Hs65$($F$/$@$5$$(B


$BAzED!!?N(B
E-MAIL$B!!(Bisselron@mbox.kyoto-inet.or.jp