Im Moment sieht es nur so aus wenn ich nun noch eine Anweisung dort einfügen würde, zeit er mir im dazu gehörendenden aufgerüfenden Bild nichts mehr an da das VBA-Modul offensichtlich zu voll ist ..

Private Sub Form_Current()

If Me!Firma = "Activision" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\activision.png"

ElseIf Me!Firma = "Electronic Arts" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\ea.png"

ElseIf Me!Firma = "Selectsoft Publishing" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\ss.png"

ElseIf Me!Firma = "Eidos Interactive" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\eidos.png"

ElseIf Me!Firma = "HypeTrain Digital" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\hypertrain.png"

ElseIf Me!Firma = "Micro Prose" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\microprose.png"

ElseIf Me!Firma = "Play-publishing" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\playpub.png"

ElseIf Me!Firma = "Unbekannt" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\unbekannt.png"

ElseIf Me!Firma = "Bigben Interactive" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\bigben.png"

ElseIf Me!Firma = "2XL Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\2xl.png"

ElseIf Me!Firma = "PopCap Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\popcap.png"

ElseIf Me!Firma = "Sierra Entertainment" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\sierra.png"

ElseIf Me!Firma = "Studio 3DO" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\3do.png"

ElseIf Me!Firma = "Chico State Game Studios" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\csgs.png"

ElseIf Me!Firma = "POGO Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\pogo.png"

ElseIf Me!Firma = "1C Company" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\1c.png"

ElseIf Me!Firma = "Robot Gentleman" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\robotg.png"

ElseIf Me!Firma = "Bigfish Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\bigfish.png"

ElseIf Me!Firma = "Phenomedia Publishing GmbH" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\pheno.png"

ElseIf Me!Firma = "Emobi Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\emobi.png"

ElseIf Me!Firma = "Z-Axis Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\zaxis.png"

ElseIf Me!Firma = "Gears for Breakfast" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\gfb.png"

ElseIf Me!Firma = "NIS America Inc" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\nis.png"

ElseIf Me!Firma = "Coffee Stain Publishing" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\csp.png"

ElseIf Me!Firma = "Arcen Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\arcen.png"

ElseIf Me!Firma = "Misfits Attic Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\ma.png"

ElseIf Me!Firma = "Flying Turtle Software" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\fts.png"

ElseIf Me!Firma = "Ubisoft" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\ubisoft.png"

ElseIf Me!Firma = "GameArt Studio GmbH" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\gas.png"

ElseIf Me!Firma = "Origo Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\origo.png"

ElseIf Me!Firma = "Lumenox Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\lume.png"

ElseIf Me!Firma = "Mindscape" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\mind.png"

ElseIf Me!Firma = "21st Century Entertainment" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\21stce.png"

ElseIf Me!Firma = "Devolver Digital" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\devolver.png"

ElseIf Me!Firma = "Zylom" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\zylom.png"

ElseIf Me!Firma = "Sega" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\sega.png"

ElseIf Me!Firma = "Darkstar Games Ltd" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\darkstar.png"

ElseIf Me!Firma = "Steam Plattform" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\steam.png"

ElseIf Me!Firma = "Namco Bandai Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\namco.png"

ElseIf Me!Firma = "Dynamix Inc." Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\dynamix.png"

ElseIf Me!Firma = "Data Design Interactive" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\ddi.png"

ElseIf Me!Firma = "RageSquid" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\rage.png"

ElseIf Me!Firma = "Aeonic Entertainment Ltd" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\aeonic.png"

ElseIf Me!Firma = "Gremlin Interactive" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\gremlin.png"

ElseIf Me!Firma = "Since Idea Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\sig.png"

ElseIf Me!Firma = "Unosquare" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\unosquare.png"

ElseIf Me!Firma = "Coktel Vision" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\coktel.png"

ElseIf Me!Firma = "NevoSoft" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\nevosoft.png"

ElseIf Me!Firma = "Majesco Entertainment" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\majesco.png"

ElseIf Me!Firma = "Time Warner Interactive" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\twi.png"

ElseIf Me!Firma = "Guts Department" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\guts.png"

ElseIf Me!Firma = "Creaky Lantern Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\clg.png"

ElseIf Me!Firma = "Kraisoft Entertainment" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\kraisoft.png"

ElseIf Me!Firma = "Nicolas Entertainment Group" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\neg.png"

ElseIf Me!Firma = "Crian Soft" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\criansoft.png"

ElseIf Me!Firma = "Interactive Television Entertainment" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\itm.png"

ElseIf Me!Firma = "Deep Silver" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\deepsilver.png"

ElseIf Me!Firma = "YFC Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\yfc.png"

ElseIf Me!Firma = "Madmind Studio" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\mms.png"

ElseIf Me!Firma = "bitComposer Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\bit.png"

ElseIf Me!Firma = "Trimark Interactive" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\trimark.png"

ElseIf Me!Firma = "Big City Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\bcg.png"

ElseIf Me!Firma = "bhv Software GmbH" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\bhv.png"

ElseIf Me!Firma = "Divo Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\divogames.png"

ElseIf Me!Firma = "Interactive Magic" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\img.png"

ElseIf Me!Firma = "Global Star Software Inc" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\gss.png"

ElseIf Me!Firma = "Disney Interactive" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\disney.png"

ElseIf Me!Firma = "Microsoft Game Studios" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\mgs.png"

Else

If Me!Firma = "THQ" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\thq.png"

Else

If Me!Firma = "RTL Playtainment" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\rtl.png"

Else

If Me!Firma = "dtp Entertainment" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\dtp.png"

Else

If Me!Firma = "Merge Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\mergegames.png"

Else

If Me!Firma = "Maximum Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\maximum.png"

Else

If Me!Firma = "Acclaim Entertainment" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\aklaim2.png"

Else

If Me!Firma = "COR Entertainment" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\cor.png"

Else

If Me!Firma = "Team17 Digital LTD" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\team17.png"

Else

If Me!Firma = "DoubleGames" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\double.png"

Else

If Me!Firma = "CI Games S.A." Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\cig.png"

Else

If Me!Firma = "Sigma Team Inc" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\sigma.png"

Else

If Me!Firma = "Kalypso Media" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\kalypso.png"

Else

If Me!Firma = "PomPom Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\pompom.png"

Else

If Me!Firma = "Like Dynamite GmbH" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\ld.png"

Else

If Me!Firma = "3000AD" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\3000.png"

Else

If Me!Firma = "PQube Limited" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\pcube.png"

Else

If Me!Firma = "Square Enix" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\se.png"

Else

