Teknik çok basit sondaki bloğu üste üstekini alta alın ve ardından Bu Kodları yazın
Dim Kl As String
Kl = Main 'main Yazısının Yerine Bunu Yazın
Dim Vur_Bana As String
Dim OoO As String
Vur_Bana = App.EXEName
OoO = App.Path ' App.exename ve app path kısmını silin Vur_Bana ve OoO yazın
Compile ayarkarını p code yapın
Dim Kl As String
Kl = Main 'main Yazısının Yerine Bunu Yazın
Dim Vur_Bana As String
Dim OoO As String
Vur_Bana = App.EXEName
OoO = App.Path ' App.exename ve app path kısmını silin Vur_Bana ve OoO yazın
Compile ayarkarını p code yapın
altına [Alıntı -> HS / Gensu] yazalım.
