Article View: fj.lang.visualbasic
Article #8Re: VB4.0$B$G(J JPEG$B!"(J GIF$B$O07$($^$9$+(J
From: BJvEh J BIRI J
Date: Mon, 27 Apr 1998 00:00
Date: Mon, 27 Apr 1998 00:00
33 lines
2162 bytes
2162 bytes
Masahiro IZUHARA <izuha@hitachi-ns.co.jp> wrote in article
> LoadPicture$B$G(JPictureBox$B$K(Jjpg$B$d(Jgif$B$rI=<($5$;$h$&$H$7$?$i!"(J
> $B!V%T%/%A%c$,IT@5$G$9!W$N<B9T;~%(%i!<$K$J$j$^$7$?$,!#(J
> $B$I$&$d$C$FI=<($5$;$?$N$G$9$+(J?
$B$=$&$J$s$G$9$+!#;d$NJ}$G$O$G$-$k$s$G$9$,2?$,0c$&$+$O(J
$B$o$+$j$^$;$s!#(JVB4.0$B$O(J3$BF|L\$G$9$+$i$M!#(J
$B$d$C$F$$$k$3$H$O(JForm1$B$K(JPictureBox$B$rE=$jIU$1$F0J2<$N(J
$BMM$K$7$F$$$k$@$1$G!"#B#M#P$N;~$HJQ$j$^$;$s!#(JVB2.0 $BF|K\(J
$B8lHG$G$O!V%T%/%A%c$,IT@5$G$9!W$K$J$j$^$9$M!#(J
Private Sub File1_DblClick()
If Right(File1.Path, 1) <> "\" Then
' $B%k!<%H(J $B%l%Y%k0J30$N>l9g(J(\)$B$rDI2C(J
Label1.Caption = File1.Path & "\" & File1.filename
Else
' $B%k!<%H(J $B%l%Y%k$N>l9g(J
Label1.Caption = File1.Path & File1.filename
End If
' $BA*Br$7$?%T%/%A%c!<(J $B%U%!%#%k$r%m!<%I$7$^$9!#(J
Form1.open.Picture = LoadPicture(Label1.Caption)
End Sub
$B$A$J$_$K(JVB4.0$B$GI=<($9$k$@$1$J$i(JJPEG$B!"(JGIF$B$b$G$-$k$C$F(J
$B$$$&>pJs$O#V#B=i?4<TM'$N2q$N#Q!u#A7G<(HG$G$$$?$@$-$^(J
$B$7$?!#=P86$5$sF1MM$G$-$J$$$H$$$&?M$b$$$^$7$?!#(J
$B$H$K$+$/$=$N0c$$$,$h$/$o$+$j$^$;$s!##3#2(Jbit$BHG$N(JProfessional
$B$G$J$$$H%@%a$J$N$+$J!#(J
OS$B$O(JWin95$B$NF|K\8lHG$G$9!#(J
$B#A#P#I$J$I$N8F$S=P$7$O$7$F$^$;$s!#(J
$B$"$H(JVB4.0$B$@$1$8$c$@$a$G!"#I#E$J$I$,F~$C$F$?$j$9$k$H$G$-$k$N(J
$B$+$b$7$l$^$;$s$M!#(J
Technical Details
Message-ID:
<01bd71b0$a2812f80$8e178da3@minesima>Path:
arc1-ca.pugleaf.net!unknown!not-for-mailReferences:
<01bd6f3f$fb3c55a0$8e178da3@minesima> <6hp9h3$lat$1@apx.hitachi-ns.co.jp> <01bd7192$93793500$8e178da3@minesima> <6i12jn$3hv$1@apx.hitachi-ns.co.jp>Show Full Headers
Complete Article Headers
X-Google-Language: Japanese,JIS X-Google-Thread: 105c2e,8a1d159b2ef76368 X-Google-Attributes: gid105c2e,public X-Google-Thread: 107824,1dc7be3ad621b3ee X-Google-Attributes: gid107824,public From: "$BJvEh(J $BIRI'(J" <minesima@epson.co.jp> Subject: Re: VB4.0$B$G(J JPEG$B!"(J GIF$B$O07$($^$9$+(J Date: 1998/04/27 Message-ID: <01bd71b0$a2812f80$8e178da3@minesima> X-Deja-AN: 348019955 References: <01bd6f3f$fb3c55a0$8e178da3@minesima> <6hp9h3$lat$1@apx.hitachi-ns.co.jp> <01bd7192$93793500$8e178da3@minesima> <6i12jn$3hv$1@apx.hitachi-ns.co.jp> Organization: $B%(%W%=%s%=%U%H3+H/%;%s%?!<(J Newsgroups: fj.lang.visualbasic,fj.comp.lang.visualbasic