🚀 go-pugleaf

$B@PED$H?=$7$^$9!#(J

> $B#1!%(JForm1$B$G;HMQ$7$F$$$kJQ?t$r(JForm2$B$G$b;HMQ$9$k(J
> $BJ}K!$r65$($F2<$5$$!#(J

  $BJQ?t$r(JForm1$B$N%b%8%e!<%k$N!J(JGeneral$B!K$G(JPublic$B$r;HMQ$7$F@k8@$7!"(J
  $BB>$N(JForm$B$+$i$3$NJQ?t$r;HMQ$9$k$H$-$K!V(JForm1.$BJQ?tL>!W$H$9$k$@(J
  $B$1$G;HMQ$G$-$^$9!#Nc$($P0J2<$N$h$&$K$7$^$9!#(J

     Form1:
         Public A as integer

         Private Sub Form_Load()
             A = 1
         End Sub

     Form2:
         Private Sub Command1 _Click()
             Msgbox Form1.A
         End Sub


> $B#2!%(JForm1$B$K(JPrint$BJ8$G2hLLI=<(FbMF$r(JForm2$B$r%*!]%W%s(J
> $B$7$F2hLLI=<($5$;$kJ}K!$r65$($F2<$5$$!#(J

  $BC1=c$K!"(JForm2$B$rI=<($7$?<!$N9T$K!V(JForm2.Print "  "$B!W$r9T$$$^$9(J

  Form1:
      Private Sub Command1 _Click()
          Form2.Show
          Form2.Print 
          Form2.Print " $B;HMQIt:`!!(J"
          Form2.Print
    End  Sub
   
    $B$?$@$7!"(JPrint$BL?Na$OC1=c$K(JForm$B$KJ8;z$rIA2h$9$k$@$1$J$N$G!"(J
    Print$B$GI=<($7$?J8;z$,B>$N%&%#%s%I%&Ey$K$h$C$F8+$($J$/$J$k$H(J
    $B<!$KI=<($7$?$H$-$K$O!"J8;z$O>C$($?$^$^$K$J$j$^$9$N$G%G%P%C%0(J
    $B$K;HMQ$9$k0J30$O$"$^$jMxMQ2ACM$,$J$$$H;W$$$^$9!#(J
    

-- 
Message ID $B$N7o$K$D$$$F$$$m$$$m$JJ}$+$i$4;XE&$,$4$6$$$^$7$?!#(J
$B65$($F$$$?$@$$$?(JHP$BEy$rMxMQ$7!"@_Dj$r$J$*$7$^$7$?!#(J
$B$_$J$5$^$"$j$,$H$&$4$6$$$^$7$?!#(J
<<<<<<<<<<<<<<<<>>>>>>>>>>>>>>>>
   $B!J3t!K%-%c%`!!%7%9%F%`It(J
                      $B@PED(J
          E-mail  Ishida@ns.cam.co.jp
///////////////////////////////////

>$B#1!%(BForm1$B$G;HMQ$7$F$$$kJQ?t$r(BForm2$B$G$b;HMQ$9$k(B
>$BJ}K!$r65$($F2<$5$$!#(B
$B%D!<%k%P!<$K$"$k!"(B.BAS$B%U%!%$%k$r:n@.$7$F!"(B
Global $BJQ?t(B As $BJQ?t$N%?%$%W(B
$B$H$9$l$P!"A4$F$N%W%m%8%'%/%H$+$i;2>H$G$-$k$h$&$K$J$j$^$9!#(B

$B!t(BIsida$B;a$N!"2rEz!"Hs>o$K;29M$K$J$j$^$9!#(B

$B!2!2!2!2!2!2!2!2!2!2!2!2!2!2!2!2(B__________$B!2!2!2!2!2!2!2!2!2!2!2!2!2!2!2!2(B
|      Witten by Takashi Niimura  $B?7B<N4(B(Mact$BmnsJ@5f=(B:$B2,EDM%51(B)
|$B!Z(BMessage$B![(B
|$B=i=q$-9~$_$G$9!"!#$I$&$>$h$m$7$/$*4j$$$7$^$9(B
| ID List$B!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!(B
| $B$l$s$3$s(BNET:REN22864   NNET:NNET0263           $BEl5~(BBBS:NIIMURA
| TMNET2:TMNET232        SAG$B%M%C%H(B:SAG10610      $B$-$^$0$l(BMPU:SAT00189
|              E-MAIL:niimura@tokyobbs.or.jp            $B!!!!!!!!!!!!!!!!!!(B
|              ANOTHER:niimura@geocities.co.jp
|     HomePage:http://www.geocities.co.jp/SiliconValley/3262/index.htm
$B!1!1!1!1!1!1!1!1!1!1!1!1!1!1!1!1!1!1!1!1!1!1!1!1!1!1!1!1!1!1!1!1!1!1!1!1!1(B