vb中图像框有Autoradrew属性吗

Question

如题所述

Answer 1

Image（图像框）控件是没有AutoRedraw属性的。

只有窗体和PictureBox（图片框）控件才有AutoRedraw属性，也就是说只有能用各种绘图命令（如PSet、Line、Circle、Print等）直接在上面绘图的容器控件才有AutoRedraw属性。

Answer 2

将图片框的 AutoSize 属性设置为 True。这样控件将自动调整大小以适应加载的图形。

Answer 3

窗体上放两个PictureBox，一个CommandButton
在Picture1中载入一个图标文件
运行时按Command1，在Picture2中显示的就是这种与操作后的图片了

&HC56A31是选中对象的默认颜色，如果你没改过的话

这只能做为例子参考，效果我知道，不甚满意

Visual Basic code
?
1
2
3
4
5
6
7
8
9
10
11
12
Private Sub Command1_Click()
For i& = 0 To Picture1.ScaleWidth Step Screen.TwipsPerPixelX
For j& = 0 To Picture1.ScaleHeight Step Screen.TwipsPerPixelY
icolor& = Picture1.Point(i, j)
If icolor <> &HFFFFFF Then Picture2.PSet (i, j), icolor And &HC56A31
Next j
Next i
End Sub

Private Sub Form_Load()
Picture1.BackColor = &HFFFFFF
End Sub