نمایش نتایج 1 تا 12 از 12

نام تاپیک: عدم درج کارکتر space(فضای خالی) در MaskedTextBox

  1. #1

    عدم درج کارکتر space(فضای خالی) در MaskedTextBox

    با سلام خدمت دوستان عزیز
    من یک MaskedTextBox رو تو برنامه ام استفاده میکنم که فرمتش تاریخ هست با استفاده از سال جاری و ماه جاری پر می کنم حالا مشکل اینجاست که برای بار اول که می خوای روز رو وارد کنی مشکلی نیست کلید ثبت رو می زنم و میخوام رکورد بعدی رو ثبت کنم تو قسمت روز یک کارکتر خالی می زنه . هر کاری می کنم درست بشو نیست.

    دوستان می تونن راهنمایی کنن
    کدهایی که باهاش ماسک رو پرمی کنم این هست

     Public Function MiladiToShamsi(ByVal MDate As Date) As String
    MiladiToShamsi = ""
    Dim pc As New Globalization.PersianCalendar
    Dim Sal As Integer = pc.GetYear(MDate)
    Dim Mah As Integer = pc.GetMonth(MDate)
    Dim Roz As Integer = pc.GetDayOfMonth(MDate)
    MiladiToShamsi = Format(Sal, "0000") & "/" & Format(Mah, "00") & "/"
    Return MiladiToShamsi

    End Function


    MaskedTextBox1.Text = MiladiToShamsi(Now())


    هم با "/" و هم بدون "/" استفاده کردم همین مشکل وجود داره باز

  2. #2

    نقل قول: عدم درج کارکتر space(فضای خالی) در MaskedTextBox

    احتمالا مشکل شما از این نیست که تاریخ ماه و یا روز رو در صورتی که یک رقمی هست اینجوری می نویسه مثلا 2 بجای 02 ؟

  3. #3

    نقل قول: عدم درج کارکتر space(فضای خالی) در MaskedTextBox

    نه دوست عزیز
    شما کد روملاحضه کنید فرمت دقیقا توش رعایت شده

  4. #4

    نقل قول: عدم درج کارکتر space(فضای خالی) در MaskedTextBox

    نقل قول نوشته شده توسط سینا2010 مشاهده تاپیک
    نه دوست عزیز
    شما کد روملاحضه کنید فرمت دقیقا توش رعایت شده
     Public Function MiladiToShamsi(ByVal MDate As Date) As String
    MiladiToShamsi = ""
    Dim pc As New Globalization.PersianCalendar
    Dim Sal As Integer = pc.GetYear(MDate)
    Dim Mah As Integer = pc.GetMonth(MDate)
    Dim Roz As Integer = pc.GetDayOfMonth(MDate)
    MiladiToShamsi = Format(Mah, "0000") & "/" & Format(Sal, "00") & "/"
    Return MiladiToShamsi

    End Function

  5. #5

    نقل قول: عدم درج کارکتر space(فضای خالی) در MaskedTextBox

    نقل قول نوشته شده توسط bnnoor مشاهده تاپیک
     Public Function MiladiToShamsi(ByVal MDate As Date) As String
    MiladiToShamsi = ""
    Dim pc As New Globalization.PersianCalendar
    Dim Sal As Integer = pc.GetYear(MDate)
    Dim Mah As Integer = pc.GetMonth(MDate)
    Dim Roz As Integer = pc.GetDayOfMonth(MDate)
    MiladiToShamsi = Format(Mah, "0000") & "/" & Format(Sal, "00") & "/"
    Return MiladiToShamsi

    End Function

    ببخشید متوجه نشدم؟
    میشود لطف کنید توضیح بدهید. مخصوصا در مورد خط زیر یعنی چی ؟ ماه 4 رقم سال 2 رقم؟

    MiladiToShamsi = Format(Mah, "0000") & "/" & Format(Sal, "00") & "/"
    آخرین ویرایش به وسیله سینا2010 : جمعه 23 اردیبهشت 1390 در 23:02 عصر

  6. #6

    نقل قول: عدم درج کارکتر space(فضای خالی) در MaskedTextBox

    نقل قول نوشته شده توسط سینا2010 مشاهده تاپیک
    ببخشید متوجه نشدم؟
    میشود لطف کنید توضیح بدهید. مخصوصا در مورد خط زیر یعنی چی ؟ ماه 4 رقم سال 2 رقم؟

    MiladiToShamsi = Format(Mah, "0000") & "/" & Format(Sal, "00") & "/"
    با این تغییرات درست نشد؟

  7. #7

    نقل قول: عدم درج کارکتر space(فضای خالی) در MaskedTextBox

    نه دوست عزیز.

  8. #8

    نقل قول: عدم درج کارکتر space(فضای خالی) در MaskedTextBox

    عزیزان کسی نمی تونه کمک کنه ؟

  9. #9

    نقل قول: عدم درج کارکتر space(فضای خالی) در MaskedTextBox

    نقل قول نوشته شده توسط سینا2010 مشاهده تاپیک
    عزیزان کسی نمی تونه کمک کنه ؟
    دوست عزیز با اون تغییراتی که انجام دادم مشکل برای من حل شد.

  10. #10

    نقل قول: عدم درج کارکتر space(فضای خالی) در MaskedTextBox

    نمی دونم بخدا دیگه اعصابم رو خرد کرده درست نمی شه که نمی شه. همه جورش رو دیده بودم الا این مدل

  11. #11

    نقل قول: عدم درج کارکتر space(فضای خالی) در MaskedTextBox

    نقل قول نوشته شده توسط سینا2010 مشاهده تاپیک
    نمی دونم بخدا دیگه اعصابم رو خرد کرده درست نمی شه که نمی شه. همه جورش رو دیده بودم الا این مدل
    شما اصل کد رو اینجا ضمیمه کن تا بررسی کنیم

  12. #12

    نقل قول: عدم درج کارکتر space(فضای خالی) در MaskedTextBox

    آقا پیدا شد
    من تو رویداد KeyDown این کد رو اضافه کرده بودم
    e.SuppressKeyPress =
    True
    برای همین اینجوری می شد. برش داشتم درست شد.

    ممنون

قوانین ایجاد تاپیک در تالار

  • شما نمی توانید تاپیک جدید ایجاد کنید
  • شما نمی توانید به تاپیک ها پاسخ دهید
  • شما نمی توانید ضمیمه ارسال کنید
  • شما نمی توانید پاسخ هایتان را ویرایش کنید
  •