Vb.net 窗体边框样式

编写了以下代码以生成具有厚边框的窗体。但是我的表格上的边框太薄了（见下图）。我是不是搞错了？…或者这就是厚边界的样子？有人能帮忙吗？同样在代码中，当我从FixedDialog更改为Fixed3D时，表单的imafe是相同的——没有任何更改！！！这不可能是对的

我写的代码：

Imports System.Windows.Forms
Imports System.Drawing
Module Module1
    Sub Main()
        Dim form1 As New Form()
        form1.FormBorderStyle = FormBorderStyle.FixedDialog
        Application.Run(form1)
    End Sub
End Module

---

您可能遇到windows视觉主题的问题。如果你真的想在视觉元素（如boarders）方面变得时髦，我会关闭它们并手动绘制它们，可以使用图像或绘制事件。Swindows 10希望用户选择的桌面主题驱动UI外观。可以进行定制，但这并不简单。你会发现大多数主题都是针对XP的，不容易翻译，因为Windows10主题的数据与XP msstyles不同。我尝试了SkinSoft的视觉样式器，但遇到了与DLL相关的问题。我对CodeJock的解决方案也有问题。对于边框，使用自定义绘制事件可能是最简单的。如果将FormBorder设置为“无”，则顶部栏也将消失，并且您必须实现用于移动、调整大小等的自定义控件。Windows 10中的自定义视觉样式可能是一个真正的蠕虫，而且似乎没有任何像以前XP中那样适合开发人员的优秀主题化解决方案。这是可以做到的，但并不简单。