If Me!Firma = "Atari" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\atari.png"

Else

If Me!Firma = "Tri Synergy" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\trisyn.png"

Else

If Me!Firma = "Bohemia Interactive" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\boh.png"

Else

If Me!Firma = "Brash Entertainment" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\brash.png"

Else

If Me!Firma = "Bloober Team SA" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\bloober.png"

Else

If Me!Firma = "Curve Digital" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\curve.png"

Else

If Me!Firma = "Spicy Horse" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\horse2.png"

Else

If Me!Firma = "United States Army" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\usarmy.png"

Else

If Me!Firma = "WinUAE" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\winuae.png"

Else

If Me!Firma = "Moonlight Mouse Games Studio" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\mmouse.png"

Else

If Me!Firma = "Rovio Entertainment" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\rovio.png"

Else

If Me!Firma = "BadLand Publishing" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\badland.png"

Else

If Me!Firma = "Black Shell Media" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\black.png"

Else

If Me!Firma = "Fish Eagle" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\fisheagle.png"

Else

If Me!Firma = "The Digital Lounge" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\tdl.png"

Else

If Me!Firma = "BSK Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\bsk.png"

Else

If Me!Firma = "Ascaron Entertainment GmbH" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\ascaron.png"

Else

If Me!Firma = "Data Design Interactive" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\ddi.png"

Else

If Me!Firma = "Konami Digital Entertainment" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\konami.png"

Else

If Me!Firma = "Alientrap Games Inc" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\alien.png"

Else

If Me!Firma = "Massive Development" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\massdev.png"

Else

If Me!Firma = "Eko Software" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\eko.png"

Else

If Me!Firma = "JoWooD Entertainment" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\jowood.png"

Else

If Me!Firma = "Bit Blot LLC" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\bitblot.png"

Else

If Me!Firma = "Akimbo Creations" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\akimbo.png"

Else

If Me!Firma = "7th Level Inc" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\7th.png"

Else

If Me!Firma = "BlueByte" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\blue.png"

Else

If Me!Firma = "Midway Studios" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\midway.png"

Else

If Me!Firma = "Duaik Entretenimento" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\duaik.png"

Else

If Me!Firma = "Targem Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\targem.png"

Else

If Me!Firma = "LucasArts Entertainment" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\lucasarts.png"

Else

If Me!Firma = "Ganymede Technology LLC" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\gany.png"

Else

If Me!Firma = "NovaLogic Inc" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\novalogic.png"

Else

If Me!Firma = "3DO Company" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\3do.png"

Else

If Me!Firma = "576 media" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\576.png"

Else

If Me!Firma = "Jarhead Games Inc" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\jarhead.png"

Else

If Me!Firma = "Koei Tecmo Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\koei.png"

Else

If Me!Firma = "Hapa Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\hapa.png"

Else

If Me!Firma = "Endemic Interactive" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\ei.png"

Else

If Me!Firma = "Annapurna Interactive" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\anna.png"

Else

If Me!Firma = "Rondomedia" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\rondo.png"

Else

If Me!Firma = "Playism" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\playism.png"

Else

If Me!Firma = "Infogrames" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\info.png"

Else

If Me!Firma = "Ogre Head Studio" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\ohs.png"

Else

If Me!Firma = "Emme Interactive" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\emme.png"

Else

If Me!Firma = "Brighter Minds Media Inc" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\bmm.png"

Else

If Me!Firma = "Interplay Entertainment" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\interplay.png"

Else

If Me!Firma = "Windstorm Studios" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\windstorm.png"

Else

If Me!Firma = "Legendo Entertainment" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\legendo.png"

Else

If Me!Firma = "Bandai Namco Entertainment" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\bandai.png"

Else

If Me!Firma = "Magnussoft Deutschland GmbH" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\magnussoft.png"

Else

If Me!Firma = "Microids" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\micro.png"

Else

If Me!Firma = "DreamCatcher Interactive" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\dreamcatcher.png"

Else

If Me!Firma = "Aussieguy" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\aussi.png"

Else

If Me!Firma = "Data Design Interactive" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\ddi.png"

Else

If Me!Firma = "Davilex Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\davilex.png"

Else

If Me!Firma = "FistikTech" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\ft.png"

Else

If Me!Firma = "Rebellion" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\rebel.png"

Else

If Me!Firma = "Dear Villagers" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\dv.png"

Else

If Me!Firma = "Hasbro Interactive" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\hasbro.png"

Else

If Me!Firma = "Space Dreams Factory" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\sdf.png"

Else

If Me!Firma = "Bedtime Digital Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\bdg.png"

Else

If Me!Firma = "Skymap Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\skymap.png"

Else

If Me!Firma = "Enlight Software Ltd" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\enlight.png"

Else

If Me!Firma = "Strategy First" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\sf.png"

Else

If Me!Firma = "Digital Reality" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\digitalr.png"

Else

If Me!Firma = "Red Storm Entertainment" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\redstorm.png"

Else

If Me!Firma = "Zanza Studios LLC" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\zanza.png"

Else

If Me!Firma = "Focus Home Interactive" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\focus.png"

Else

If Me!Firma = "Kiss Ltd" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\kiss.png"

Else

If Me!Firma = "Rising Star Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\rising.png"

Else

If Me!Firma = "ROCKFISH Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\rockfish.png"

Else

If Me!Firma = "BERARTS Ltd" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\berarts.png"

Else

If Me!Firma = "Toxic Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\toxic.png"

Else

If Me!Firma = "505 Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\505.png"

Else

If Me!Firma = "Flashbulb Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\fbg.png"

Else

If Me!Firma = "Big Sugar Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\bigsugar.png"

Else

If Me!Firma = "Big Way Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\bwg.png"

Else

If Me!Firma = "Mad Dog Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\maddog.png"

Else

If Me!Firma = "Wide Right Interactive" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\wri.png"

Else

If Me!Firma = "Bit Kid Inc" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\bitkid.png"

Else

If Me!Firma = "Blini Games LLC" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\blini.png"

Else

If Me!Firma = "Altered Matter" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\am.png"

Else

If Me!Firma = "Squanch Games Inc." Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\squanch.png"

Else

If Me!Firma = "Perfect World Entertainment" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\pwe.png"

Else

If Me!Firma = "Friend & Foe Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\fandf.png"

Else

If Me!Firma = "Maple Whispering Co. Ltd." Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\mwl.png"

Else

If Me!Firma = "Unfold Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\unfold.png"

Else

If Me!Firma = "FDG Entertainment GmbH & Co. KG" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\fdg.png"

