Attaching controls in runtime...

[Knight]

I recently converted to VB Net from VB 6 and having troubles with
adding a PictureBox to the form. I create the picturebox but it
doesn't display on my form. I have tried Controls.Add(pic)
but that doesn't work either. Any Help would be much appreciated :).

here is my code so far

Knight

Function CreateSurface(ByVal frm As Form) As PictureBox
Dim pic As New PictureBox
Dim loc As Point

loc.X = frm.Location.X
loc.Y = frm.Location.Y

pic.Name = "surface"
pic.Location = loc
pic.Left = frm.Left
pic.Top = frm.Top
pic.Width = frm.Width
pic.Height = frm.Width
pic.BackColor = Color.Black
pic.Visible = True
pic.Show()
CreateSurface = pic
End Function

[AMDRIT]

this seems to work for me
Dim pic As PictureBox
pic = New PictureBox
Me.SuspendLayout()

pic.BackColor = System.Drawing.Color.FromKnownColor(KnownColor.Bla ck)
pic.Size = New System.Drawing.Size(50, 50)
pic.BorderStyle = BorderStyle.Fixed3D
pic.Location = New System.Drawing.Point(60, 60)

Me.Controls.Add(pic)

Me.ResumeLayout()
"Knight" <wa*********@sbcglobal.net> wrote in message
news:11*********************@g43g2000cwa.googlegro ups.com...

I recently converted to VB Net from VB 6 and having troubles with
adding a PictureBox to the form. I create the picturebox but it
doesn't display on my form. I have tried Controls.Add(pic)
but that doesn't work either. Any Help would be much appreciated :).

here is my code so far

Knight

Function CreateSurface(ByVal frm As Form) As PictureBox
Dim pic As New PictureBox
Dim loc As Point

loc.X = frm.Location.X
loc.Y = frm.Location.Y

pic.Name = "surface"
pic.Location = loc
pic.Left = frm.Left
pic.Top = frm.Top
pic.Width = frm.Width
pic.Height = frm.Width
pic.BackColor = Color.Black
pic.Visible = True
pic.Show()
CreateSurface = pic
End Function

[Knight]

Thank you very much, I was missing Suspend/Resume

[Herfried K. Wagner [MVP]]

"Knight" <wa*********@sbcglobal.net> schrieb:

Thank you very much, I was missing Suspend/Resume

Mhm... This should not make such a big difference.

--
M S Herfried K. Wagner
M V P <URL:http://dotnet.mvps.org/>
V B <URL:http://classicvb.org/petition/>