Hi,
is use this for showing JPG
Private Sub foto_BeforeDragOver(ByVal Cancel As MSForms.ReturnBoolean, ByVal Data As MSForms.DataObject, ByVal X As Single, ByVal Y As Single, ByVal DragState As MSForms.fmDragState, ByVal Effect As MSForms.ReturnEffect, ByVal Shift As Integer)
End Sub
Image2.Picture = LoadPicture("D:\" & t_range(17) & ".jpg")
is there a way to show a PNG instead of JPG?
is use this for showing JPG
Private Sub foto_BeforeDragOver(ByVal Cancel As MSForms.ReturnBoolean, ByVal Data As MSForms.DataObject, ByVal X As Single, ByVal Y As Single, ByVal DragState As MSForms.fmDragState, ByVal Effect As MSForms.ReturnEffect, ByVal Shift As Integer)
End Sub
Image2.Picture = LoadPicture("D:\" & t_range(17) & ".jpg")
is there a way to show a PNG instead of JPG?