Question Producing "slide" effect

[jay_hl]

Hi

I'm very new to this so please bear with me and I apologise if I have put this in the wrong section.

I am trying to produce the effect of a projector screen (side on) sliding downwards and want to achieve this by the screen (narrow rectangle) changing its height, waiting, changing its height again so it looks like its sliding.

I have formed this code for the button but for the life of my cannot work out why it won't work. I am using Visual Studio 2008.

Dim Sleep As Integer = 500

Threading.Thread.Sleep(Sleep)
RectangleShape1.Height = 60
Threading.Thread.Sleep(Sleep)
RectangleShape1.Height = 70
Threading.Thread.Sleep(Sleep)
RectangleShape1.Height = 80
Threading.Thread.Sleep(Sleep)
RectangleShape1.Height = 90
Threading.Thread.Sleep(Sleep)
RectangleShape1.Height = 100


Thanks for your assistance.

 

[JohnH]

Use a Timer where you set Height += 10. When Height is enough stop the Timer.

 

[jay_hl]

Ive been trying to get to the bottom of this but am now more confused as:

GroupBox1.Top works
GroupBox.Height Doesn't work
RectangleShape1.Top Doesn't work
RectangleShape1.Height Doesn't work

Anyone shed some more light on this please?

Thanks again