VB4.0$B$G$N(JRS-232C$BDL?.J}K!65$($F2<$5$$(J

Article View: fj.lang.visualbasic

Article #1410

Back to fj.lang.visualbasic Previous Next

#1410

From: 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

Technical Details

Message-ID: <01bcbdd8$1fb56b20$f702090a@process8.bmd.konica.co.jp>

Path: arc1-ca.pugleaf.net!unknown!not-for-mail

Show Full Headers

Complete Article Headers

X-Google-Language: Japanese,JIS
X-Google-Thread: 105c2e,d0073dc80a231dea,start
X-Google-Attributes: gid105c2e,public
From: "$BF#ED!!?52p(J" <shin.fujita@konica.co.jp>
Subject: VB4.0$B$G$N(JRS-232C$BDL?.J}K!65$($F2<$5$$(J
Date: 1997/09/10
Message-ID: <01bcbdd8$1fb56b20$f702090a@process8.bmd.konica.co.jp>
X-Deja-AN: 271396156
Organization: $B%3%K%+(J($B3t(J)
Newsgroups: fj.lang.visualbasic

Article View: fj.lang.visualbasic

VB4.0$B$G$N(JRS-232C$BDL?.J}K!65$($F2<$5$$(J

VB4.0$B$G$N(JRS-232C$BDL?.J}K!65$($F2<$5$$(J