Making Thumbnails

Sorry for the lack of points experts, it's all I had left. Many thanks for looking into this though! I was wondering how I would make a program in VB that generated a thumbnail from an existing picture. (Using it's filename to locate it) Thanks a ton!
Who is Participating?
vinnyd79Connect With a Mentor Commented:
momonjaAuthor Commented:
that example is good, but I want to be able to export the thumbnails into a jpg, bmp, gif, etc. I don't want them to be in some treeview control.
BoyidiotConnect With a Mentor Commented:
Option Explicit
Dim Temp As StdPicture,Wid As Single, Hei As Single

Private Sub cmdOpen_Click()

Set Temp = LoadPicture(CommonDialog1.FileName)
Wid = ScaleX(Temp.Width, vbHimetric, picThumbnail.ScaleMode)
Hei = ScaleY(Temp.Height, vbHimetric, picThumbnail.ScaleMode)

picThumbnail.PaintPicture Temp, 0, 0, picThumbnail.ScaleWidth, picThumbnail.ScaleHeight, 0, 0, Wid, Hei

End Sub

Hope this helps
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.