مشکل با تابع My.Settings

[rezapassword]

سلام دوستان من با این تابع مشکل دارم
ببینید من یک تایمر میزارم و بعد یک لیبل و بعد هم دو دکمه که تایمر رو فعال و غیر فعال کنه
در دکمه اول مینویسم

timer1.enabled=true
در دکمه دوم مینویسم

timer1.enabled=false
در تایمر مینویسم

label1.visible=true
حالا برای تنظیمات ذخیره دو تا متغیر میزارم به نام های vis برای خاصیت ویزیبل لیبل و en برای انیبل تایمر در هر کدام
در فروم لود می نویسم

My.Settings.Reload()
و در فروم کلوزینگ هم مینویسم

My.Settings.vis = Me.visible
My.Settings.en = Me.enable
My.Settings.Save()

حالا این تابع کار نمیکنه
لطفا راهنمایی کنید
ممنون:خجالت:

[HadiVB]

نوع type این دو متغیرتون باید bool باشه ها

[rezapassword]

bool
نگرفتم چی شد داداش

[rezapassword]

قربونتون این برا من حیاطی هست

[reza6384]

منظور HadiVB این بود که نوع متغیرهای vis و en که در Setting تعری کردین باید boolean باشه. فکر می کنم مشکل از Scope متغیر های شما در Setting باشه. اونها رو از Application به User تغییر بدین.

[rezapassword]

یه نگاه بنداز رفیق
http://i37.tinypic.com/15ob33l.png

[Dariuosh]

حالا برای تنظیمات ذخیره دو تا متغیر میزارم به نام های vis برای خاصیت ویزیبل لیبل و en برای انیبل تایمر در هر کدام
در فروم لود می نویسم

My.Settings.Reload()
و در فروم کلوزینگ هم مینویسم

My.Settings.vis = Me.visible
My.Settings.en = Me.enable
My.Settings.Save()

حالا این تابع کار نمیکنه
لطفا راهنمایی کنید
ممنون:خجالت:
اينا درست نيستن که ! شما مقادير MEرو ذخيره کردين !

[rezapassword]

پس این تابع چه طوره ؟

[Dariuosh]

پس این تابع چه طوره ؟
شما تو توضيحاتتون گفتين ميخواين Visible يه Lable و Enable يه Timerرو ذخيره کنيد ولي تو کد مقادير Meرو ذخيره کردين ، تو پست قبل قرمزشون کردم

[seeker]

این:
My.Settings.vis = Me.visible
My.Settings.en = Me.enable
My.Settings.Save()کاملا اشتباهه و من نمیفهمم یعنی چی
ولی شما باید همونطور که دوستان گفتند در setting یک متغیر از نوع بولین مثلا با اسم vis درست کنی و در فرم لود بنویسی:

if my.setting.vis=true then
me.label1.visible=true
else
me.label1.visible=false
end if
حالا توی فرم کلوز هم بنویس:

if me.label1.visible=true then
my.setting.vis=true
else
my.setting.visible=false
end if
my.setting.save

[rezapassword]

http://i35.tinypic.com/k4xe1l.png
به کد شما هم ایراد میگیرد

[rezapassword]

دوست عزیز همون طور ک گفتم من گیر این سیو هستم

[mostafaaa]

من اصلا متوجه مشکل شما نمیشم.
شما اصلا احتیاجی به کد نوشتن نداری.
یه Label با یه Button به فرمت اضافه میکنی ، توی Properties لیبلت تو قسمت
Application Setting>property Binding>Visible یه Properti جدید ایجاد میکنی و تمام .
این کد رو توی رویداد کلیک Button قرار میدی

If Me.Label1.Visible Then
Me.Label1.Visible = False
Else
Me.Label1.Visible = True
End Ifحالا یه بار که روی Button کلیک کنی لیبلت invisible میشه و به صورت اتوماتیک هم توی Setting ذخیره میشه . حالا اگه خارج بشی و دوباره بازش کنی میبینی که بازم لیبل invisible هستش.!!
اینم مثالش
22753

[rezapassword]

خیلی ممنوننم