🚀 go-pugleaf

$B@nC<$H?=$7$^$9!#(B

$B2hLL(B($B%U%)!<%`(B)$B$N%$%a!<%8$r$=$N$^$^0u:~$9$k%3%^%s%I$,(BVB$B$K$"$k$H;W$$$^$9!#(B
$B%3%^%s%IL>$O!"(B"PrintForm"($BB?J,(B)$B!#>\:Y$O!"%^%K%e%"%kEy$r;2>H$7$F2<$5$$!#(B


Makoto Miura wrote in message
<01bcf359$a5f3f9c0$e63a18ca@k4miura.ics.co.jp>...
>$B$_$&$i$H?=$7$^$9!#(B
>
>VB$B$G2hLL$N%O!<%I%3%T!<$r<h$C$F!"$5$i$K$=$l$r(B
>$B0u:~$9$k$K$O$I$N$h$&$K$9$l$PNI$$$N$G$7$g$&$+!)(B
>
>$B$?$H$($P!"%3%^%s%I%\%?%s$r%/%j%C%/$9$k$H!"%O!<%I%3%T!<$N0u:~$^$G$G$-$k$h$&(B
>$B$K!"(B
>$B$7$?$$$N$G$9!#(B
>
>$B$I$J$?$+$4B8CN$JJ}$,$$$^$7$?$i!"$*65$($/$@$5$$!#(B
>$B$h$m$7$/$*4j$$$7$^$9(Bm(__)m
>
>--
>$B!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v(B
>                         $B$_$&$i$^$3$H(B
>                 e-mail: miura@ics.co.jp
>URL: http://www.edp.eng.tamagawa.ac.jp/~miura/
>$B!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v(B
>

In article <01bcf359$a5f3f9c0$e63a18ca@k4miura.ics.co.jp>, Makoto Miura wrote:
>VB$B$G2hLL$N%O!<%I%3%T!<$r<h$C$F!"$5$i$K$=$l$r(B
>$B0u:~$9$k$K$O$I$N$h$&$K$9$l$PNI$$$N$G$7$g$&$+!)(B

 $B;d$,4JC1$@$H;W$&$N$O!"(BPrint Screen $B%-!<2!2<$r5<;wE*$K9T$&$3$H$K$h$C$F(B
$B%/%j%C%W%\!<%I$K%$%a!<%8$r3JG<$7!"$3$l$r(B Picture $B%*%V%8%'%/%H$K3JG<$9$k(B
$BJ}K!$G$9!#(BPrint Screen $B$K$D$$$F$O!"(B<61splf$rem@cij-gw.ykhm.cij.co.jp> $B$N(B
$B5-;v$J$I$r;29M$K$7$F2<$5$$!#(B

 $B$3$N8e!"0J2<$N%3!<%I$r<B9T$7$^$9!#(B

Dim P as StdPicture
Set P = Clipboard.GetData(vbCFBitmap)

 $B8e$O!"$3$N(B Picture $B%*%V%8%'%/%H$r0u:~$9$l$P$$$$$o$1$G$9!#(B

-- 
Computer Institute of Japan, Ltd.
$B:4F#@59((B masahiro@cij.co.jp

$B$_$&$i$H?=$7$^$9!#(J

$B@nC<$5$s!":4F#$5$s(JRes$B$"$j$,$H$&$4$6$$$^$9!#(J

>$B2hLL(J($B%U%)!<%`(J)$B$N%$%a!<%8$r$=$N$^$^0u:~$9$k%3%^%s%I$,(JVB$B$K$"$k$H;W$$$^$9!#(J
>$B%3%^%s%IL>$O!"(J"PrintForm"($BB?J,(J)$B!#>\:Y$O!"%^%K%e%"%kEy$r;2>H$7$F2<$5$$!#(J

PrintForm$B$O;n$7$F$_$?$N$G$9$,!"%U%)!<%`$K(JBOC$B$N(JINPUTMAN$BEy$N%3%s%H%m!<%k(J
$B$rE=$jIU$1$F$$$k0Y!"$=$NItJ,$,%3%T!<$G$-$^$;$s$G$7$?!#(J

>  $B$3$N8e!"0J2<$N%3!<%I$r<B9T$7$^$9!#(J
> 
> Dim P as StdPicture
> Set P = Clipboard.GetData(vbCFBitmap)
> 
>  $B8e$O!"$3$N(J Picture $B%*%V%8%'%/%H$r0u:~$9$l$P$$$$$o$1$G$9!#(J

$B$3$A$i$NJ}K!$O;n$7$F$$$J$$$N$G!"$3$A$i$NJ}K!$r;n$7$F$_$?$$$H;W$$$^$9!#(J

$B$"$j$,$H$&$4$6$$$^$7$?(Jm(__)m

-- 
$B!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v(J
                         $B$_$&$i$^$3$H(J
                 e-mail: miura@ics.co.jp
URL: http://www.edp.eng.tamagawa.ac.jp/~miura/
$B!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v(J

$B$_$&$i$H?=$7$^$9!#(J

$B$5$i$K<ALd$G$9!&!&!&(J

Sato Masahiro <masahiro@cij.co.jp> wrote in article
<64r10u$8fk@cij-gw.ykhm.cij.co.jp>...
> In article <01bcf359$a5f3f9c0$e63a18ca@k4miura.ics.co.jp>, Makoto Miura
wrote:

>  $B$3$N8e!"0J2<$N%3!<%I$r<B9T$7$^$9!#(J
> 
> Dim P as StdPicture
> Set P = Clipboard.GetData(vbCFBitmap)
> 
>  $B8e$O!"$3$N(J Picture $B%*%V%8%'%/%H$r0u:~$9$l$P$$$$$o$1$G$9!#(J

$B$3$N!"(JPicture $B%*%V%8%'%/%H$r%S%C%H%^%C%W$N%$%a!<%8$G0u:~$9$k$N$O!"(J
$B$I$&$d$l$P$$$$$N$G$7$g$&$+!)(J


-- 
$B!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v(J
                         $B$_$&$i$^$3$H(J
                 e-mail: miura@ics.co.jp
URL: http://www.edp.eng.tamagawa.ac.jp/~miura/
$B!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v(J

$B0,C+!J$"$-$d!K$H?=$7$^$9!#(J

Makoto Miura <miura@ics.co.jp> wrote in article
<01bcf69a$b18aee80$e63a18ca@k4miura.ics.co.jp>...

Microsoft Internet News $B$r$4MxMQ$K$J$k>l9g$O!"(J
	http://www.niji.or.jp/home/metu/msin.html
$B$J$I$r$4Mw$K$J$C$F!"@_Dj$r$7D>$7$F$+$i$4;HMQ2<$5$$!#(J

> > Dim P as StdPicture

$B$3$3$O!"(JStdPicture$B$G$J$/!"(JPicture$B$GBg>fIW$G$9!#(J
StdPicture$B$O!"C1FH$G!J(Jnew $B%-!<%o!<%I$G!K?7$7$$(J
$B%$%s%9%?%s%9$r:n$k$H$-$K;H$$$^$9!#(J
$B!J$@$+$i!"<B:]$K$O!"(JStdPicture$B$r;H$&5!2q$OA4$/$"$j$^$;$s!#!K(J

> > Set P = Clipboard.GetData(vbCFBitmap)
> > $B8e$O!"$3$N(J Picture $B%*%V%8%'%/%H$r0u:~$9$l$P$$$$$o$1$G$9!#(J
> $B$3$N!"(JPicture $B%*%V%8%'%/%H$r%S%C%H%^%C%W$N%$%a!<%8$G0u:~(J
> $B$9$k$N$O!"$I$&$d$l$P$$$$$N$G$7$g$&$+!)(J

Printer$B%*%V%8%'%/%H$K$O(JPaintPicture$B%a%=%C%I$,$"$j$^$9!#(J
$B$=$l$r;H$&$N$,4JC1$G$7$g$&!#(J

----------------------------------------------
		$B:9=P?M(J:	$B0,C+(J $B;0O:(J
		E-Mail:	akiya@cmpk.or.jp

In article <01bcf693$10942160$e63a18ca@k4miura.ics.co.jp>, Makoto Miura wrote:
>PrintForm$B$O;n$7$F$_$?$N$G$9$,!"%U%)!<%`$K(BBOC$B$N(BINPUTMAN$BEy$N%3%s%H%m!<%k(B
>$B$rE=$jIU$1$F$$$k0Y!"$=$NItJ,$,%3%T!<$G$-$^$;$s$G$7$?!#(B
($B>JN,(B)
>$B$3$A$i$NJ}K!$O;n$7$F$$$J$$$N$G!"$3$A$i$NJ}K!$r;n$7$F$_$?$$$H;W$$$^$9!#(B

 $B;d$N5-=R$7$?FbMF$O!"%9%/%j!<%sA4BN$N0u:~J}K!$G$9!#(B
$B%U%)!<%`$N0u:~$K$D$$$F$O!"(BMicrosoft $B$N(B Web Page $B$+$i!"!V(BPrintForm $B$r(B
$B;H$o$J$$%U%)!<%`%$%a!<%8$N0u:~!W$H$$$&%5%s%W%k%W%m%0%i%`$rF@$k$3$H$,(B
$B$G$-$k$h$&$J$N$G!"$=$A$i$r;29M$K$9$k$3$H$r$*4+$aCW$7$^$9!#(B

http://download.jp.microsoft.com/developer/vbasic/Resource/BIN/PrnFrmEx.EXE

 $B$A$J$_$K!"(B

In article <01bcf69a$b18aee80$e63a18ca@k4miura.ics.co.jp>, Makoto Miura wrote:
>$B$3$N!"(BPicture $B%*%V%8%'%/%H$r%S%C%H%^%C%W$N%$%a!<%8$G0u:~$9$k$N$O!"(B
>$B$I$&$d$l$P$$$$$N$G$7$g$&$+!)(B

 Picture $B%*%V%8%'%/%H$N0u:~J}K!$K$D$$$F$O!"(BBooks Online $B$N!V(BProfession
Edition $B%W%m%0%i%_%s%0%,%$%I(B 16.5.2 Printer $B%*%V%8%'%/%H$r;H$C$?0u:~!W(B
$B$J$I$K5-=R$5$l$F$$$^$9!#Nc$($P!"0J2<$N$h$&$K=q$-$^$9!#(B

Set P = Clipboard.GetData
Printer.PaintPicture P, 0, 0
Printer.EndDoc

-- 
Computer Institute of Japan, Ltd.
$B:4F#@59((B masahiro@cij.co.jp

$B$3$s$K$A$O!"$_$&$i$H?=$7$^$9!#(J

$B:4F#$5$s!"0,C+$5$s(JRes$B$"$j$,$H$&$4$6$$$^$9(Jm(__)m

>Microsoft Internet News $B$r$4MxMQ$K$J$k>l9g$O!"(J

$B@_Dj$r$7$F$J$+$C$?$b$N$G!&!&!&(J(^^;
$B$9$_$^$;$s!#(J

Sato Masahiro <masahiro@cij.co.jp> wrote in article
<653nir$lbg@cij-gw.ykhm.cij.co.jp>...

>  $B;d$N5-=R$7$?FbMF$O!"%9%/%j!<%sA4BN$N0u:~J}K!$G$9!#(J
> $B%U%)!<%`$N0u:~$K$D$$$F$O!"(JMicrosoft $B$N(J Web Page $B$+$i!"!V(JPrintForm $B$r(J
> $B;H$o$J$$%U%)!<%`%$%a!<%8$N0u:~!W$H$$$&%5%s%W%k%W%m%0%i%`$rF@$k$3$H$,(J
> $B$G$-$k$h$&$J$N$G!"$=$A$i$r;29M$K$9$k$3$H$r$*4+$aCW$7$^$9!#(J
> 
>
http://download.jp.microsoft.com/developer/vbasic/Resource/BIN/PrnFrmEx.EXE

$B$J$k$[$I!&!&!&(J
$B$5$C$=$/#D#L$7$F$_$^$9!#(J

>  $B$A$J$_$K!"(J
> 
>  Picture $B%*%V%8%'%/%H$N0u:~J}K!$K$D$$$F$O!"(JBooks Online $B$N!V(JProfession
> Edition $B%W%m%0%i%_%s%0%,%$%I(J 16.5.2 Printer $B%*%V%8%'%/%H$r;H$C$?0u:~!W(J
> $B$J$I$K5-=R$5$l$F$$$^$9!#Nc$($P!"0J2<$N$h$&$K=q$-$^$9!#(J
> 
> Set P = Clipboard.GetData
> Printer.PaintPicture P, 0, 0
> Printer.EndDoc

$B&U(J(..$B%a%b%a%b(J
PaintPicture$B$H$$$&$b$N$,$"$C$?$N$G$9$M!#(J
$B$"$j$,$H$&$4$6$$$^$7$?!#(Jm(__)m



-- 
$B!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v(J
                         $B$_$&$i$^$3$H(J
                 e-mail: miura@ics.co.jp
URL: http://www.edp.eng.tamagawa.ac.jp/~miura/
$B!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v!v(J