PDA

View Full Version : سوال: انتخاب دو رقم اخر تاریخ



reza_1199
جمعه 24 دی 1395, 11:17 صبح
با عرض سلام خدمت همه دوستان و اساتید سایت
قبل از مطرح کردن سوالم بگم که من تو سایت جستجو کردم ولی اونی که خواسته من بود نتونستم پیدا کنم و واژه هایی مانند left,right,mid,انتخاب دو رقم اخر تاریخ و ...اما به نتیجه نرسیدم و مجبور به ایجاد تایپیک جدید شدم
اما سوالم من یه فیلد تاریخ دارم از نوع تکست که مقدارشو از ماژول تاریخ شمسی میگیره و تاریخ روز جاری رو در خودش ذخیره میکنه (shamsi=) حال مشکل من اینه که میخوام وقتی فوکوس رو فیلد تاریخ رفت دو رقم اخر انتخاب شده باشه ولی حذف نشه به فرض ۱۳۹۵/۱۰/۲۵ که میخوام ۲۵ انتخاب شده باشه ممنون میشم از دوستان منو راهنمایی کنن

Mehr@ban
جمعه 24 دی 1395, 15:46 عصر
سلام
یه راهنمایی کلی میکنم احتمالا کارت راه بیفته
شما باید اعداد موجود در اون فیلد رو تبدیل به رشته بکنی
بعد طبق یه ماسک یا الگو اعداد مورد نظر خودت رو انتخاب کنی
بعد انتخاب کردنشون یا باید سلکت بشن یا توی یه متغیر دیگه ریخته بشه

البته این مراحل باید توی محیط vb نوشته بشه!

mohsen1393
جمعه 24 دی 1395, 19:16 عصر
سلام دوست عزیز
براحتی با تابع mid اینکار امکان پذیر هست

reza_1199
جمعه 24 دی 1395, 19:38 عصر
از نظرات دوستان تشکر میکنم در صورت امکان اگه براتون مقدوره کد یا نمونشو برام قرار بدین ممنون میشم در مورد تابع mid من استفاده کردم ولی احتمالا یا درست ننوشتم یا جواب نداد فیلد تاریخ من از نوع تکست با فرمت 9999/99/99 می باشد بنام tarekh و من اینو نوشتم
=(mid(tarekh,7,2
اما منکه جواب نگرفتم در صورت مقدور بودن اگه ایراد داره برام اصلاح کنید ممنون

AbbasSediqi
شنبه 25 دی 1395, 00:14 صبح
از نظرات دوستان تشکر میکنم در صورت امکان اگه براتون مقدوره کد یا نمونشو برام قرار بدین ممنون میشم در مورد تابع mid من استفاده کردم ولی احتمالا یا درست ننوشتم یا جواب نداد فیلد تاریخ من از نوع تکست با فرمت 9999/99/99 می باشد بنام tarekh و من اینو نوشتم
=(mid(tarekh,7,2
اما منکه جواب نگرفتم در صورت مقدور بودن اگه ایراد داره برام اصلاح کنید ممنون


Private Sub Text0_GotFocus()
Me.Text0.Text = Shamsi()
Me.Text0.SelStart = 6
Me.Text0.SelLength = 2
End Sub


نمونه هم قرار داده شد

reza_1199
شنبه 25 دی 1395, 10:24 صبح
آقای صدیقی عالی بود ممنون

AbbasSediqi
دوشنبه 27 دی 1395, 01:35 صبح
قابلی نداشت