خوب ما می تونین این نوشته رو در یک کلید رجیستری ذخیره کنین یا اونو در یک فایل متنی کنار برنامه ذخیره کنین !
برای ایجاد فایل متنی می تونین از کدهای زیر استفاده کنین : (داخل رویداد کلیک Command1 قرار بدین)
رجیستری چون آنتی ها گیر میدن و شاید براتون پیچیده باشه توضیح ندادم ولی خواستین بگین ...
ضمنا" در کد بالا یه فایل متنی بنام parsicoders کنار برنامه تون ایجاد میشه که خاصیت overwrite داره یعنی هر دفعه جایگزین فایل قبلی میشه. داخلش هم متن داخل Text1 نوشته میشه.
برای ایجاد فایل متنی می تونین از کدهای زیر استفاده کنین : (داخل رویداد کلیک Command1 قرار بدین)
کد:
Set fso = CreateObject("Scripting.FileSystemObject")
Set MytxtFile = fso.CreateTextFile("parsicoders.txt",true)
MytxtFile.WriteLine (Text1)
MytxtFile.Closeرجیستری چون آنتی ها گیر میدن و شاید براتون پیچیده باشه توضیح ندادم ولی خواستین بگین ...
ضمنا" در کد بالا یه فایل متنی بنام parsicoders کنار برنامه تون ایجاد میشه که خاصیت overwrite داره یعنی هر دفعه جایگزین فایل قبلی میشه. داخلش هم متن داخل Text1 نوشته میشه.
باید حرف زورو نشنوم کر شم فقط -- تو نه رفیق ریگی نیست به کفشم نترس
نه ، نه من تروریست نیستم -- من رو کاغذ می بازم ولی تئوری نیستم
باید دردای دلمو و تو دلم چال کنم -- تا چشمای من یه روزی یهویی خیس شن
نه ، نه من تروریست نیستم -- من رو کاغذ می بازم ولی تئوری نیستم
باید دردای دلمو و تو دلم چال کنم -- تا چشمای من یه روزی یهویی خیس شن