ImageList - ObjImg

Hei Eksperter...

Er i gang med at lave et spil i VB... Men er lige støt på et problem...

Imagelist 'Ligger i formen "Game"
Timeren ' Ligeer i formen "Control_bomb"

Er der nogen der kan se en fejl ?

Private Sub P1_Bomb_Tid1_Timer2_Timer()
If P1_Bomb_Tid1.Text = "0" Then
        Dim objImg100 As Object
        For Each objImg100 In Controls
        If TypeOf objImg100 Is Image Then
          objImg100 = "" & "Game.a" & P1_Bomb_Placering1_Left.Text & "b" & P1_Bomb_Placering1_Top.Text & ".Picture" & "" = Game.ImageList1.ListImages(3).Picture
          objImg100.Picture = Game.ImageList1.ListImages(3).Picture
        End If
    Next
End If
end sub