我正在使用vb.net并希望在光标位于该图像上时增加图像的大小,但是当光标离开该图像区域时,图像应该恢复到原始大小。
我使用以下代码来增加图像的大小:
Private Sub PictureBox1_MouseHover(ByVal sender As Object, ByVal e As System.EventArgs) Handles PictureBox1.MouseHover
PictureBox1.Size = New Size(300, 250)
End Sub
我使用了默认的尺寸类,但它提供了一些不同的尺寸。
请引导我使用将图像声明为原始大小的代码,并将其声明为图片框属性。
答案 0 :(得分:2)
您可能应该加入MouseEnter
和MouseLeave
事件。 MSDN参考链接
答案 1 :(得分:2)
以下是将PictureBox调整为图像尺寸的代码:
PictureBox1.Size = PictureBox1.Image.Size
假设PictureBox的原始大小是图像大小,那么它就可以正常工作。
正如kaveman所说,MouseEnter和MouseLeave将是更好的事件来放置代码; - )
为了恢复你设置的自定义大小,你需要一些像这样的代码:(确保它不会超出范围的某个地方,比如表格之外的方法)< / p>
您需要一个变量来存储原始大小:
Dim OriginalSize as Size
然后,在用户将鼠标移到图像上方之前更改大小之前,将大小存储在变量中:(将其放在MouseEnter
事件中)
OriginalSize = PictureBox1.Size
PictureBox1.Size = New Size(300, 250)
恢复该大小是将该变量放回图片框大小的简单问题:(这属于MouseLeave
事件)
PictureBox1.Size = OriginalSize
=)