ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

¦p¦ó¦b¦Û©wªí³æ¤¤¶}±ÒJPGÀÉ®×

¦p¦ó¦b¦Û©wªí³æ¤¤¶}±ÒJPGÀÉ®×

¦U¦ì¤j¤j,
§Ú¦b¦Û­qªí³æ¤¤«Ø¥ß¤@­ÓCommandButton,§Æ±æ«ö¤UCommandButton«á,¯à¶}±Ò©T©w¸ô®|¤¤ªºJPGÀÉ®×,½Ð°Ý¸Ó¥Î­þ¤@­Ó«ü¥O©Î¨ç¦¡?ÁÂÁÂ

¸Ñ¨M¤F,¥»¨Ó§Ú¥u·Q­n¶}±ÒÀÉ®×,¥i¬Oµo²{icestormer ¤jªº¤èªk§ó¦n,©Ò¥H´N§ï¤F¤è¦¡,ÁÂÁÂ
§Úµ{¦¡¦p¤U:
Private Sub CommandButton6_Click()

If UserForm1.ComboBox3.Value <> "" Then
mypic = "C:\Documents and Settings\Administrator\®à­±\§Q¹F«¬¿ý\" & ComboBox1.Value & "\" & ComboBox2.Value & "\" & ComboBox3.Value & ".jpg"
UserForm3.Image1.Picture = LoadPicture(mypic)
UserForm3.Show
Else
MsgBox "½Ð¿ï¾Ü²£«~!!"
End If

End Sub

TOP

        ÀR«ä¦Û¦b : ¡i»X½ªªº¦Û¥Ñ¡j¤H±`¦b¤°»ò³£¥i¥H¦Û¥Ñ¦Û¦bªº®É­Ô¡A«o³Q³oºØÀH¤ß©Ò±ýªº¦Û¥Ñ»X½ª¡AµêÂY®É¥ú¦Ó²@µLıª¾¡C
ªð¦^¦Cªí ¤W¤@¥DÃD