🚀 go-pugleaf

$B=i$a$FEj9F$7$^$9!#(B $B0$It!w%"%k%W%9EE5$$H?=$7$^$9!#(B

  $B#V#B#5$K$*$$$F4X?t$N(B"form$B!I4XO"$NEO$7J}$GJ,$+$i$J$$E@$,$"$j$^$9$N$G$I$J$?$+(B
$B65$($F$$$?$@$1$J$$$G$7$g$&$+!#(B

$B!]!]!]!]!]!]!]!]!]!]!]!]!]!]!]!]!]!]!](B

call A( form1.check1.caption)
      |
      |
sub a(f as form)
$B$G$b(B
sub a(f)
$B$G$b!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!(B $B!!(B_    _
$B$=$NB>2r$kHO0O$G%H%i%$$r$7$^$7$?(B..............$B$,!!&D!2&D!*!!(B
$BEO$j$^$;$s(B
call$B!!(BA(form1.check1)
call  A(form1.text1)
call  A(form1.command1)
etc
$B$J$I$OEO$k$N$G$9$,(B..........

sub A(f)
 f(index).caption = "ABCDEF"
 f(index).text    = "ABCDEF"
 f(index).caption = "ABCDEF"
end sub
$B$H$$$&7?$G$O!!!!#O#K!!$J$N$G$9$,!)!)!)(B

$B#F#O#R#M#1!%"~"~"~"~!%!y!y!y!y!!(B

$B!y!y!y!y$^$GM-$k$H!!EO$j$^$;$s!!$?$V$s%H%C%W%"%I%l%9$rEO$7$F$$$k$H;W$o$l$k$N$G(B
$B$9$,(B
caption$B!"(Btext$B!!;2>H$G$-$kJ}K!$OL5$$$N$G$7$g$&$+!)(B

  $B0J>e$h$m$7$/$*4j$$$7$^$9!#(B