PDA

View Full Version : سوال: ساخت کنترل در ویژوال بیسیک



damanpak
چهارشنبه 17 اسفند 1390, 18:58 عصر
سلام به اساتید گرامی:
جالبه من تاحالا جدیدا 2تا سوال پرسیدم ولی هیچ کدوم جوابی ندادن،از طرفی هم فکر نمیکنم کسی به مشکلات من برخورد کرده باشه که نتونه حل کنید
بریم سراغ سوال:
قبلا برای پاک کردن اطلاعات تمام تکست باکس های داخل فرمم از کد زیر استفاده میکردم
Dim cnt As Control
For Each cnt In Me.Controls
If TypeOf cnt Is TextBox Then cnt.Text = Nothing
Next
حالا من توی ویژوال بیسیک دات نت یک کنترل ساختم که فقط حروف فارسی رو قبول میکنه اما نمیتونم از کد زیر جهت پاک کردن تمام اطلاعات کنترلم(تکست باکس حروف فارسی) استفاده کنم
Dim cnt As Control
For Each cnt In Me.Controls
If TypeOf cnt Is txtharf Then cnt.Text = Nothing
Next
علتش هم اینه که خاصیت تکست واسه کنترلم در پنجره خواص وجود نداره
حالا میشه کمکم کنید که چطوری خاصیت تکست رو به این پنجره اضافه کنم؟
واسه دریافت اطلاعات داخل تکستی که ساختم از این دستور استفاده میکنم
TxtChar1.TxtHarf.Text
TxtChar1 اسم UserControl منه که نقش پنل رو داره
TxtHarf اسم تکست باکسیه که داخل User control گذاشتم

فرید نجفلو
چهارشنبه 17 اسفند 1390, 19:09 عصر
به این صورت بنویسید:

Dim cnt As Object
For Each cnt In Me.Controls
If TypeOf cnt Is TxtChar1 Then CType(cnt,TxtChar1).TxtHarf.Text = ""
Next