VB半透明窗口效果
VB 的半透明窗口效果,做出来还挺有意思的,尤其在做悬浮工具、小工具条这类应用上,能瞬间拉高“高级感”。你只需要搞懂两个关键属性:TransparencyKey 和 Opacity,就能轻松上手。
TransparencyKey的用法比较巧妙,你可以把窗口背景设成一个特定颜色,比如Color.AliceBlue
,再把TransparencyKey
设成一样的颜色——窗口背景就透明啦,等于是“指定颜色全透明”。
Opacity就是整体透明度的控制,0 是完全透明,1 是不透明,一般调个0.7
,半透明的效果就挺自然的了。你加上点背景图,再放几个按钮,界面立马有质感。
源码结构也清晰:Form1.frm
负责窗口设计,Project1.vbp
是工程入口,还有些像.vbw
、.scc
这类辅助文件,搞 VB 的都懂,打开就能跑。
下面是关键代码段,放进Form1_Load
里就行:
Public Class Form1
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Me.TransparencyKey = Color.AliceBlue
Me.BackColor = Color.AliceBlue
Me.Opacity = 0.7
End Sub
End Class
如果你还想做拖拽、异形窗口甚至 TreeView 的半透明效果,下面这些文章也可以瞄一眼,挺多思路:
如果你手上刚好有个 VB 老项目,或者想玩点轻量级 UI 效果,这套源码还蛮值得一试的,思路清晰,改造也方便。
1.44KB
文件大小:
评论区