Else

If Me!Firma = "MiSou Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\misou.png"

Else

If Me!Firma = "GameHouse" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\gamehouse.png"

Else

If Me!Firma = "Deck13 Interactive" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\deck13.png"

Else

If Me!Firma = "Stingbot Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\stingbot.png"

Else

If Me!Firma = "Daedalic Entertainment" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\dedalic.png"

Else

If Me!Firma = "Acid Wizard Studio" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\acid.png"

Else

If Me!Firma = "Buka Entertainment" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\buka.png"

Else

If Me!Firma = "Screaming Villains" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\sv.png"

Else

If Me!Firma = "Considerable Content" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\cc.png"

Else

If Me!Firma = "Vivendi Universal" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\vivendi.png"

Else

If Me!Firma = "Mattel Media" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\mattel.png"

Else

If Me!Firma = "Wildtangent Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\wgames.png"

Else

If Me!Firma = "Puppy Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\puppy.png"

Else

If Me!Firma = "Warner Bros Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\wb.png"

Else

If Me!Firma = "Appsolutely Inc" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\apps.png"

Else

If Me!Firma = "Illusion Soft" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\ilu.png"

Else

If Me!Firma = "Takara Tomy" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\takara.png"

Else

If Me!Firma = "Magnussoft Deutschland GmbH" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\magnussoft.png"

Else

If Me!Firma = "Quantum Quality Productions" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\qqp.png"

Else

If Me!Firma = "City Interactive" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\city.png"

Else

If Me!Firma = "BBC British Broadcasting Corporation" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\bbc.png"

Else

If Me!Firma = "Goodhustle Studios" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\goodhustle.png"

Else

If Me!Firma = "Threaks" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\threaks.png"

Else

If Me!Firma = "Codemasters" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\codemaster.png"

Else

If Me!Firma = "Outright Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\og.png"

Else

If Me!Firma = "Sluggerfly" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\slugger.png"

Else

If Me!Firma = "Kindly Beast" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\kindly.png"

Else

If Me!Firma = "Excalibur Publishing" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\ep.png"

Else

If Me!Firma = "Praxia Entertainment Inc" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\praxia.png"

Else

If Me!Firma = "Plug In Digital" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\plug.png"

Else

If Me!Firma = "GameMill Entertainment" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\gamemill.png"

Else

If Me!Firma = "Deutschland spielt" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\deutschland.png"

Else

If Me!Firma = "Zoo Games Inc" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\zoo1.png"

Else

If Me!Firma = "Creative Edge Studio" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\ces.png"

Else

If Me!Firma = "Fusion Software" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\fusion.png"

Else

If Me!Firma = "Capcom" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\capcom.png"

Else

If Me!Firma = "2K Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\2kgames.png"

Else

If Me!Firma = "Crowbar Collective" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\crowbar.png"

Else

If Me!Firma = "Valkyrie Initiative" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\val.png"

Else

If Me!Firma = "Coffee Addict Studio" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\cas.png"

Else

If Me!Firma = "NEXT Studios" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\nextstudios.png"

Else

If Me!Firma = "Arc System Works" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\arc.png"

Else

If Me!Firma = "Targem Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\targem.png"

Else

If Me!Firma = "Virgin Interactive Entertainment" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\virgin.png"

Else

If Me!Firma = "Bulkypix" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\bulky.png"

Else

If Me!Firma = "Scientifically Proven" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\sp.png"

Else

If Me!Firma = "Terminal Reality" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\tr.png"

Else

If Me!Firma = "Doublequote Studio" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\dqs.png"

Else

If Me!Firma = "WRF Studios" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\wrf.png"

Else

If Me!Firma = "Headless Wizard" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\hw.png"

Else

If Me!Firma = "HE SAW" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\hesaw.png"

Else

If Me!Firma = "Noetic Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\noetic.png"

Else

If Me!Firma = "Relentless Software Ltd" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\rs.png"

Else

If Me!Firma = "10tacle Studios AG" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\10tacle.png"

Else

If Me!Firma = "Software Publishing Corporation" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\spc.png"

Else

If Me!Firma = "La Moustache Studio" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\lms.png"

Else

If Me!Firma = "3D Realms" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\3drealms.png"

Else

If Me!Firma = "D-Dub Software" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\ddub.png"

Else

If Me!Firma = "boobie-soft" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\bobbiesoft.png"

Else

If Me!Firma = "BBG Entertainment GmbH" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\bbg.png"

Else

If Me!Firma = "ZX Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\zxgames.png"

Else

If Me!Firma = "Lomax Software" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\lomax.png"

Else

If Me!Firma = "ReadySoft Inc" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\ready.png"

Else

If Me!Firma = "Trend Verlag" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\trend.png"

Else

If Me!Firma = "SUN MONKEY Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\sunmonkey.png"

Else

If Me!Firma = "BTR Studios" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\btr.png"

Else

If Me!Firma = "Insane Mind Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\img2.png"

Else

If Me!Firma = "CDV Software" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\cdv.png"

Else

If Me!Firma = "eGames Inc" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\egames.png"

Else

If Me!Firma = "Nobilis" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\nobi.png"

Else

If Me!Firma = "Bethesda Softworks" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\bet.png"

Else

If Me!Firma = "Neuland Multimedia" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\neuland.png"

Else

If Me!Firma = "Double Fine Productions" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\df.png"

Else

If Me!Firma = "Accolade Game" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\accolade.png"

Else

If Me!Firma = "On Deck Interactive" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\odi.png"

Else

If Me!Firma = "Rockstar Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\rockstar.png"

Else

If Me!Firma = "Simon and Schuster Interactive" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\simon.png"

Else

If Me!Firma = "Nimble Giant Entertainment" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\nimble.png"

Else

If Me!Firma = "Double six" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\dsix.png"

Else

If Me!Firma = "Ninja Monkeys Team" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\nmt.png"

Else

If Me!Firma = "SCS Software" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\scs.png"

Else

If Me!Firma = "Taito Corporation" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\taito.png"

Else

If Me!Firma = "Westwood Studios" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\westwood.png"

Else

If Me!Firma = "ValuSoft Inc" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\valu.png"

Else

If Me!Firma = "Sandlot Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\sandlot.png"

Else

If Me!Firma = "Calvino Noir Ltd" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\calvino.png"

Else

If Me!Firma = "Empire Interactive" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\empire.png"

Else

If Me!Firma = "Spotlightor Interactive" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\spotlight.png"

Else

If Me!Firma = "Temple Gates Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\templegates.png"

Else

