• ベストアンサー

VB.NETでピクチャーボックス２個のサイズを変えたい

ＶＢ.ＮＥＴ２００３です。 ホーム上に二つのピクチャーボックスを配置し、ペンやブラシで直線や文字を描きます。 二個のピクチャーボックスを上下に配置し、その境界線上にマウスをもってゆき、上下のＢＯＸサイズの比率を変えたいのですが、可能でしょうか？

質問者が選んだベストアンサー

  • ベストアンサー
回答No.1

可能ですか？ という質問であれば「可能です」で終わっちゃいますよｗ 今試せる環境がないのでイメージしながら書いてるのですが、 (A) フォームに Panel を置く。名前は Panel1 になる。これが一番下のベースになるので少し縦長にしておく。 (B) Panel1 の中に PictureBox を置く。名前は PictureBox1 になる。 (C) PictureBox1 の Dock プロパティを Top にする。PictureBox1 が Panel1 の上辺に張り付く。PictureBox1 の下辺をドラッグして大きさを適当に決める。 (D) Splitter コントロールを Panel1 の中の PictureBox1 の下の辺りに置く。名前は Splitter1 になる。 (E) Splitter1 は Panel1 の中の PictureBox1 じゃない空間で、Panel1 の左辺に張り付いてしまうので、Dock プロパティを Top にして、PictureBox1 の下辺に張り付くようにする。 (F) Panel1 の下の空いている空間に PictureBox を置く。名前は PictureBox2 になる。Dock プロパティを Fill にすると、Panel1 の下部分いっぱいに広がる。 これで実行してみると PictureBox1 と PictureBox2 の間に少し隙間があり、そこへマウスを持っていくとマウス ポインタが HSplit 状態になり、上下にドラッグすると各々のサイズが変わると思います。

kumasan38
質問者

お礼

できました。 よくぞ、簡単明瞭に説明いただけたと、ただただ感心しました。 「Panel」だとか「Splitter」などあることすら知らないで今日まできていました。 ほんとに有難うございました。感謝！感謝！です。

  1. カテゴリ
  2. [技術者向] コンピューター
  3. プログラミング・開発
  4. Visual Basic

