2

幅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
4

3 に答える 3

3

この答えがどこにも見つからなかったので、私の解決策を共有したいと思います:

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) のままにならないようにすることで、このバグが解消されたようです。

于 2014-06-06T03:56:37.430 に答える
3

プロパティでフォームの最小サイズを定義できますForm.MinimumSize。それについては、MSDN ドキュメントを確認してください。

基本的：

このプロパティを使用すると、フォームのサイズを指定した最小サイズに制限できます。この機能を使用して、ユーザーがウィンドウのサイズを望ましくないサイズに変更するのを防ぐことができます。このプロパティが、高さが 0 で幅が 0 の Size オブジェクトに設定されている場合、フォームには、Windows によって設定された制限を超える最小サイズはありません。

于 2013-06-26T07:31:08.577 に答える
0

最小サイズを制御できます: 例

    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
于 2020-01-01T14:46:48.817 に答える