假設所有要顯示的圖片都在F:\ Gallery \文件夾中,這些文件名(不帶擴展名)輸入到Excel的壹個表格中。要求:單擊工作表中的文件名以顯示圖片\r\n1。插入image1控件\r\ n2.alt+f165438+。nprivate \ r \ n sub worksheet _ selection change(byval target as range)\ r \ n dim strx as string \ r \ n strx = " f:\ gallery \ " &;選擇。價值與價值。".jpg " \ r \ n If Dir(strX)= " " Then image 1。Picture = LoadPicture \r\n退出Sub \r\n Else \r\ n Image1。picture = load picture(strX)\ r \ n End If \ r \ n End Sub
上一篇:怎麽讀聲明?下一篇:FBS交易平臺TM5相比TM4有什麽優勢?