はっきりやりたい内容がわからないのですが、

        PictureBox1.Location = New Point(clng(Label1.text),0)

ということがやりたいんでしょうかね？