vb.net - 最小 Vb.net 表单大小

Question

我们可以缩小表格尺寸小于132和高度小于38的宽度吗？请帮帮我。

这是代码：

For i As Integer = 0 To meWidth
    If (Me.Width > 0) Then
        Me.Width = Me.Width - 20
        Me.Refresh()
        For FadeCount = 40 To 40 Step 20
            Me.Opacity = FadeCount / 100
            Threading.Thread.Sleep(10)
        Next
    Else
        Exit For
    End If
Next

Answer 1

您可以使用属性定义最小表单大小Form.MinimumSize。检查有关它的 MSDN 文档。

基本上：

此属性使您能够将表单的大小限制为指定的最小大小。您可以使用此功能来防止用户将窗口大小调整为不希望的大小。如果此属性设置为高度为 0，宽度为 0 的 Size 对象，则窗体将没有超出 Windows 设置的限制的最小尺寸。

Answer 2

我在任何地方都找不到这个答案，我想分享我的解决方案：

Me.Text = ""
Me.ControlBox = False
Me.FormBorderStyle = Windows.Forms.FormBorderStyle.None
Me.MinimumSize = New System.Drawing.Size(1, 1) 'HERE IS MY FIX
Me.Size = New System.Drawing.Size(200, 23)

通过默认情况下不允许MinimumSize属性保持在 (0,0)，它似乎已经为我清除了这个错误。

Answer 3

你可以控制最小尺寸：示例

    Dim MinWidth As Integer = 396
    Dim MinHeigh As Integer = 369

    If Me.Width <= MinWidth Then
        Me.Width = MinWidth
    End If


    If Me.Height <= MinHeigh Then
        Me.Height = MinHeigh
    End If