ªð¦^¦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 : §ïÅܦۤv¬O¦Û±Ï¡A¼vÅT§O¤H¬O±Ï¤H¡C
ªð¦^¦Cªí ¤W¤@¥DÃD