tagCANDY CGI VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板
VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板
[ツリー表示へ]  [ワード検索]  [Home]

タイトル Re^6: formにスクロールバーをつける方法
投稿日: 2010/11/03(Wed) 19:11
投稿者クロ
花ちゃんさん ありがとうございます。

> 下記を追加したのではだめですか?
>
> Private Sub Form_Resize()
>    If Me.WindowState = 2 Then
>       Me.WindowState = 0
>       Me.Width = 8000   '好みの初期値に設定
>       Me.Height = 6000
>    End If
> End Sub

Form1しかないものではうまくいきましたが、MDIFormを使ってる
ものではうまくいかず、画面いっぱいとなり、今までと同じでした。
そこでためしにMeの部分をMDIFormに以下のようにしましたが結果は同じでした。
対処方法はありますでしょうか?

Private Sub MDIForm1_Resize()
   If MDIForm1.WindowState = 2 Then
      MDIForm1.WindowState = 0
      MDIForm1.Width = 8000      '好みの初期値に設定
      MDIForm1.Height = 6000
   End If
End Sub

またForm1しかなくうまく制限がかかった場合でも、動作として一度画面一杯に
表示されてから設定された大きさになりました。
画面一杯にらなずに一気に設定値に変化させることはできますか?

   

- 関連一覧ツリー をクリックするとツリー全体を一括表示します)

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