向大家请教一个关于图片显示的问题。希望能得的帮助。
问题：
我的程序是先从某个设备上抓取一张.jpg格式的图片，然后保存到本地文件夹。抓取到的图片是一张效果清晰的图片，
我在程序的界面上添加了一个PictureBox控件和Image控件，两个控件是叠放在一起的，然后在界面上的一个按钮消息函数中写了如下代码：
Button1_Click()
Picture1.Picture = LoadPicture("此处是要加载的图片的路径")
Dim i As Single
Dim j As Single
Dim x As Single
Dim y As Single
i = (Picture2.Width) / Picture1.Width
j = (Picture2.Height) / Picture1.Height
If i > j Then i = j
x = (Picture2.Width - Picture1.Width * i) / 2
y = (Picture2.Height - Picture1.Height * i) / 2
Picture2.PaintPicture Picture1.Picture, x, y, Picture1.Width * i, Picture1.Height * i
运行程序以后，图片能够根据image控件区域的大小整张图片显示，但是，显示的图片是缩小以后的整张图片，跟原图片相比有很大的失真现象，图片显示比较模糊。
想请教一下：有没有办法能够实现在控件区域内显示整张图片，而且保证不失真呢？
最好能给一点思路或者提示，先谢。期待中......
[解决办法]
image控件的代码?和image有关系吗
[解决办法]
是不是存入 控件时会有损？
[解决办法]
