🚀 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
///////////////////////////////////