Ok, try this:

Make a project with 2 forms, form1 and form2.

On Form1 you have all your buttons in a control array so that you have Command1(0) to Command1(29)

Set all your images to all your Command1().Picture properties (either at design time manually or at runtime with automation).

On form2 you have 1 image in a crontrol array, Image1(0)

Now

Form1 code=

VB Code:
  1. Private Sub Command1_Click(Index As Integer)
  2.     Form2.LoadNewImage (Index)
  3. End Sub

And Form2 Code =
VB Code:
  1. Public Sub LoadNewImage(ByVal Index As Integer)
  2.    
  3. Dim iCount As Integer
  4.    
  5.     iCount = Image1.Count
  6.     Load Image1(iCount)
  7.    
  8.     Image1(iCount).Top = Image1(iCount - 1).Top + Image1(iCount - 1).Height + 100
  9.     Image1(iCount).Left = Image1(iCount - 1).Left
  10.     Image1(iCount).Picture = Form1.Command1(Index).Picture
  11.     Image1(iCount).Visible = True
  12.  
  13. End Sub