[リストへもどる]   [VBレスキュー(花ちゃん)]
一括表示

投稿時間:2004/10/19(Tue) 10:26
投稿者名:あらじん
Eメール:
URL :
タイトル:
フォームをスクロールさせるには?
はじめて投稿させて頂く、あらじんと申します。
何分、VBを始めたばかりの超初心者ですので、質問等理解出来ない点が多いかと思いますが、
何卒、よろしくお願いします。
【参考】OS:WindowsXp/VB:VisualBasic6.0

皆様にご質問ですが、フォーム上にスクロールバーを貼り付けることは出来ないでしょうか?
と言うのも、パソコンの画面が小さいのに表示させたい項目が沢山あり過ぎて、
画面表示出来ません。Webみたいに、上下にスクロール出来れば、見やすくなるかな?と思い、
いろいろとヘルプ等を読んでみたのですが、理解出来ませんでした。
どなたか、判る方がおられましたら、よきアドバイスの程、よろしくお願いします。

投稿時間:2004/10/19(Tue) 11:50
投稿者名:旅人A
Eメール:
URL :
タイトル:
Re: フォームをスクロールさせるには?
基本はフォームに目一杯ピクチャーボックスと垂直スクロールバーを貼る。

フォームのサイズは固定。
ピクチャーボックスのサイズをフォームより大きくする。
ピクチャボックスの位置を素直スクロールバーで動かす。

以下、サンプル
Private Sub Form_Load()
  '素直スクロールバーの設定
  With VScroll1
    '最大値、最小値
    .Max = Picture1.Height - .Height
    .Min = 0

  End With
End Sub

Private Sub VScroll1_Change()
  Picture1.Top = -VScroll1.Value
End Sub

投稿時間:2004/10/19(Tue) 15:55
投稿者名:あらじん
Eメール:
URL :
タイトル:
Re^2: フォームをスクロールさせるには?
旅人Aさん、回答ありがとうございました。
さっそくサンプルをコピーしてトライしてみたところ、バッチリ出来ました。
ただ、あまりにもスクロールする範囲が小さいため、PictureBoxの下の方に書いてある
文字等がなかなか表示されません。
(PictureBoxは、フォームの倍ぐらいの大きさです)
これから、いろいろと調べてみようと思います。
また、よきヒント・アドバイス等ありましたら、ご協力のほど、よろしくお願いします。
本当にありがとうございました。


> 基本はフォームに目一杯ピクチャーボックスと垂直スクロールバーを貼る。
>
> フォームのサイズは固定。
> ピクチャーボックスのサイズをフォームより大きくする。
> ピクチャボックスの位置を素直スクロールバーで動かす。
>
> 以下、サンプル
> Private Sub Form_Load()
>   '素直スクロールバーの設定
>   With VScroll1
>     '最大値、最小値
>     .Max = Picture1.Height - .Height
>     .Min = 0
>
>   End With
> End Sub
>
> Private Sub VScroll1_Change()
>   Picture1.Top = -VScroll1.Value
> End Sub

投稿時間:2004/10/19(Tue) 18:04
投稿者名:LESIA
Eメール:
URL :
タイトル:
Re^3: フォームをスクロールさせるには?
> ただ、あまりにもスクロールする範囲が小さいため、PictureBoxの下の方に書いてある
> 文字等がなかなか表示されません。
> (PictureBoxは、フォームの倍ぐらいの大きさです)

Heightプロパティの単位はTwipsなので
SmallChangeとLargeChangeプロパティの値を大きくするとか

>   With VScroll1
>     '最大値、最小値
>     .Max = Picture1.Height - .Height
>     .Min = 0
      .SmallChange = Screen.TwipsPerPixelY '←追加
      .LargeChange = Screen.TwipsPerPixelY * 10 '←追加
>   End With

投稿時間:2004/11/01(Mon) 16:46
投稿者名:あらじん
Eメール:
URL :
タイトル:
Re^4: フォームをスクロールさせるには?
LESIAさん、返事が遅くなり申し訳ございませんでした。
回答ありがとうございました。さっそく実験してみたとろこ、バッチリ上手くいきました。
これからもいろいろとトライしてみて、問題が発生した場合、質問すると思いますので
何卒、ご協力のほど、よろしくお願いします。
皆様方のアドバイスがあるおかげで、VB初心者の私でも楽しく開発が出来ます。

投稿時間:2004/11/01(Mon) 16:41
投稿者名:あらじん
Eメール:
URL :
タイトル:
続:フォームをスクロールさせるには?
こんにちは。
また、上記タイトルと同じ質問をさせて頂きたく、メールした次第です。
以前、回答を頂き、トライしてみたところバッチリ上手く処理出来たのですが、
また壁にぶち当たってしまいました。(>_<)
どなたか良きアドバイス等ございましたら教えて下さい。
どうかよろしくお願いします。

 【質問】
 下記図のように、フォームの中ほどにPictureBoxを設定した場合、
 スクロールバー(▼)をクリックすると、PictureBoxがFormの一番上まで移動してしまいます。
 もし可能なら、PictureBoxの位置はこのままで、移動(スクロール)させることは出来ないの
 でしょうか?
 もし分かる方がおられましたら、教えて頂きたい。
 私自身も、あれこれトライしているのですが、上手く行きません。
 どうか、よろしくお願いします。


|----------------------------------------------
|                    form1
| テスト
|
| |----------------------------|--|
| |                            |▼|スクロールバー
| |                            |--|
| |                            |  |
| |     PictureBox             |  |
| |                            |  |
| |                            |--|
| |----------------------------|▲|
|

投稿時間:2004/11/01(Mon) 18:02
投稿者名:nanashi
Eメール:
URL :
タイトル:
Re: 続:フォームをスクロールさせるには?
>  スクロールバー(▼)をクリックすると、PictureBoxがFormの一番上まで移動してしまいます。
>  もし可能なら、PictureBoxの位置はこのままで、移動(スクロール)させることは出来ないの
>  でしょうか?


PictureBoxの中にPictureBoxを入れて、中のPictureBoxを動かせばイイと思います。

投稿時間:2004/11/02(Tue) 09:50
投稿者名:あらじん
Eメール:
URL :
タイトル:
お礼
nanashiさん、回答ありがとうございました。
さっそくトライしてみたところ、バッチリ上手くいきました。
本当にありがとうございました。
これを使って、開発していきたいと思いますので、今後ともよきアドバイスの程、
よろしくお願いします。