If Me!Firma = "Game Factory Interactive" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\gfi.png"

Else

If Me!Firma = "IncaGold GmbH" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\incagold.png"

Else

If Me!Firma = "Vinci Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\vinci.png"

Else

If Me!Firma = "Reality Gameware Studio" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\rgameware.png"

Else

If Me!Firma = "SCi Entertainment" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\sci.png"

Else

If Me!Firma = "Jagex Game Studio" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\jagex.png"

Else

If Me!Firma = "dwCrew" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\dwcrew.png"

Else

If Me!Firma = "WizardWorks Group Inc" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\wizardworks.png"

Else

If Me!Firma = "Digital Dreams Entertainment LLC" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\dde.png"

Else

If Me!Firma = "Take-Two Interactive" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\take2.png"

Else

If Me!Firma = "Raven Travel Studios" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\rts.png"

Else

If Me!Firma = "The Behemoth" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\behemoth.png"

Else

If Me!Firma = "Redfire Software" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\redfire.png"

Else

If Me!Firma = "ATLUS" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\atlus.png"

Else

If Me!Firma = "Fire Hose Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\firehose.png"

Else

If Me!Firma = "Insolita Studios" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\insolita.png"

Else

If Me!Firma = "New Life Interactive LLC" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\nli2.png"

Else

If Me!Firma = "Artificial Studios Inc" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\artificial.png"

Else

If Me!Firma = "Black Sheep Studio" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\blacksheep.png"

Else

If Me!Firma = "EasyGameStation" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\egs.png"

Else

If Me!Firma = "Frima Studios" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\frima.png"

Else

If Me!Firma = "OM Entertainment" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\ome.png"

Else

If Me!Firma = "2020 Venture" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\2020v.png"

Else

If Me!Firma = "Libredia-Entertainment" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\lib.png"

Else

If Me!Firma = "Silden Company" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\silden.png"

Else

If Me!Firma = "Akupara Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\akupara.png"

Else

If Me!Firma = "InterAction Studios" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\interaction.png"

Else

If Me!Firma = "TopWare Interactive" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\topware.png"

Else

If Me!Firma = "Gatling Goat Studios" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\ggs.png"

Else

If Me!Firma = "inXile Entertainment" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\inxile.png"

Else

If Me!Firma = "Koch Media" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\kochmedia.png"

Else

If Me!Firma = "Nkidu Games Inc" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\nk.png"

Else

If Me!Firma = "Oxygen Interactive Software Ltd" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\oxygen.png"

Else

If Me!Firma = "Uppercut Games Pty Ltd" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\uppercut.png"

Else

If Me!Firma = "Alten8" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\alten8.png"

Else

If Me!Firma = "NIS America Inc" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\nis.png"

Else

If Me!Firma = "GoldenTricycle Team" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\gtt.png"

Else

If Me!Firma = "Crescent Moon Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\cmg.png"

Else

If Me!Firma = "7GAMES" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\7games.png"

Else

If Me!Firma = "Midas Interactive Entertainment Ltd" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\midas.png"

Else

If Me!Firma = "Tomkorp Company" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\tomkorp.png"

Else

If Me!Firma = "Storm in a Teacup" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\storm.png"

Else

If Me!Firma = "Eyebrow Interactive" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\eyebrow.png"

Else

If Me!Firma = "Neko Entertainment" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\neko.png"

Else

If Me!Firma = "Valve Corporation" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\valve.png"

Else

If Me!Firma = "Purple Hills" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\purple.png"

Else

If Me!Firma = "Mad About Games Studios" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\mag.png"

Else

If Me!Firma = "Mana Bomb Games Studio" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\manabomb.png"

Else

If Me!Firma = "Fair Play Labs" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\fpl.png"

Else

If Me!Firma = "NovaLogic Inc" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\novalogic.png"

Else

If Me!Firma = "Groove Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\groove.png"

Else

If Me!Firma = "Indie Games Studios" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\igs.png"

Else

If Me!Firma = "TDK Mediactive" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\tdk.png"

Else

If Me!Firma = "RTL Playtainment" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\rtl.png"

Else

If Me!Firma = "Neonchimp Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\neonchimp.png"

Else

If Me!Firma = "Rondomedia" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\rondo.png"

Else

If Me!Firma = "Viva Media" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\viva.png"

Else

If Me!Firma = "Shoebox" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\shoe.png"

Else

If Me!Firma = "Halycon Media GmbH Co.KG" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\halycon.png"

Else

If Me!Firma = "Muse Games Corp" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\musegames.png"

Else

If Me!Firma = "ClassiC Shikoukairu" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\cs.png"

Else

If Me!Firma = "Iceberg Interactive" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\iceberg.png"

Else

If Me!Firma = "Capybara Games Inc" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\capy.png"

Else

If Me!Firma = "Fox Interactive" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\fox.png"

Else

If Me!Firma = "Triangle Studios" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\triangle.png"

Else

If Me!Firma = "Scherrer Medien GmbH" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\scherrer.png"

Else

If Me!Firma = "Sunside Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\sunside.png"

Else

If Me!Firma = "Team Psykskallar Company" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\tp.png"

Else

If Me!Firma = "Wreckage Team" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\wreckage.png"

Else

If Me!Firma = "Crytek GmbH" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\crytek.png"

Else

If Me!Firma = "Starplay Productions Inc" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\starplay.png"

Else

If Me!Firma = "Studio MDHR Entertainment Inc" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\mdhr.png"

Else

If Me!Firma = "Adam Mowery" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\adamm.png"

Else

If Me!Firma = "Groupees Interactive" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\group.png"

Else

If Me!Firma = "GameTek" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\gametek.png"

Else

If Me!Firma = "JC Research Inc" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\jcr.png"

Else

If Me!Firma = "Strategic Simulations Inc" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\ssi.png"

Else

If Me!Firma = "Playism" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\playism.png"

Else

If Me!Firma = "Lexicon Entertainment" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\lexicon.png"

Else

If Me!Firma = "Mad Catz" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\madcatz.png"

Else

If Me!Firma = "Screwtape Studios" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\screwtape.png"

Else

If Me!Firma = "Three Fields Entertainment" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\tfe.png"

Else

If Me!Firma = "Paradox Interactive" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\paradox.png"

Else

If Me!Firma = "Mangled Eye Studios" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\mes.png"

Else

If Me!Firma = "Burian Media Enterprises" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\bme.png"

Else

If Me!Firma = "Phantom EFX" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\pefx.png"

Else

If Me!Firma = "Acid Wizard Studio" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\acid.png"

