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

タイトル SendToBack、BringToFrontが期待通りの動きにならない
投稿日: 2007/11/12(Mon) 11:50
投稿者レイン
初めまして、いつも拝見させて頂いております。

・環境
 VB2005
  XP SP2

・現状
 ZOrderの代わりになる物を探していた所
 SendToBack、BringToFrontがある事が分かりました。
 いくつかのピクチャーボックスをコード上で配置し、
 SendToBack、BringToFrontで期待通りの動きになりません。
 ・下記再現コードで赤色を付けたピクチャーボックス(pic2)を
  最前面に表示したかった。

・質問
 赤色を付けたピクチャーボックスをZOrder 0(最前面)の状態にするには
 どうしたらいいでしょうか?

宜しくお願いします。m(_ _)m

Public Class Form1
    '1
    Private pic1(0) As System.Windows.Forms.PictureBox
    '2
    Private pic2(0) As System.Windows.Forms.PictureBox

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Me.pic1(0) = New System.Windows.Forms.PictureBox
        With Me.pic1(0)
            .Size = New Size(50, 50)
            .Left = 50
            .Top = 50
            '青色を付ける
            .BackColor = Color.Blue
      '最背面に表示する
            .SendToBack()
            .Visible = True
        End With
        Me.Controls.AddRange(Me.pic1)

        Me.pic2(0) = New System.Windows.Forms.PictureBox
        With Me.pic2(0)
            .Size = New Size(50, 50)
            .Left = 75
            .Top = 75
      '赤色を付ける
            .BackColor = Color.Red
      '最前面に表示する
            .BringToFront()
            .Visible = True
        End With
        Me.Controls.AddRange(Me.pic2)

    End Sub
End Class

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

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