كنترل ماسك اديت [بایگانی]

sh2007

پنج شنبه 23 مهر 1388, 09:18 صبح

دوستان توي كنترل ماسك اديت من مي خوام يه فرمت براي تاريخ معرفي كنم اين كار رو انجام دادم توي تكست نمايش ميده __/__/____ آيا راهي هست كه اين مورد تبديل به / / شود و بتونيم اعداد رو هم تايپ كنيم من امتحان كردم اما نتونستم

غلامرضا شریفی

پنج شنبه 23 مهر 1388, 11:54 صبح

تا جائي كه من ميدونم جز عدد چيزي نميگيرد فقط Focusرا به ابتداي ماسك اديت ببريد و تاريخ را وارد نماييد

naser_feb8646

پنج شنبه 23 مهر 1388, 13:21 عصر

سلام
دوست عزیز کافی توی خاصیت PromptChar بجای خط تیره یک اسپیس بزنی

sh2007

شنبه 25 مهر 1388, 08:36 صبح

سلام
دوست عزیز کافی توی خاصیت PromptChar بجای خط تیره یک اسپیس بزنی

اين كار رو كردم ولي موقع اجرا برنامه فقطي مي خواي عدد وارد كني قبول نمي كنه

viper2009

شنبه 25 مهر 1388, 13:38 عصر

از این کد در Text Changed یک تکس باکس استفاده کن یک حالت ماسک دار می شه
ولی در لود نشون نمی دها

Dim txt AsString = ""
If TextBox2.Text.Length > 2 Then

SendKeys.Send("{end}")

txt = Format$(TextBox2.Text.Replace("/", ""))
TextBox2.Text = Format$(Val(txt), "##/##/##")
EndIf