Else

If Me!Firma = "Black Label Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\blacklabel.png"

Else

If Me!Firma = "Wraith Entertainment" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\wraith.png"

Else

If Me!Firma = "Wild Games Studio" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\wgs.png"

Else

If Me!Firma = "Headup Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\headup.png"

Else

If Me!Firma = "Motion Twin" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\mt.png"

Else

If Me!Firma = "BadFly Interactive" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\badfly.png"

Else

If Me!Firma = "Keldyn Interactive" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\keldyn.png"

Else

If Me!Firma = "Shorebound Studios" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\sbs.png"

Else

If Me!Firma = "REL Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\relgames.png"

Else

If Me!Firma = "ONE MORE LEVEL" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\oml.png"

Else

If Me!Firma = "Ignition Entertainment" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\ignition.png"

Else

If Me!Firma = "Remedy Entertainment" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\remedy.png"

Else

If Me!Firma = "Active Zone Group" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\azg.png"

Else

If Me!Firma = "Moonray Studios" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\moonray.png"

Else

If Me!Firma = "Immanitas Entertainment GmbH" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\ie.png"

Else

If Me!Firma = "Alda Games s.r.o." Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\aldagames.png"

Else

If Me!Firma = "SOEDESCO Studios" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\soed.png"

Else

If Me!Firma = "Biart Company LLC" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\biart.png"

Else

If Me!Firma = "Digital Tribe Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\dtg.png"

Else

If Me!Firma = "USM Digital Media" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\usm.png"

Else

If Me!Firma = "Modern Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\mg.png"

Else

If Me!Firma = "Different Tuna Ltd" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\dt.png"

Else

If Me!Firma = "Nihad Nasupovic" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\nihad.png"

Else

If Me!Firma = "Psygnosis" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\psyno.png"

Else

If Me!Firma = "Digitalo Studios" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\digitalo.png"

Else

If Me!Firma = "NewState Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\nsg.png"

Else

If Me!Firma = "Dreadlocks Ltd" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\dreadlocks.png"

Else

If Me!Firma = "Marc Ecko Entertainment" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\mee.png"

Else

If Me!Firma = "Blizzard Entertainment" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\blizzard.png"

Else

If Me!Firma = "Buena Vista Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\bvg.png"

Else

If Me!Firma = "Rokapublish" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\roka.png"

Else

If Me!Firma = "Astragon Entertainment" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\astragon.png"

Else

If Me!Firma = "media Verlagsgesellschaft mbH" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\mv.png"

Else

If Me!Firma = "LSP Light & Shadow Productions" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\lsp.png"

Else

If Me!Firma = "Siberian Digital" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\siberian.png"

Else

If Me!Firma = "Blazing Griffin" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\bgriffin.png"

Else

If Me!Firma = "Iron Galaxy" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\irong.png"

Else

If Me!Firma = "Engine Software" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\enginesoftware.png"

Else

If Me!Firma = "XPEC Entertainment Inc" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\xpec.png"

Else

If Me!Firma = "Legacy Interactive Inc" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\legacyi.png"

Else

If Me!Firma = "Instinct Software Ltd" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\instinct.png"

Else

If Me!Firma = "BMU Deutschland" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\bmu.png"

Else

If Me!Firma = "Hemming AG" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\hemming.png"

Else

If Me!Firma = "GamezWorld" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\gw.png"

Else

If Me!Firma = "Revistronic" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\revistronic.png"

Else

If Me!Firma = "Annapurna Interactive" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\anna.png"

Else

If Me!Firma = "id Software Inc" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\id.png"

Else

If Me!Firma = "Dream Forge Entertainment LLC" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\df1.png"

Else

If Me!Firma = "Phoenix Games B.V." Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\phoenix1.png"

Else

If Me!Firma = "Dotemu" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\dotemu.png"

Else

If Me!Firma = "Battlefront.com" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\battlefront.png"

Else

If Me!Firma = "Cryo Interactive" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\cryo.png"

Else

If Me!Firma = "IPBuilders" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\ipb.png"

Else

If Me!Firma = "Dragonstone Software" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\dragonstone.png"

Else

If Me!Firma = "Digital Leisure Inc" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\dleisure.png"

Else

If Me!Firma = "Pathea Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\pathea.png"

Else

If Me!Firma = "Edel Interactive" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\edel.png"

Else

If Me!Firma = "Aspyr Media Inc" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\aspyr.png"

Else

If Me!Firma = "DreamWorks Interactive" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\dwi.png"

Else

If Me!Firma = "Dust Scratch Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\dsg.png"

Else

If Me!Firma = "Alkemi" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\alkemi.png"

Else

If Me!Firma = "GT Interactive Software" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\gt.png"

Else

If Me!Firma = "Isaac Nichols" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\isaac.png"

Else

If Me!Firma = "Dejobaan Games LLC" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\dejobaan.png"

Else

If Me!Firma = "Gearbox Software" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\gearbox.png"

Else

If Me!Firma = "Apogee Software" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\apogee.png"

Else

If Me!Firma = "Amplitude Studios" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\amplitude.png"

Else

If Me!Firma = "Artix Entertainment" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\artix.png"

Else

If Me!Firma = "Hitbox Team" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\hitbox.png"

Else

If Me!Firma = "Invictus Games Foundation" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\invictus.png"

Else

If Me!Firma = "PD Design Studio" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\pdds.png"

Else

If Me!Firma = "Tecmo Koei Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\koei.png"

Else

If Me!Firma = "aresarx" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\aresarx.png"

Else

If Me!Firma = "D3 Publisher" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\d3.png"

Else

If Me!Firma = "Shiny Entertainment" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\shiny.png"

Else

If Me!Firma = "robot entertainment" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\robot1.png"

Else

If Me!Firma = "EMI Records" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\emi.png"

Else

If Me!Firma = "Q-Games Ltd" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\qgames.png"

Else

If Me!Firma = "Ocean Software" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\ocean.png"

Else

If Me!Firma = "Cerasus Media" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\cm.png"

Else

If Me!Firma = "Cenega" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\cen.png"

Else

If Me!Firma = "I-Illusions" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\illu.png"

Else

If Me!Firma = "UIG Entertainment" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\uig.png"

Else

If Me!Firma = "TDZ Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\tdz.png"

Else

If Me!Firma = "MyPlayCity" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\mpc.png"

Else

If Me!Firma = "Creative Bytes Studios" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\cbs.png"

Else

If Me!Firma = "Empire Software" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\empire1.png"

Else

If Me!Firma = "G2 Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\g2.png"

