Visual basic projenize 1 Adet Command Buton Açmanız Yeterli bu kodları içine kopyalayabilirsiniz.

Private Sub Command1_Click()
Set Reg = CreateObject("Wscript.Shell")
Reg.RegWrite "HKEY_CLASSES_ROOT\.abc\", ("DENE")
'Set Reg = CreateObject("Wscript.Shell")
Reg.RegWrite "HKEY_CLASSES_ROOT\DENE\DefaultIcon\", "c:\1.exe" ' icon Dosyanız
'Set Reg = CreateObject("Wscript.Shell")
Reg.RegWrite "HKEY_CLASSES_ROOT\DENE\Shell\Open\Command\", "1.exe" ' çalıştırılacak program
End Sub

.abc Dosyalarını Windowsunuz artık 1.exe programınızla çalsıtıracaktır.
basit bir dongu...