我在线发现了一些代码,为我的表单添加了阴影效果 - 效果很好,为我的应用程序增添了一丝专业性。
代码如下所示:
Protected Overrides ReadOnly Property CreateParams() As System.Windows.Forms.CreateParams
Get
Const DROPSHADOW = &H20000
Dim cParam As CreateParams = MyBase.CreateParams
cParam.ClassStyle = cParam.ClassStyle Or DROPSHADOW
Return cParam
End Get
End Property
我的问题是,当我第一次启动此表单时,会出现投影。但是,如果我单击此表单,则阴影消失(正如预期的那样,它不再是焦点的形式)。但是当我单击返回到表单时,投影效果永远不会返回到表单。
我能实现这一目标的唯一方法是使用Form.TopMost = True,然而,这使得表单在每个其他窗口打开时都不是我想要的。我只希望它在我的应用程序中最顶层。我甚至使用过Form.ShowDialog()和Form.ShowDialog(Me),但都有相同的效果。
在这方面是否存在,因为仅仅几秒钟添加这个漂亮的功能真是太遗憾了。
任何帮助/建议表示赞赏。