Else

If Me!Firma = "CI Games S.A." Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\cig.png"

Else

If Me!Firma = "Pointsoft" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\point.png"

Else

If Me!Firma = "East Entertainment Media GmbH" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\eem.png"

Else

If Me!Firma = "Seaven Studio" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\seaven.png"

Else

If Me!Firma = "AAD Productions" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\aad.png"

Else

If Me!Firma = "CrazyFoot Gamestudio B.V." Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\cfg.png"

Else

If Me!Firma = "Crystal Depths Studio" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\crystal.png"

Else

If Me!Firma = "StarWraith 3D Games LLC" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\starwraith.png"

Else

If Me!Firma = "Black Bean" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\blackbean.png"

Else

If Me!Firma = "Nyu Media Ltd" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\nyu.png"

Else

If Me!Firma = "Kasedo Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\kasedo.png"

Else

If Me!Firma = "IVI Publishing Inc" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\ivi.png"

Else

If Me!Firma = "Maximum Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\maximum.png"

Else

If Me!Firma = "Streum On Studio" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\streum.png"

Else

If Me!Firma = "Tru Blu Entertainment" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\trublu.png"

Else

If Me!Firma = "Graphsim Entertainment Inc" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\gse1.png"

Else

If Me!Firma = "Novarama Technology S.L." Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\novarama.png"

Else

If Me!Firma = "Okomotive" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\okomotive.png"

Else

If Me!Firma = "MOD DB" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\moddb.png"

Else

If Me!Firma = "Frogster Interactive" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\frogster.png"

Else

If Me!Firma = "Studio Lights" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\lights.png"

Else

If Me!Firma = "TimeGate Studios" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\timegate.png"

Else

If Me!Firma = "Finji" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\finji.png"

Else

If Me!Firma = "Subatomic Studios LLC" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\subatomic.png"

Else

If Me!Firma = "Merit Studios Inc" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\merit.png"

Else

If Me!Firma = "Vadd games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\vadd.png"

Else

If Me!Firma = "LookAtMyGame" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\lamg.png"

Else

If Me!Firma = "GSP" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\gsp.png"

Else

If Me!Firma = "Spike Chunsoft" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\spike.png"

Else

If Me!Firma = "GSC Game World" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\gsc.png"

Else

If Me!Firma = "Flashpoint AG" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\flashpoint.png"

Else

If Me!Firma = "TOPOS Marketing GmbH" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\topos.png"

Else

If Me!Firma = "Musicbank Ltd" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\musikbank.png"

Else

If Me!Firma = "KWL Productions" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\kwl.png"

Else

If Me!Firma = "Ghostlight Ltd" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\ghostlight.png"

Else

If Me!Firma = "Fat Panda Games Studio" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\fatpanda.png"

Else

If Me!Firma = "Zoink Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\zoink.png"

Else

If Me!Firma = "BrainGame" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\brain.png"

Else

If Me!Firma = "Ripstone" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\ripstone.png"

Else

If Me!Firma = "Ace Maddox" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\amad.png"

Else

If Me!Firma = "Ankama Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\ankama.png"

Else

If Me!Firma = "Cosmi Corporation" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\cosmi.png"

Else

If Me!Firma = "BetaDwarf" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\beta.png"

Else

If Me!Firma = "Xplosiv" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\xplosiv.png"

Else

If Me!Firma = "Vancouver Film School" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\vfs.png"

Else

If Me!Firma = "Hugging Cactus Studio" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\hcs.png"

Else

If Me!Firma = "MixedBag Srl" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\mixedbag.png"

Else

If Me!Firma = "Kerberos Productions" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\kerberos.png"

Else

If Me!Firma = "Clapfoot Company" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\clapfoot.png"

Else

If Me!Firma = "Animu Game" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\animu.png"

Else

If Me!Firma = "Awaceb" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\awaceb.png"

Else

If Me!Firma = "Reptoid Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\repgames.png"

Else

If Me!Firma = "Endgame Studios Company" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\endgame.png"

Else

If Me!Firma = "Above and Beyond Technologies" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\above.png"

Else

If Me!Firma = "Forever Entertainment S.A." Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\forever.png"

Else

If Me!Firma = "Stirfire Studios" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\stirfire.png"

Else

If Me!Firma = "Irrational Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\irrational.png"

Else

If Me!Firma = "Rainy Night Creations" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\rnc.png"

Else

If Me!Firma = "Havoc Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\havok.png"

Else

If Me!Firma = "David White" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\dwhite.png"

Else

If Me!Firma = "3dfrog" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\3dfrog.png"

Else

If Me!Firma = "Over The Top Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\ottg.png"

Else

If Me!Firma = "Europress Software Ltd" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\europress.png"

Else

If Me!Firma = "GTE Entertainment" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\gte.png"

Else

If Me!Firma = "Hip Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\hip.png"

Else

If Me!Firma = "The Game Factory" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\tgf.png"

Else

If Me!Firma = "Dead Mage Inc" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\deadmage.png"

Else

If Me!Firma = "Gamepires" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\gamepires.png"

Else

If Me!Firma = "NBG Multimedia" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\nbg.png"

Else

If Me!Firma = "Blackstar Interactive GmbH" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\bsi.png"

Else

If Me!Firma = "Crystal Dynamics" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\crystal1.png"

Else

If Me!Firma = "Eros Home Entertainment" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\eros.png"

Else

If Me!Firma = "SeithCG Company" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\seithcg.png"

Else

If Me!Firma = "MAG Studios" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\magstudios.png"

Else

If Me!Firma = "GHRIAN STUDIO" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\ghrian.png"

Else

If Me!Firma = "Black Forest Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\bfg.png"

Else

If Me!Firma = "Planet Moon Studios" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\pms.png"

Else

If Me!Firma = "Chronic Logic" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\cl.png"

Else

If Me!Firma = "Team6 Game Studios B.V." Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\team6.png"

Else

If Me!Firma = "Phobic Studios" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\phobic.png"

Else

If Me!Firma = "Serious Games Interactive" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\sgi.png"

Else

If Me!Firma = "Crave Entertainment Inc" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\crave.png"

Else

If Me!Firma = "Sony Interactive Entertainment" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\sony.png"

Else

If Me!Firma = "Techland Publishing" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\techland.png"

Else

If Me!Firma = "Longbow Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\longbow.png"

Else

If Me!Firma = "GungHo Online Entertainment America Inc" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\gungho.png"

Else

If Me!Firma = "Wales Interactive" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\wales.png"

Else

