You can do all those things using Graphics commands in the Paint Event handler of the PictureBox. There's a lot to learn about using Graphics commands, so if you haven't done it before it would be worth looking for a tutorial (I think DDay has one in this forum's CodeBank). To give you an idea of what the code might look like:
BBCode:Dim boa As Image = Image.FromFile(filename1) Dim cat As Image = Image.FromFile(filename2) Dim dog As Image = Image.FromFile(filename3) Private Sub PictureBox1_Paint(sender As Object, e As PaintEventArgs) Handles PictureBox1.Paint Dim g As Graphics = e.Graphics 'draw boa at position (15, 20) g.DrawImage(boa, 15, 20) 'draw cat at position 50,60 at twice actual size: g.DrawImage(cat, 50, 60, cat.Width * 2, cat.Height * 2) 'draw dog rotated 37 degrees around point 100,100: g.TranslateTransform(100, 100) g.RotateTransform(37) g.TranslateTransform(-100, -100) g.DrawImage(dog, 100 - dog.Width \ 2, 100 - dog.Width \ 2) End Sub




Reply With Quote