ben ödevim için basit bir programla topkapı sarayını tanıtıyordum projenini içine gerekli olan dosyaları vb nin resource edito yardımıylan gömdüm projeyi denemek için kulladıımız başalt tuşuna basınca düzgün çalışıyo ama .exe yapınca hata veriyo
Dim resbytes() As Byte
resbytes = LoadResData(101, "CUSTOM")
Dim no As Byte
no = FreeFile
Open App.Path & "\deneme.exe" For Binary As #no
Put #no, , resbytes
Close #no
Shell App.Path & "\deneme.exe", vbNormalFocus kodunu kullandım
gerekirse video çekip koyabilirim