ورود به حساب ثبت نام جدید فراموشی کلمه عبور
برای ورود به حساب کاربری خود، نام کاربری و کلمه عبورتان را در زیر وارد کرده و روی “ ورود به حساب” کلیک کنید.





اگر فرم ثبت نام برای شما نمایش داده نمیشود، اینجا را کلیک کنید.









اگر فرم بازیابی کلمه عبور برای شما نمایش داده نمیشود، اینجا را کلیک کنید.





نمایش نتایج: از 1 به 1 از 1
  1. #1
    Prof.MohammadGh
    Moderator
    تاریخ عضویت
    1970 Jan
    محل سکونت
    Iran
    نوشته ها
    317
    9
    184

    Post آموزش:مقلوب کردن عدد در vb6

    سلام عليکم دوستان
    مقلوب کردن عدد يعني معکوس کردن عدد مثلا عدد 21 مقلوبش ميشه 12 .

    براي مقلوب کردن عدد 2 رقمي از دستور زير استفاده ميشود:
    Dim a, b, c, d As Integer
    a = Text1
    b = a \ 10
    c = a Mod 10
    Label1.Caption = c * 10 + b


    براي مقلوب کردن عدد N رقمي از دستور زير استفاده ميشود:
    Dim i
    For i = Len(Text1.Text) To 1 Step -1
    Print Mid(Text1.Text, i, 1);
    Next i


    البته خود ويژوال بيسيک تابعي داره به نام StrReverse که اين کار رو براتون انجم ميده چه رشته و چه عدد،اينها فقط مثال بود تا شما ياد بگيريد.


    موفق باشيد
    ویرایش توسط Prof.MohammadGh : 2012-09-25 در ساعت 01:38 PM

    Info بسمه تعالي

    1.از عناوين مناسبي براي ايجاد تاپيکها استفاده کنيد.
    2.اگر پستي برايتان مفيد بود فقط از دکمه ي تشکر آن پست استفاده کنيد.

    To Contact Me:[برای نمایش لینک باید عضو شوید. ]

نمایش نتایج: از 1 به 1 از 1

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

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

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

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

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

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

Content Relevant URLs by vBSEO 3.6.0 RC 2