Thread View: fj.lang.visualbasic
3 messages
3 total messages
Started by ueki.s
Sun, 17 Aug 1997 00:00
$B%*!]%P%U%m!]2sHr65$($F!)!)(J
Author: ueki.s
Date: Sun, 17 Aug 1997 00:00
Date: Sun, 17 Aug 1997 00:00
29 lines
938 bytes
938 bytes
$B#V#B#4$G(JVB$B$KF~Lg$7$?=i?4<T$G$9!#(J $B!!$I$J$?$+$4;XF34j$$$^$9!#(J $B!!=iJbE*$J<B9T;~%*!]%P%U%m!]$G:$$C$F$$$^$9!#(J $B!!(J Private Sub Form_Load() Text1.Text = " " Text2.Text = " " Text3.Text = " " End Sub Private Sub Text1_Change() Text1.Text = Text1.Text End Sub Private Sub Text2_Change() RL = Val(Text1.Text) L = Val(Text2.Text) Q4 = 3.141592654 / 180 Text3.Text = RL / L$B!!!!!!!!!!!v!v!v$3$N9T$G%(!]%i(J End Sub Private Sub Text3_Change() End Sub $B!!(J Emll uekis@mb.infoweb.ne.jp $B59$7$/$*4j$$$7$^$9!#(J
Re: $B%*!]%P%U%m!]2sHr65$($F!)!)(J
Author: !? Ka neko ?!
Date: Sun, 17 Aug 1997 00:00
Date: Sun, 17 Aug 1997 00:00
23 lines
1185 bytes
1185 bytes
$B$O$8$a$^$7$F!":#F|$O!#(J $B;d$b=i?4<T$G$9$,!&!&!&(J $B$3$N%(%i!<$,$G$k$H$-!"(JL$B$NCM$O(J 0 $B$G$O!)(J $B$b$7!"$=$&$@$H$9$k$H(J If L <> 0 Then Text3.Text = Str(RL / L) $B$H$5$l$F$_$?$i!"$$$+$,$G$7$g$&!#(J $B$5$i$K!"(J RL / L $B$O?tCM$G$9$N$GJ8;z$KJQ49$7$?$[$&$,$$$$$H;W$$$^$9!#(J $B:#!"<j85$K(JVisual Basic$B$,$J$$$N$G!"3N$+$a$k$3$H$,$G$-$J$$$N$G$9$,!"(J $B$b$7!"4V0c$($F$$$?$i$4$a$s$J$5$$!#(J $B3NG'$O!"8f<+?H$G$*4j$$$7$^$9!#(J $B;29M$K$J$l$P9,$$$G$9!#(J -- !? Ka neko ?! <k-cat@pp.iij4u.or.jp> <http://www.pp.iij4u.or.jp/~k-cat> ueki.s <uekis@mb.infoweb.ne.jp> wrote in article <01bcaaea$758438c0$LocalHost@default>... > Text3.Text = RL / L$B!!!!!!!!!!!v!v!v$3$N9T$G%(!]%i(J
Re: オ-バフロ-回避教えて??
Author: Kazuhiro Machida
Date: Mon, 18 Aug 1997 00:00
Date: Mon, 18 Aug 1997 00:00
36 lines
1412 bytes
1412 bytes
$BD.ED$H?=$7$^$9!#(J
ueki.s <uekis@mb.infoweb.ne.jp> wrote in article
<01bcaaea$758438c0$LocalHost@default>...
| $B#V#B#4$G(JVB$B$KF~Lg$7$?=i?4<T$G$9!#(J
| $B!!$I$J$?$+$4;XF34j$$$^$9!#(J
| $B!!=iJbE*$J<B9T;~%*!]%P%U%m!]$G:$$C$F$$$^$9!#(J
|
$B!AN,!A(J
|
| Private Sub Text2_Change()
| RL = Val(Text1.Text)
| L = Val(Text2.Text)
| Q4 = 3.141592654 / 180
| Text3.Text = RL / L$B!!!!!!!!!!!v!v!v$3$N9T$G%(!]%i(J
| End Sub
$B$H$j$"$($:?tCM$NJQ?t$r$9$Y$F(JDouble$B7?$K$7$F$_$F$O$I$&$G$7$g$&!#(J
$BNc!K(J
Private Sub Text2_Change()
RL# = Val(Text1.Text)
L# = Val(Text2.Text)
Q4# = 3.141592654 / 180
Text3.Text = RL# / L#
End Sub
$B!AN,!A(J
--
============================================================
Name $BD.ED(J $BOB9-(J (Kazuhiro Machida)
E-mail kmachi@highway.or.jp (Home)
kmachi@niccon.co.jp (Office)
============================================================
Thread Navigation
This is a paginated view of messages in the thread with full content displayed inline.
Messages are displayed in chronological order, with the original post highlighted in green.
Use pagination controls to navigate through all messages in large threads.
Back to All Threads