图像失真问题
用picturebox显示图片，假如按原始图片大小显示没有问题，但稍微缩小下图片就不清楚了，尤其是上面的字好像变形了有什么方法解决，是用GDI函数什么的吗？
我测试了下系统自带的图片浏览器如果缩小的话，效果还是很好的，没有我自己这个变形厉害，估计用什么优化算法

[解决办法]

Public Declare Function SetStretchBltMode Lib "gdi32" (ByVal hdc As Long, ByVal nStretchMode As Long) As Long
Public Declare Function StretchBlt Lib "gdi32" (ByVal hdc As Long, ByVal X As Long, ByVal Y As Long, ByVal nWidth As Long, ByVal nHeight As Long, ByVal hSrcDC As Long, ByVal XSrc As Long, ByVal YSrc As Long, ByVal nSrcWidth As Long, ByVal nSrcHeight As Long, ByVal dwRop As Long) As Long

picTmp.Picture = LoadPicture(……)
SetStretchBltMode pic.hdc, 4
Call StretchBlt(pic.hdc, 0, 0, pic.Width, pic.Height, picTmp.hdc, 0, 0, picTmp.Width, picTmp.Height, vbSrcCopy)