🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: fj.lang.visualbasic
Article #102

VB$B$G(JWord95$B$X$N(JOLE$B%*!<%H%a!<%7%g%sJ}K!(J

#102
From: Takayuki Honma
Date: Tue, 12 May 1998 00:00
30 lines
1456 bytes

$B$3$s$K$A$O!"K\4V$H?=$7$^$9!#(J
VB5.0$B$G(JMS-Word95$B$X$N(JOLE$B%*!<%H%a!<%7%g%s$NJ}K!$r65$($F$/$@$5$$!#(J

$B6qBNE*$K$O!"(JWord$B%^%/%m$G$N(J

  INSERT "AAAAA"
  NextCell

$B$r(JVB$B$+$i9T$$$?$$$?$/$F0J2<$N$h$&$K$7$?$N$G$9$,!"(J3$B9TL\(J(INSERT)$B$G(J
$B!V(JOLE$B%*!<%H%a!<%7%g%s$G%5%]!<%H$5$l$F$$$J$$!W$H$$$&%(%i!<$K$J$j(J
$B$&$^$/$$$-$^$;$s$G$7$?!#(J

Dim Wobj As Object
Set Wobj = GetObject("C:\Doc01.doc", "Word.Document.6")
Wobj.INSERT "AAAAA"
Wobj.NextCell
Set Wobj = Nothing

$B@5$7$$%3!<%I$r$4B8CN$NJ}!"$h$m$7$/$*4j$$$$$?$7$^$9!#(J

                                                        $B0J>e(J

<><><><><><><><><><><><><><><><><><><><><><><><><><>
$BK\4VN4G7(J  (Takayuki.Honma)
$B3t<02q<RBgNSAH(J $B>pJs%7%9%F%`%;%s%?!<(J $B%7%9%F%`Bh#2It(J
TEL=03-5247-8611
t-honma@isc.obayashi.co.jp
<><><><><><><><><><><><><><><><><><><><><><><><><><>
Technical Details
Message-ID: <01bd7d78$3a007d20$4a0e8185@d713fp12>
Path: arc1-ca.pugleaf.net!unknown!not-for-mail

Show Full Headers
Complete Article Headers
X-Google-Language: Japanese,JIS
X-Google-Thread: 110a07,11bf7bccf4e13ad4,start
X-Google-Attributes: gid110a07,public
X-Google-Thread: 105c2e,11bf7bccf4e13ad4,start
X-Google-Attributes: gid105c2e,public
From: "Takayuki Honma" <t-honma@isc.obayashi.co.jp>
Subject: VB$B$G(JWord95$B$X$N(JOLE$B%*!<%H%a!<%7%g%sJ}K!(J
Date: 1998/05/12
Message-ID: <01bd7d78$3a007d20$4a0e8185@d713fp12>
X-Deja-AN: 352473662
Organization: OBAYASHI Corporation, Tokyo, Japan.
Newsgroups: fj.lang.visualbasic,fj.os.ms-windows.programming