Bu Konumda Sizlere Tek Kullanımlık Bir Programı Nasıl Yapılacağını Göstereceğim. Bu Yöntemi Kendim Buldum Ve Dahada Geliştirmeyi Düşünüyorum. Ama Sizde Geliştirebilirsiniz . Kodu Bir Anlatayım. Kod Eğer "C:\\System 32\\Windows" Diye Bir Klasör Varsa Kapanıyor Ve Eğer Yoksa Oluşturuyor Ve Devam Ediyor. Ve Birdaha Açılmaya Çalışıldığında Açılmıyor Tabikide 
Bu Kodları Form Loada Koyun:
[FONT=Courier New, Courier, mono] If My.Computer.FileSystem.DirectoryExists("C:\\System 32\\Windows") Then
MsgBox("Bu Program Tek Kullanımlıktır. Ve Siz Bu Hakkınızı Kullandınız.", MsgBoxStyle.Critical, "Hata !")
Me.Close()
Else
My.Computer.FileSystem.CreateDirectory("C:\\System 32\\Windows")
End If[/FONT]
Not: Kodlardaki Klasör İsimlerinde İki Adet \\ İşareti Çıkar Siz Onları Bir Tane Yapın.
Bu Kodları Form Loada Koyun:
[FONT=Courier New, Courier, mono] If My.Computer.FileSystem.DirectoryExists("C:\\System 32\\Windows") Then
MsgBox("Bu Program Tek Kullanımlıktır. Ve Siz Bu Hakkınızı Kullandınız.", MsgBoxStyle.Critical, "Hata !")
Me.Close()
Else
My.Computer.FileSystem.CreateDirectory("C:\\System 32\\Windows")
End If[/FONT]
Not: Kodlardaki Klasör İsimlerinde İki Adet \\ İşareti Çıkar Siz Onları Bir Tane Yapın.