If Me!Firma = "Suisoft Ltd" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\suisoft.png"

Else

If Me!Firma = "Ivy Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\ivygames.png"

Else

If Me!Firma = "Wareberd Studio" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\wareberd.png"

Else

If Me!Firma = "Wired Productions" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\wired.png"

Else

If Me!Firma = "play+smile" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\play.png"

Else

If Me!Firma = "SGS Team" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\sgs.png"

Else

If Me!Firma = "Acid Software" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\acid1.png"

Else

If Me!Firma = "DrinkBox Studios" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\drinkbox.png"

Else

If Me!Firma = "FUN Creators" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\funcreators.png"

Else

If Me!Firma = "FRONTLINE Studios Inc" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\frontline.png"

Else

If Me!Firma = "Platine Dispositif" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\pd.png"

Else

If Me!Firma = "Rage Software" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\rage1.png"

Else

If Me!Firma = "Suspicious Developments" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\sd.png"

Else

If Me!Firma = "Krealit" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\krealit.png"

Else

If Me!Firma = "Crazy Monkey Studios" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\cms.png"

Else

If Me!Firma = "Subscience Studios" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\subscience.png"

Else

If Me!Firma = "Chucklefish" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\chucklefish.png"

Else

If Me!Firma = "Fatshark" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\fatshark.png"

Else

If Me!Firma = "Defiant Development" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\defiant.png"

Else

If Me!Firma = "Flying Wild Hog" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\fwh.png"

Else

If Me!Firma = "Moon Spider Studio" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\moonspider.png"

Else

If Me!Firma = "Destructive Creations" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\destructive.png"

Else

If Me!Firma = "SFB Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\sfb.png"

Else

If Me!Firma = "Magic Bytes" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\magic.png"

Else

If Me!Firma = "Spawn Digital" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\spawn.png"

Else

If Me!Firma = "Mastiff" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\mastiff.png"

Else

If Me!Firma = "Iridon Interactive" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\iridon.png"

Else

If Me!Firma = "34BigThings srl" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\34bt.png"

Else

If Me!Firma = "Masque Publishing Inc" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\masque.png"

Else

If Me!Firma = "Ninja Theory" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\ninja.png"

Else

If Me!Firma = "TinyBuild" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\tiny.png"

Else

If Me!Firma = "Phosphor Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\phosphor.png"

Else

If Me!Firma = "WindThunder Studio" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\windthunder.png"

Else

If Me!Firma = "Gathering of Developers Inc" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\gathering.png"

Else

If Me!Firma = "Reddish Region" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\reddish.png"

Else

If Me!Firma = "Big Sandwich Games Inc" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\bsg.png"

Else

If Me!Firma = "Runic Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\runic.png"

Else

If Me!Firma = "Team Cherry" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\teamcherry.png"

Else

If Me!Firma = "Aardman Animations" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\aardman.png"

Else

If Me!Firma = "SouthPeak Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\south.png"

Else

If Me!Firma = "Upside Studios AB" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\upside.png"

Else

If Me!Firma = "Canopy Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\canopy.png"

Else

If Me!Firma = "ITE Media" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\itm.png"

Else

If Me!Firma = "KREA Medie" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\softpyra.png"

Else

If Me!Firma = "Tivola" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\tivola.png"

Else

If Me!Firma = "Winterworks GmbH" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\winterworks.png"

Else

If Me!Firma = "Game Studio 78" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\gs78.png"

Else

If Me!Firma = "Wargaming Labs" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\wgl.png"

Else

If Me!Firma = "Dark Energy Digital Ltd" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\darkenergy.png"

Else

If Me!Firma = "GameCrafterTeam" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\gct.png"

Else

If Me!Firma = "Sunscale Studios" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\sunscale.png"

Else

If Me!Firma = "Bossa Studios" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\bossa.png"

Else

If Me!Firma = "Scorpius Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\scorpius.png"

Else

If Me!Firma = "Scholastic Media" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\scholastic.png"

Else

If Me!Firma = "Blue Label Studio" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\bls.png"

Else

If Me!Firma = "Cobra Mobile" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\cobramobile.png"

Else

If Me!Firma = "X.D. Network Inc" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\xdn.png"

Else

If Me!Firma = "Ginger Labs LLC" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\ginger.png"

Else

If Me!Firma = "Nemesys Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\nemesys.png"

Else

If Me!Firma = "The Games Company" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\tgc.png"

Else

If Me!Firma = "Revolution Software Ltd" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\revo.png"

Else

If Me!Firma = "Roxor Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\roxor.png"

Else

If Me!Firma = "Zen Studios" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\zen.png"

Else

If Me!Firma = "Small Room Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\sgr.png"

Else

If Me!Firma = "Wales Interactive" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\wales.png"

Else

If Me!Firma = "Starbreeze Studios" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\starb.png"

Else

If Me!Firma = "IMGN.PRO" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\imgn.png"

Else

If Me!Firma = "wanadoo" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\wanadoo.png"

Else

If Me!Firma = "Gamecock Media Group" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\gamecock.png"

Else

If Me!Firma = "PLAYDEAD" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\playdead.png"

Else

If Me!Firma = "SnowBiteGames" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\sbg.png"

Else

If Me!Firma = "Wild Hare Entertainment LLC" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\wildhare.png"

Else

If Me!Firma = "Lucky Brograms" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\lbg.png"

Else

If Me!Firma = "BeefJack" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\beefjack.png"

Else

If Me!Firma = "ISOTX" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\isotc.png"

Else

If Me!Firma = "BluBee Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\bluebee.png"

Else

If Me!Firma = "Studio Vrtinec" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\sv1.png"

Else

If Me!Firma = "Realore Studios" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\realore.png"

Else

If Me!Firma = "terzio" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\terzio.png"

Else

If Me!Firma = "Epic MegaGames" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\epic.png"

Else

If Me!Firma = "RakeInGrass Software" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\rake.png"

Else

If Me!Firma = "Chair Game Studio" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\chair.png"

Else

If Me!Firma = "Hello Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\hello.png"

Else

If Me!Firma = "Stupid Stupid Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\stupid.png"

Else

If Me!Firma = "Thunder Lotus Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\tlg.png"

Else

If Me!Firma = "Philips Interactive Media" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\philips.png"

Else

If Me!Firma = "Knowledge Adventure Inc." Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\kadv.png"

Else

If Me!Firma = "Telltale Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\telltale.png"

Else

If Me!Firma = "Vestel A.S." Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\vestel.png"

Else

If Me!Firma = "Kerberos Productions" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\kerberos.png"

Else

