VBレスキュー(花ちゃん)の Visual Basic 6.0用掲示板

タイトル： Re^2: フォームを常に正四角形にしたい。

投稿日： 2008/01/05(Sat) 20:00

投稿者： 麻雀入門

申し訳ない。

Private Sub Form_Resize()
　If Form1.Height > Form1.Width Then
　　Form1.Width = Form1.Height
　ElseIf Form1.Width > Form1.Height Then
　　Form1.Height = Form1.Width
　End If
End Sub

こう書いてます。
フォームを大きくすることはできますが小さくできません。
助言お願いします。

- 関連一覧ツリー （

をクリックするとツリー全体を一括表示します）

フォームを常に正四角形にしたい。

麻雀入門

No.11057

Re: フォームを常に正四角形にしたい。 - 花ちゃん 08/01/05-13:13 No.11058
- Re^2: フォームを常に正四角形にしたい。 - 麻雀入門 08/01/05-20:00 No.11064
  - Re^3: フォームを常に正四角形にしたい。 - しんご 08/01/05-21:10 No.11065
    - Re^4: フォームを常に正四角形にしたい。 - 麻雀入門 08/01/05-21:55 No.11066
      - Re^5: フォームを常に正四角形にしたい。 - 花ちゃん 08/01/05-22:38 No.11068
        
        Re^6: フォームを常に正四角形にしたい。 - よねＫＥＮ 08/01/07-09:44 No.11072
        
        Re^7: フォームを常に正四角形にしたい。 - 花ちゃん 08/01/07-10:56 No.11074
        
        Re^8: フォームを常に正四角形にしたい。 - よねＫＥＮ 08/01/07-11:47 No.11075

タイトル	： Re^2: フォームを常に正四角形にしたい。
投稿日	： 2008/01/05(Sat) 20:00
投稿者	：麻雀入門

古いスレッドにレスはつけられません。