问题描述
我正在创建一个类似于在VB.Net中为表单添加自定义外观的应用程序 [ ^ ]但可以更多功能.
我坚持的一件事是Aerosnap.在VB.NET中有没有一种方法可以使Aerosnap像在Photoshop或iTunes中一样工作?
I''m creating an app that is kinda like Adding custom skins for Forms in VB.Net[^] but with way more features.
One thing I''m stuck on is Aerosnap. Is there a way in VB.NET to make Aerosnap work like in Photoshop or iTunes?
推荐答案
e.Graphics.FillRectangle(b，0，0，inset.Left，Height)
''请注意，数字(-14，-34)只是反复试验的数值，用于固定玻璃杯...尝试省略它们，您会明白的.
e.Graphics.FillRectangle(b，宽度-inset.Right-14，0，inset.Right，Height)
e.Graphics.FillRectangle(b，0，Height-inset.Bottom-34，Width，inset.Bottom)
结束子
结束类
e.Graphics.FillRectangle(b, 0, 0, inset.Left, Height)
'' Note the numbers ( -14, -34) are just trial-and-error values, used to fix the glass... try omitting them, you''ll get the idea.
e.Graphics.FillRectangle(b, Width - inset.Right - 14, 0, inset.Right, Height)
e.Graphics.FillRectangle(b, 0, Height - inset.Bottom - 34, Width, inset.Bottom)
End Sub
End Class
这篇关于VB.NET中的Aero Snap的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持！