๐Ÿš€ go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Thread View: fj.lang.visualbasic
2 messages
2 total messages Started by BFED52p J Wed, 10 Sep 1997 00:00
VB4.0$B$G$N(JRS-232C$BDL?.J}K!65$($F2<$5$$(J
#1410
Author: BFED52p J
Date: Wed, 10 Sep 1997 00:00
25 lines
1277 bytes
$BB,Dj4o$+$i(JC^0@$B$r<h$j9~$`$N$,L\E*$G$9!#(J
16K^/D$BHG$r;H$$;O$a$^$7$?!#(J

$B!!(J(1)$B!!(JMSCOMM16.OCX$B$N;H$$J}(J
$B!!(J(2)$B!!DL?.(JN_0D$B$N@_Dj!!(JComm1.Commport=1$B!"(JSettinng$B!&!&!&Ey$r5-=R$9$k$H$3$m(J
$B!!!!!!!!(JOPEN$B$N;H$$J}(J
$B!!(J(3)$B!!(JINPUT$B$G$N(JC^0@$B$N<h$j9~$_J}(J

$BMW$9$k$K2?$b$o$+$C$F$^$;$s!#(J
$B$G$-$l$P(JRS-232C$B$GB,Dj4o$+$i(JC^0@$B$r<h$j9~$`$@$1$N4JC1$J(J;]L_YL_[8^WQ$B$r(J
$BAw$C$F$$$?$@$1$k$H$&$l$7$$$N$G$9$,!&!&!&!#(J

$B$b$7$/$O!"(JN88-BASIC$B$G$$$&2<5-FbMF$r$I$3$N2hLL(J(General$B!"(JLoad$B!"(JText$B!"(JCommand
Butten$BEy(J)$B$K(J
$B5-=R$9$k$+$r65$($F2<$5$$!#(J

$B!!(J10 OPEN$B!!(J"COM1:N81NN" AS #1
  20 A$="0"
  25 PRINT #1,A$
  30 IF EOF(1) THEN 30
  40 INPUT #1,CH1$

                                 $B0J>e(J
 
Re: VB4.0ใงใฎRS-232C้€šไฟกๆ–นๆณ•ๆ•™ใˆใฆไธ‹ใ•ใ„
#1415
Author: Hiroyuki Watanabe
Date: Fri, 12 Sep 1997 00:00
34 lines
2416 bytes
>$B!!(B(1)$B!!(BMSCOMM16.OCX$B$N;H$$J}(B
$B%X%k%W$+%^%K%e%"%k$r;2>H$9$k$7$+$J$$$G$9$M!#(B

>$B!!(B(2)$B!!DL?.(IN_0D$B$N@_Dj!!(BComm1.Commport=1$B!"(BSettinng$B!&!&!&Ey$r5-=R$9$k$H$3$m(B
>$B!!!!!!!!(BOPEN$B$N;H$$J}(B
$B$3$l$O$J$s$H$b$$$($^$;$s$,!"(BForm_Load$B;~$,E,@Z$G$O$J$$$G$7$g$&$+!)(B
$B$=$l$HF1;~$K(BPortOpen$B%W%m%Q%F%#!<$r(BTrue$B$7$J$$$H$$$1$^$;$s$M!#$3$l$r$7$J$$$H$3(B
$B$A$iB&$N(BER$B$,$"$,$j$^$;$s!#(B
$B$3$l$H$O4X78$J$$$H;W$$$^$9$,!"(BRS$B$dB>$N?.9f@~$N@)8f$b$"$j$^$9!#Aj<j$N5!4o$K(B
$B$h$C$F$O?.9f@~$N@)8f$,Fq$7$$$G$9$h$M!#(B(^^)
$B%"%W%j%1!<%7%g%s$N=*N;;~$K$O(BPortOpen$B%W%m%Q%F%#!<$r(BFalse$B$K$9$k$3$H$bK:$l$:$K(B
(I%%%$B!#(BER$B$,$"$,$C$?$^$^$K$J$j$^$9!#(B

>$B!!(B(3)$B!!(BINPUT$B$G$N(IC^0@$B$N<h$j9~$_J}(B
$B$=$N%3%s%H%m!<%k$rE=$jIU$1$?$i(BOnComm$B%$%Y%s%H$,$G$-$k$O$:$G$9!#$3$N%$%Y%s%H$,(B
$B%G!<%?$NAw<u?.$d%(%i!<;~$KH/@8$9$k$N$G!J%P%C%U%!!<%5%$%:%W%m%Q%F%#!<$d%9%l%C(B
$B%7%g%k%I%W%m%Q%F%#!<$NCM$b4X78$9$k$N$G%X%k%W$+%^%K%e%"%k$r;2>H$7$F$/$@$5$$!K(B
$B$3$N%$%Y%s%HFb$G(BCommEvent$B%W%m%Q%F%#$NFbMF$r;2>H$7$F!JCM$N>\:Y$O%X%k%W$r;2(B
$B>H!K%G!<%?<u?.$N>l9g$K(BInput$B%W%m%Q%F%#!<$NFbMF$r<hF@$9$l$P$$$$$s$8$c$J$$$G(B
$B$7$g$&$+!#(B

$B!cJdB-!d(B
$B;d$b@N$O(BDOS$B>e$GF0:n$9$k(BBasic$B$GDL?.(BAPP$B$r:n$j$^$7$?$,!"$=$N$H$-$_$?$$$K%k!<%W(B
$B$7$J$,$i%]!<%H$N>uBV$r8!::$7$F%G!<%?$r<h$j9~$`MM$J%3!<%G%#%s%0$G$O$J$/!"%3%s(B
$B%H%m!<%k<+?H$,%G!<%?$r<u?.$9$k$H%$%Y%s%H$r<+F0$GH/@8$5$;$F$/$l$k$N$G!"$=$N%$(B
$B%Y%s%HFb$G=hM}$9$k$h$&$K%3!<%G%#%s%0$9$k$h$&$K9M$(J}$rJQ$($kI,MW$,$"$k$H;W$$(B
$B$^$9!#(B

$B!c:G8e$K!d(B
$B$"$^$j$*Lr$KN)$A$^$;$s$G$7$?!#$G$O!#(B


$B0J>e(B
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