VB简单图片浏览 下载 陈起 31 0 VBP 2020-05-13 23:05:23 Form1.File1.Path=Form1.Dir1.Path EndSub PrivateSubDrive1_Change() Form1.Dir1.Path=Form1.Drive1.Drive EndSub PrivateSubFile1_Click() Form1.Picture1.Picture=LoadPicture(Form1.File1.Path+"\"+Form1.File1.FileName) EndSub 立即下载 微信扫一扫:分享 微信里点“发现”,扫一下 二维码便可将本文分享至朋友圈。