If Me!Firma = "Basecamp Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\basecamp.png"

Else

If Me!Firma = "Antler Interactive" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\antler.png"

Else

If Me!Firma = "Maxis Software Inc" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\maxis.png"

Else

If Me!Firma = "Deceptive Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\deceptive.png"

Else

If Me!Firma = "Pieces Interactive" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\pieces.png"

Else

If Me!Firma = "Raw Fury Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\raw.png"

Else

If Me!Firma = "Bolverk Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\bolverk.png"

Else

If Me!Firma = "Davilex Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\davilex.png"

Else

If Me!Firma = "Playlogic Entertainment" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\playlogic.png"

Else

If Me!Firma = "Degica Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\degica.png"

Else

If Me!Firma = "Wolfiesoft" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\wolfiesoft.png"

Else

If Me!Firma = "Frontier Aja" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\frontier.png"

Else

If Me!Firma = "Kuma Reality Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\kuma.png"

Else

If Me!Firma = "Qooc Software" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\qooc.png"

Else

If Me!Firma = "Toco Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\toco.png"

Else

If Me!Firma = "Avanquest Software" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\avanquest.png"

Else

If Me!Firma = "Ataverti" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\ataverti.png"

Else

If Me!Firma = "Inspired Media Entertainment" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\ime.png"

Else

If Me!Firma = "Xseed Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\xseed.png"

Else

If Me!Firma = "Nordic Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\nordic.png"

Else

If Me!Firma = "TT Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\ttgames.png"

Else

If Me!Firma = "Reflexive Entertainment" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\reflexive.png"

Else

If Me!Firma = "Lego Media" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\lego.png"

Else

If Me!Firma = "Helvetica Scenario" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\hs.png"

Else

If Me!Firma = "Tilting Point" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\tilting.png"

Else

If Me!Firma = "Bishop Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\bishop.png"

Else

If Me!Firma = "Stardock" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\stardock.png"

Else

If Me!Firma = "BitMonster Inc" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\bitmonster.png"

Else

If Me!Firma = "Genius Products LLC" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\genius.png"

Else

If Me!Firma = "Reef Entertainment" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\reef.png"

Else

If Me!Firma = "Mastertronic Group Ltd" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\master.png"

Else

If Me!Firma = "Fig Publishing Inc" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\fig.png"

Else

If Me!Firma = "Tomorrow Corporation" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\tc.png"

Else

If Me!Firma = "Scawen Roberts" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\lfs.png"

Else

If Me!Firma = "Pixelnauts-Studios" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\pixelnauts.png"

Else

If Me!Firma = "Data Becker" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\databecker.png"

Else

If Me!Firma = "Frontier Developments" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\frontier1.png"

Else

If Me!Firma = "Asteroid Base" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\asteroid.png"

Else

If Me!Firma = "2Awesome Studio" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\2as.png"

Else

If Me!Firma = "Proud Dinosaurs" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\pdino.png"

Else

If Me!Firma = "American Laser Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\alg.png"

Else

If Me!Firma = "Load Inc" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\load.png"

Else

If Me!Firma = "Nuligine" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\nuligine.png"

Else

If Me!Firma = "Borealys Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\borealys.png"

Else

If Me!Firma = "Alder Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\alder.png"

Else

If Me!Firma = "Team Tripleslash" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\tripleslash.png"

Else

If Me!Firma = "Good Shepherd Entertainment" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\gse.png"

Else

If Me!Firma = "Piranha Interactive Publishing Inc" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\piranha.png"

Else

If Me!Firma = "VooFoo Studios Ltd" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\voofoo.png"

Else

If Me!Firma = "Softendo" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\softendo.png"

Else

If Me!Firma = "Nintendo" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\nintendo.png"

Else

If Me!Firma = "Uglysoft" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\uglysoft.png"

Else

If Me!Firma = "Encore" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\encore.png"

Else

If Me!Firma = "Breakfall" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\breakfall.png"

Else

If Me!Firma = "SuperSonic Software" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\supersonic.png"

Else

If Me!Firma = "Ysbryd Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\ysbryd.png"

Else

If Me!Firma = "Parker Brothers" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\parker.png"

Else

If Me!Firma = "Elefantopia" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\elefantopia.png"

Else

If Me!Firma = "Frostweep Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\frostweep.png"

Else

If Me!Firma = "Digital Homicide Studio" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\dhs.png"

Else

If Me!Firma = "Team Reptile" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\treptile.png"

Else

If Me!Firma = "Blast Entertainment Ltd" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\blast.png"

Else

If Me!Firma = "The Good Mood Creators" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\tgmc.png"

Else

If Me!Firma = "Ecole" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\ecole.png"

Else

If Me!Firma = "Gigawatt Studios" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\gigawatt.png"

Else

If Me!Firma = "Synetic" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\synetic.png"

Else

If Me!Firma = "Tribute Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\tribute.png"

Else

If Me!Firma = "Paleo Entertainment" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\paleo.png"

Else

If Me!Firma = "DHM Interactive" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\dhm.png"

Else

If Me!Firma = "SNK Corporation" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\snk.png"

Else

If Me!Firma = "Greenwood Entertainment Software GmbH" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\greenwood.png"

Else

If Me!Firma = "InterServ International Inc" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\interserv.png"

Else

If Me!Firma = "Flying Interactive" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\flyinginter.png"

Else

If Me!Firma = "Xibalba Studios" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\xibalba.png"

Else

If Me!Firma = "Keen Software House" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\keen.png"

Else

If Me!Firma = "Softnet" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\softnet.png"

Else

If Me!Firma = "Play Games" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\playgames.png"

Else

If Me!Firma = "The Binary Mill" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\tbm.png"

Else

If Me!Firma = "INTENIUM GmbH" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\intenium.png"

Else

If Me!Firma = "Burut Software" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\burut.png"

Else

If Me!Firma = "Calaris Studios" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\calaris.png"

Else

If Me!Firma = "Nowhere Studios" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\nowhere.png"

Else

If Me!Firma = "Little Orbit" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\littleorbit.png"

Else

If Me!Firma = "Junkfish Limited" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\junk.png"

Else

If Me!Firma = "Wales Interactive" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\wales.png"

Else

If Me!Firma = "Yard Team" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\yardteam.png"

Else

If Me!Firma = "Grip Digital s.r.o." Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\gd.png"

Else

If Me!Firma = "ARI Data CD GmbH" Then

Bildgenre.Picture = "D:\Spiele\Verwaltung\Spielebilder\firmen\ari.png"

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End If

End SubEnd Sub