پرفروش ترين
برترين
آخرين محصولات فروشگاه
فایل الکترونیکی آموزش اکسل پیشرفته ۲۰۱۰
آموزش ایجاد فایل چندکاربره با سطح دسترسی مشخص
یوزرفرم پیشرفته -Advanced  User Form
داشبورد (مقدماتی) – Dashboards(Elementary)
ابزارهای اعتبار سنجی و اخطار دهنده
بسته آموزشی userform
مدیریت و کنترل خطا در اکسل
توابع متنی
گرافیک در اکسل
جزوه آموزشی جداول و نمودارهای پاشنه ای
فایل آموزشی نحوه تهیه فرمت عددی دلخواه یا custom number format cell
آموزش ایجاد فایل چندکاربره با سطح دسترسی مشخص
نمایش نتایج: از شماره 1 تا 3 , از مجموع 3

موضوع: تکست باکس سفارشی

  1. #1


    آخرین بازدید
    09 _ 10 _ 2016
    تاریخ عضویت
    September_2013
    نوشته ها
    27
    امتیاز
    13
    سپاس
    20
    سپاس شده
    10 در 10 پست

    تکست باکس سفارشی

    با سلام
    آیا می شود
    1-با زدن دکمه * در textBox به جای تایپ * سه تا صفر 000 تایپ کنه؟
    2-فقط بتوان عدد تایپ کرد و از پذیرفتن حرف جلوگیری کند؟
    3-فقط بتوان حرف تایپ کرد و از پذیرفتن عدد جلوگیری کند؟
    4-بیش از 8 کارکتر نپذیرد؟
    5-کمتر از 5 کارکتر نپذیرد؟
    6-وقتی عدد وارد می کنیم بعد از 4تا کارکتر اول و دو کارکتر بعدش به صورت خودکار علامت / بگذارد (برای درج تاریخ 18/07/1393 )
    اخطار: این یک موضوع قدیمی است
    به دلیل قدیمی بودن موضوع، ممکن است برخی فایل های ضمیمه به درستی کار نکنند. لطفا در صورت عدم ضرورت، از بالا آوردن موضوعات قدیمی خودداری نمایید.

  2.  

  3. #2


    محصولات کاربر

    یوزرفرم پیشرفته
    آخرین بازدید
    6 روز پیش
    تاریخ عضویت
    February_2011
    محل سکونت
    تهران
    نوشته ها
    311
    امتیاز
    1438
    سپاس
    129
    سپاس شده
    550 در 155 پست

    s.cheraghi به Yahoo ارسال پیام
    1- در رویداد keyup مربوط به textbox با استفاده از یک شرط مقدار keycode را بررسی کن، در صورتی که با مقدار vbKeyMultiply برابر بود به انتهای متن، صفرها رو قرار بده
    3-این دستورات باید در رویداد KeyUp مربوط به textbox قرار داده بشه
    کد:
    If KeyCode >= vbKeyA And KeyCode <= vbKeyZ Then
        TextBox1.SelStart = Len(TextBox1.Text) - 1
        TextBox1.SelLength = 1
        TextBox1.SelText = ""
    End If
    2- برای جلوگیری از تایپ عدد باید از دستورات بالا با جایگزینی مقادیر ثابت به جای vbkeya و vbkeyz با مقادیر مرتبط با اعداد استفاده کنی.
    4- خاصیت maxlenght رو برابر 8 قرار بده
    5- در رویداد exit مربوط به textbox با استفاده از یک شرط و با استفاده از تابع len، تعداد کارکترهای قرار داده شده در خاصیت text مربوط به textbox رو بشمار و در صورت کمتر بودن از 4 پیغام بدی و دوباره textbox رو انتخاب کنه.
    6- از دستور زیر استفاده کن:
    کد:
    TextBox1.Text = Format(TextBox1.Value, "0000/00/00")
    در یادگیری سیر نشوید

    برای ارتباط بیشتر به سایت ExcelPedia سربزنید.
    برگزاری دوره های آموزش اکسل در تهران
    آموزش توابع اکسل

  4. سپاس ها (2)


  5. #3


    آخرین بازدید
    31 _ 01 _ 2017
    تاریخ عضویت
    April_2013
    محل سکونت
    بابل
    نوشته ها
    22
    امتیاز
    22
    سپاس
    2
    سپاس شده
    43 در 10 پست

    tosco3652 به Yahoo ارسال پیام فرستادن پیام با Skype به tosco3652
    با سلام
    دوست عزیز شما با استفاده از کد زیر هم میتوانی مشکلت را حل نمایی.

    کد:
    If Len(ActiveControl.Value) = 8 Then ActiveControl.Value = Format(ActiveControl.Value, "####/##/##")



اطلاعات موضوع

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

در حال حاضر 1 کاربر در حال مشاهده این موضوع است. (0 کاربران و 1 مهمان ها)

بازدید کنندگان با جستجو های زیر این صفحه را پیدا کرده اند

تکس باکس سفارشی

بررسی مقدار در تکست باکس

کلمات کلیدی این موضوع

مجوز های ارسال و ویرایش

  • شما نمیتوانید موضوع جدیدی ارسال کنید
  • شما امکان ارسال پاسخ را ندارید
  • شما نمیتوانید فایل پیوست کنید.
  • شما نمیتوانید پست های خود را ویرایش کنید
  •  
  • BB code ها فعال هستند
  • شکلک ها فعال هستند
  • کد [IMG] فعال است
  • کد [VIDEO] فعال است
  • کد HTML غیر فعال است
با ما در تماس باشيد