第一问答网»论坛 › 中问网 › 问答 › vb问题，请问，选择File1中所列的图片文件（*.bmp,*.gif ...

vb问题，请问，选择File1中所列的图片文件（.bmp,.gif和*.jpg）,则相应的图片显示在图片框Picture1中

11 |

1 | 2011-11-14 07:25:37 | 显示全部楼层 |阅读模式

Private Sub Dir1_Change()File1.Path = Dir1.PathEnd SubPrivate Sub Drive1_Change()Dir1.Path = Drive1.DriveEnd SubPrivate Sub File1_Click()
pathName = IIf(Right(File1.Path, 1) = "\", File1.Path & File1.FileName, File1.Path & "\" & File1.FileName)
Picture1.Picture = LoadPicture(pathName)End Sub张志...

使用道具举报