• 締切済み

フォームの位置を取得したい

フォームの中に別のフォームを表示させたいのですが，親フォームの位置を取得する方法はありますか。 そうすれば，子フォーム名.Location = New Point(500, 300) とやれるのですが。

noname#185525
noname#185525

みんなの回答

  • hirotn
  • ベストアンサー率59% (147/246)
回答No.1

仔フォームからは、MdiParentプロパティで親フォームのオブジェクトが参照出来るので、そこからさらにLocationプロパティで位置を取得すればよいと思います。 frm.MDIparent.Location

全文を見る
すると、全ての回答が全文表示されます。
  1. カテゴリ
  2. [技術者向] コンピューター
  3. プログラミング・開発
  4. Visual Basic

関連するQ&A

  • コントロールの絶対位置を取得したい

    フォーム内の複数のコンテナ上にあるコントロールの絶対位置（フォーム左端からの位置）を簡単な方法で取得できないでしょうか（VB.NET）。 すべての親コンテナの相対位置を積算すればわかると思うのですが、もっと簡単な方法で取得できないでしょうか。

  • フォームの表示位置

    いつも拝見させていただき勉強しています。 VB初心者です。 親フォームから子フォームを、 loadメソッドとshowメソッドで、 よびだして表示させようとしているのですが、 フォームの位置をコントロールすることは できるのでしょうか？ 画面中央に表示させたいのですが、 左上のほうに表示されてしまいます。

  • フォームの開く位置を揃えたい。

    フォームの開く位置の不揃いを改善する方法を知らないので、ご存じの方のご指導をお願いしたいと思います。 「フォームの設定」 フォームは全て「ポップアップ」設定にしています。 「改善したいこと」 コマンドボタンでフォームを開く時、フォーム毎に開く位置が違っていて違和感を感じています。開く位置をパソコン画面中央とかに揃える設定は可能でしょうか。 「実施していること」 フォームを修正した際、フォームを開く位置が極端にずれる時などは、フォームを中央にドラッグさせフォームの「タイトルバー」を「右クリック」し、表示されたメニューから「上書き保存」を選択し実行しています。 以上ですが、宜しくお願いします。

  • VB.net フォームをなめらかに移動する方法

    フォームをなめらかに移動する方法はないでしょうか？ 以下のコードのように、Locationで位置を変更すると、カクカク移動してしまいます。 ご存知の方おしえてください。どうぞよろしくお願いいたします。 Private Sub Form1_Mousemove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles MyBase.MouseMove Dim WorkingArea As Rectangle = Screen.PrimaryScreen.WorkingArea Dim MousePos As Point = Me.PointToClient(Windows.Forms.Cursor.Position) '上に移動 If Me.Size.Height * 0.8 < MousePos.Y And Me.Location.Y > 0 Then Me.Location = New Point(Me.Location.X, Me.Location.Y - 20) End If '下に移動 If Me.Size.Height * 0.2 > MousePos.Y And (Me.Location.Y + Me.Size.Height) < WorkingArea.Height Then Me.Location = New Point(Me.Location.X, Me.Location.Y + 20) End If '左に移動 If Me.Size.Width * 0.8 < MousePos.X And Me.Location.X > 0 Then Me.Location = New Point(Me.Location.X - 20, Me.Location.Y) End If '右に移動 If Me.Size.Width * 0.2 > MousePos.X And (Me.Location.X + Me.Size.Width) < WorkingArea.Width Then Me.Location = New Point(Me.Location.X + 20, Me.Location.Y) End If End Sub

  • C# でウインド内のマウスの位置

    private void Form1_DragDrop(object sender, DragEventArgs e) { Point p = new Point(e.X, e.Y); では、ウインドウではなく、画面でのマウス位置がｐに取得されます。 ウインドウ内での位置を取得したいのですが、方法がわかりません。 よろしくお願いします。

  • JSでフォーム送信

    <script type="text/javascript"> if (navigator.geolocation) { // 現在の位置情報を取得 navigator.geolocation.getCurrentPosition( // （1）位置情報の取得に成功した場合 function (pos) { var location = pos.coords.latitude +","; location += pos.coords.longitude ; document.getElementById("location").innerHTML = location; } ); } </script> これで得られる値をフォームでPOST送信してPHPに渡す方法、分かりやすく教えて頂けないでしょうか。。

  • C#別フォームの座標が取得できません

    メインフォームとサブフォームを作って メインフォームのボタンを押すと サブフォームをメインフォームの近くに出現させるために メインフォームの座標を取得して それをサブフォームに入れて出現させたいのですが メインフォームの座標がうまく取得できません 多くに記事にthis.Locationで取得できると記載 されているのですが、Console.WriteLine();で見ると 値が0になってしまっています 何かいい方法はないでしょうか？ よろしくお願いします。

  • 別フォームのスプレッドの内容を取得したい

    VB.net2003とSPREAD for .NET Formsを使用して開発を行っています。 1つのプロジェクトに2つのフォームがあり、FormAのSPREADの内容をFormBから取得したいのですが、うまくいきません。 FormBのLoadイベントでFormAのSPREADの内容を取得するのに下記のようなコーディングを行ってみましたがだめでした。 Dim frmFormA As FormA = New FormA txtText.Text = frmFormA.スプレッド名.ActiveSheet.Cells(frmFormA.スプレッド名.ActiveSheet.ActiveRowIndex,0).Value 別フォームのSPREADの内容を取得する方法を教えてください。

  • ＶＢでフォームの中にフォームをおきたいんです

    ＥｘｃｅｌやＷｏｒｄなどで、親フォームの中に、文章やＢＯＯＫが子フォームとして複数表示して親フォーム内の範囲で移動したり、大きさを変えたりできますが、ＶＢ６．０でもこのようなフォームを作ることはできるのでしょうか？もし、できるのであれば作り方を知りたいのですがよろしくお願いします。

  • Access+VB 子フォームから親フォームを・・・

    親フォームの中にタブを置き、その中にサブフォームを置いています。 子フォーム側から、上記のサブフォームの追加許可を「はい」にしたいのですが、どのように記述したらよろしいのでしょうか？ Forms("親フォーム名").[サブフォーム名].AllowAdditions = True　 これで通りませんでした。 教えて下さい。

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する

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

質問する