Det krävs lite registermicklande med mera så du får en länk istället för en massa kod:
Håll till godo 
http://www.vbworld.com/files/tip123.html
Trådstart#1
Hur kopplar man en filtyp till ett program mad hjälp av VB av samma typ som man skpar manuellt via "visa - mappalternativ - filtyper" ?
Tex så att filer typ txt startar "antecknigar" och nu vill jag att
filer med typen xxx skall starta program mittprogram.exe