関連するQ&A

  • ピクチャボックス内の線を選択（VB6）

    VisualBasic6.0に関する質問です． ピクチャボックス内にグラフィック描画を行い， ある線や丸のみをマウスで選択できるようにしたいと考えています． そのグラフィックがピクチャボックス内に位置する領域を記憶しておき マウスの位置がそこにきたときのみイベントを起こすという 流れで出来そうな気はしているのですが，もしやもっと 簡単な方法がVBの機能で備わっているのでは，と考えていたりします． （領域計算が面倒くさいなぁと・・・） もし，そういった機能，もしくはより簡単な方法をご存知の方が おられましたら，どうぞお教えください． よろしくお願いいたします．

  • VB2005でピクチャーボックス内の図形を移動

    VB2005のフォームにピクチャーボックスを配置して、Imageで写真を張り付けたとき、写真がピクチャーボックスの大きさよりも大きい場合にピクチャーボックス内の写真を移動させる方法ってあるのですか？現在左上の一部分しか表示されません。同時に写真の拡大縮小ってできるのでしょうか？どなたか詳しい方よろしくお願いいたします。

  • Picture box の　サイズを変更

    お世話になります。 VB6 でform1 上に Picture1 を貼付け ボタンを押すとPicture Boxのサイズを変更したいのですが 上手くサイズが変更されません。何か根本的な間違いでしょうか よろしくお願いします。 例： Yoko = 600 Tate = 480 Private Sub Command1_Click() With Picture1 .ScaleMode = 3　' .Width = Yoko .Height = Tate End With End Sub

  • ピクチャーボックスのサイズを設定する方法を教えて

    ＶＢ．ＮＥＴですでに表示済みのピクチャーボックスの サイズを変更したいのですが、どのように記述すれば良いでしょうか。 基本的なことで申し訳ありませんが、教えて頂けたら助かります。 表示済みの画像は反映されなくてかいません。 単に枠のサイズを変更したいです。

  • ピクチャボックスのサイズを状況に応じて変えたい。

    度々お世話になります。 今、ピクチャボックスに描画を行い、別のピクチャボックス上のイメージに表示しています。 描画を行う範囲はその都度異なり、それに対応するためにピクチャボックスは可能な限り大きくしてあります。ところが、イメージに表示させる段階で、描画していない部分まで表示するため、見た目が悪く、使い勝手も悪いのです。そこで、作図範囲のみを表示させたいと考えています。 やはり、ピクチャボックスのサイズをどうにかするのが先決かと思いまして質問させていただきました。できれば、作図範囲に合った大きさになるようにその都度変化させたいと思うのですが、そういった方法はありますか？ あるいは、作図範囲のみをイメージに表示する方法があればそれでも結構です。 何か良い方法があれば、御教示いただけると幸いです。 開発環境はWindows2000、VB6.0です。 宜しくお願いします。

  • VB.NET/PictureBoxのサイズ

    お世話になります。 VB.NETにて、アプリケーションの実行時にForm上のPictureBoxのサイズをマウスのドラッグで変更できるようにしたいのですが、そういったことは可能でしょうか？ Windows標準のペイントの様に、境界線をドラッグしてサイズ変更する、といったイメージです。 開発環境はVB.NET 2003 です。

  • ＶＢ２０１０Ｅｘｐｒｅｓｓの線の書き方

    ＶＢ２０１０Ｅｘｐｒｅｓｓにおいて、線を用いて パルスのような絵をきれいに描きたいのですが、どうしたらよいでしょうか？今は、 ワードのデータをペイントブラシに貼り付けて、bmpとしてファイルします。その後　ＶＢのPICTURE BOX に貼り付けています。そうしますと、にじんでしまいます。超初心者ですみません。

  • ピクチャボックスにマウス周辺画像を表示させたい

    ＶＢ2010にて、ピクチャボックスにマウス周辺画像を表示させたいのですが、 どなたかやり方を御存じないでしょうか？ 教えてください。よろしくお願いいたします。

  • ピクチャボックス内のコントロールを印刷

    VB6の質問です。 ピクチャボックスの内容を印刷したいのですがうまくいきません。 いろいろ調べてみたら文字とか画像は印刷方法あるみたいですけど ピクチャボックス内のテキストボックスやオプションボタンを印刷する方法がわかりません、、、 PaintPictureでやると白紙の状態で印刷されます。 なにかいい方法はありますでしょうか、、、

  • VB2010で、ピクチャーボックスに描いた円を消す方法を教えていただけ

    VB2010で、ピクチャーボックスに描いた円を消す方法を教えていただけませんでしょうか。 添付図のようなグラフを描いています。 マウスを動かすとカーソルもグラフライン上を移動するのですが、軌跡が残ってしまいます。 以下のコードに、karg.clear(textbox1.backcolor)と記述すると、グラフ線まで消えてしまいます。 カーソルの軌跡のみを消したいのですが、どなたか方法を御存じないでしょうか。 教えてください。よろしくお願いします。 'カーソルを描く Dim myPen As New Pen(Color.Green, 2) 'カーソルの色、太さ Dim myMatrix As New Matrix Dim karg As Graphics = Me.PictureBox1.CreateGraphics karg.Clear() Y = PsizeY / GsizeY * Me.TextBox4.Text karg.DrawEllipse(myPen, X - 5, Y + 5, 10, 10) myMatrix.Translate(0, PsizeY) '平行移動（ピクチャーボックスの高さ分,下へ平行移動） karg.Transform = myMatrix

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する

あなたにピッタリな商品が見つかる！ OKWAVEセレクト

質問する