Something

Private Sub tmrEnemyLeft_Timer()
    If blnShit = True Then
        picEnemy.Left = picEnemy.Left - 2 ' Move 2px Left til End
    End If
        If picEnemy.Left = 0 Then
            tmrEnemyLeft.Enabled = False
            tmrEnemyLeft.Interval = 0
            blnShit = False
            tmrEnemyRight.Enabled = True
        End If
    
    
    txtDebug.Text = txtDebug.Text & "Enemy Position = " & picEnemy.Left & vbCrLf
End Sub

Private Sub tmrEnemyRight_Timer()
    If blnShit = False Then
        picEnemy.Left = picEnemy.Enabled + 2 ' Move 2px Right til End
    End If
        
    If picEnemy.Left = 264 Then
        tmrEnemyLeft.Enabled = True
        blnShit = True
        tmrEnemyRight.Enabled = False
    End If
    
    txtDebug.Text = txtDebug.Text & "Enemy Position = " & picEnemy.Left & vbCrLf
End Sub