OKWAVEのAI「あい」が美容・健康の悩みに最適な回答をご提案!
-PR-
締切り
済み

vb5.0で解像度によって画面の大きさおかえたいのですが

  • すぐに回答を!
  • 質問No.208325
  • 閲覧数167
  • ありがとう数1
  • 気になる数0
  • 回答数3
  • コメント数0

お礼率 23% (40/169)

640x480で、画面設計をおこなっています。

800x600と1024x768の時に画面を大きくしたいのですが

全体的におおきくしたいのです。  どうすればいいのか教えてください。

1024x768で画面設計して、640x480にちいかくもできますか。

両方ためして、きれいほうをしようとおもうのですが
通報する
  • 回答数3
  • 気になる
    質問をブックマークします。
    マイページでまとめて確認できます。

回答 (全3件)

  • 回答No.1

起動時のウィンドウを表示する前に、解像度を取得して、サイズ変更してあげればいいのではないでしょうか? その際にOnSizeイベントで、中のエディットボックスなどのコンポーネントのサイズも一緒に変更するようにすれば、比較的きれいに見えると思います。 同時に、OnSizeイベントで、最小のウィンドウサイズなども決めることができるので、あるサイズ以上は画面が汚くなるとかそういった理由で制限をかけるこ ...続きを読む
起動時のウィンドウを表示する前に、解像度を取得して、サイズ変更してあげればいいのではないでしょうか?

その際にOnSizeイベントで、中のエディットボックスなどのコンポーネントのサイズも一緒に変更するようにすれば、比較的きれいに見えると思います。

同時に、OnSizeイベントで、最小のウィンドウサイズなども決めることができるので、あるサイズ以上は画面が汚くなるとかそういった理由で制限をかけることも可能ですよ。ただし、コンポーネントが多いとOnSizeイベントを書くのが大変になりますが・・・

ではでは☆


  • 回答No.2
レベル13

ベストアンサー率 59% (729/1235)

VS-Resizerという市販OCXがお勧めです。 コントロールのサイズ調整・位置調整を自動的にやってくれます。 ...続きを読む
VS-Resizerという市販OCXがお勧めです。
コントロールのサイズ調整・位置調整を自動的にやってくれます。
  • 回答No.3
レベル7

ベストアンサー率 58% (7/12)

screen.Heightで画面の縦幅が取れます。 それを利用して画面の比率を取得して全体的に大きく(または小さく)できます。 下記に簡単なサンプルを記述します。 Private Sub Form_Load() Dim MyCtl Dim Ratio As Double Dim Resize As Boolean Ratio = Screen.He ...続きを読む
screen.Heightで画面の縦幅が取れます。
それを利用して画面の比率を取得して全体的に大きく(または小さく)できます。

下記に簡単なサンプルを記述します。

Private Sub Form_Load()
Dim MyCtl
Dim Ratio As Double
Dim Resize As Boolean

Ratio = Screen.Height / 11520

For Each MyCtl In Form1
Resize = False
If TypeOf MyCtl Is TextBox Then
Resize = True
ElseIf TypeOf MyCtl Is Label Then
Resize = True
ElseIf TypeOf MyCtl Is CommandButton Then
Resize = True
End If
If Resize Then
MyCtl.Top = MyCtl.Top * Ratio
MyCtl.Left = MyCtl.Left * Ratio
MyCtl.Width = MyCtl.Width * Ratio
MyCtl.Height = MyCtl.Height * Ratio
End If
Next
Form1.Height = Form1.Height * Ratio
Form1.Width = Form1.Width * Ratio
End Sub


この場合の 11520 は 1024 X 768 時のScreen.Height
の値です。

ですが、この方法ですとフォントサイズによっては
テキストボックスが重なったり横幅が足りなくなったり
とするので、最小サイズを基準とする方が見栄えがいいです。
このQ&Aで解決しましたか?
関連するQ&A
-PR-
-PR-
こんな書き方もあるよ!この情報は知ってる?あなたの知識を教えて!
このQ&Aにはまだコメントがありません。
あなたの思ったこと、知っていることをここにコメントしてみましょう。

その他の関連するQ&A、テーマをキーワードで探す

キーワードでQ&A、テーマを検索する
-PR-
-PR-
-PR-

特集


いま みんなが気になるQ&A

関連するQ&A

-PR-

ピックアップ

-PR-
ページ先頭へ