تور لحظه آخری
امروز : یکشنبه ، 11 آذر 1403    احادیث و روایات:  پیامبر اکرم (ص):خداوند متعال، به بنده‏اش در هر روز نصيحتى عرضه مى‏كند، كه اگر بپذيرد، خوشبخت و ...
سرگرمی سبک زندگی سینما و تلویزیون فرهنگ و هنر پزشکی و سلامت اجتماع و خانواده تصویری دین و اندیشه ورزش اقتصادی سیاسی حوادث علم و فناوری سایتهای دانلود گوناگون شرکت ها

تبلیغات

تبلیغات متنی

صرافی ارکی چنج

صرافی rkchange

سایبان ماشین

دزدگیر منزل

تشریفات روناک

اجاره سند در شیراز

قیمت فنس

armanekasbokar

armanetejarat

صندوق تضمین

Future Innovate Tech

پی جو مشاغل برتر شیراز

آراد برندینگ

خرید یخچال خارجی

موسسه خیریه

واردات از چین

حمية السكري النوع الثاني

ناب مووی

دانلود فیلم

بانک کتاب

دریافت دیه موتورسیکلت از بیمه

طراحی سایت تهران سایت

irspeedy

درج اگهی ویژه

تعمیرات مک بوک

دانلود فیلم هندی

قیمت فرش

درب فریم لس

زانوبند زاپیامکس

روغن بهران بردبار ۳۲۰

قیمت سرور اچ پی

خرید بلیط هواپیما

بلیط اتوبوس پایانه

قیمت سرور dl380 g10

تعمیرات پکیج کرج

لیست قیمت گوشی شیائومی

خرید فالوور

پوستر آنلاین

بهترین وکیل کرج

بهترین وکیل تهران

خرید اکانت تریدینگ ویو

خرید از چین

خرید از چین

تجهیزات کافی شاپ

ساختمان پزشکان

محصولات فوراور

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

دوربین سیمکارتی چرخشی

همکاری آی نو و گزینه دو

کاشت ابرو طبیعی و‌ سریع

الک آزمایشگاهی

الک آزمایشگاهی

خرید سرور مجازی

قیمت بالابر هیدرولیکی

قیمت بالابر هیدرولیکی

قیمت بالابر هیدرولیکی

لوله و اتصالات آذین

قرص گلوریا

نمایندگی دوو در کرج

خرید نهال سیب

وکیل ایرانی در استانبول

وکیل ایرانی در استانبول

وکیل ایرانی در استانبول

رفع تاری و تشخیص پلاک

پرگابالین

دوره آموزش باریستا

مهاجرت به آلمان

بهترین قالیشویی تهران

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

تشریفات روناک

 






آمار وبسایت

 تعداد کل بازدیدها : 1836452196




هواشناسی

نرخ طلا سکه و  ارز

قیمت خودرو

فال حافظ

تعبیر خواب

فال انبیاء

متن قرآن



اضافه به علاقمنديها ارسال اين مطلب به دوستان آرشيو تمام مطالب
archive  refresh

توضيح اين خط از يك برنامه -


واضح آرشیو وب فارسی:سایت ریسک: توضيح اين خط از يك برنامه afsharan 25 آذر 1388, 12:54سلام اين خط از برنامه رو اگه ميشه توضيح بدين Text6.Text = Str(Asc(Mid(InBuffor, Val(Text5.Text) * 2 + 4))) the_king 25 آذر 1388, 17:16سلام اين خط از برنامه رو اگه ميشه توضيح بدين Text6.Text = Str(Asc(Mid(InBuffor, Val(Text5.Text) * 2 + 4))) تابع ()Val یک رشته را به عدد تبدیل می کند، در این کد، عددی که در Text5 وارد شده است به معادل عددی اش تبدیل می شود، مثلا رشته "0023" به عدد 23 تبدیل می گردد. Text6.Text = Str(Asc(Mid(InBuffor, Val(Text5.Text) * 2 + 4))) در ادامه عدد حاصل در 2 ضرب شده و با 4 جمع می شود، مثلا 4 + 2 * 23 که برابر 50 است. Text6.Text = Str(Asc(Mid(InBuffor, Val(Text5.Text) * 2 + 4))) تابع ()Mid یک تکه از یک رشته را انتخاب می کند، فرض کنیم که عدد حاصل از کد بالا 50 باشد، کد زیر در رشته InBuffer از کاراکتر 50 ام به بعد را انتخاب می کند (49 کاراکتر سمت چپ رشته را در نظر نمی گیرد). اگر رشته InBuffer طول اش از 50 کاراکتر کمتر باشد، رشته تهی ("") انتخاب می شود. Text6.Text = Str(Asc(Mid(InBuffor, Val(Text5.Text) * 2 + 4))) تابع ()Asc یک کاراکتر (یا اولین کاراکتر یک رشته) را به معادل ASCII خود تبدیل می کند. مثلا اگر رشته انتخاب شده "ABCD" باشد، کد ASCII کاراکتر A، یعنی عدد 65 برگردانده می شود. Text6.Text = Str(Asc(Mid(InBuffor, Val(Text5.Text) * 2 + 4))) تابع ()Str یک عدد را به رشته معادل تبدیل می کند (برعکس تابع ()Val عمل می کند). در کد زیر، آن عدد حاصل (مثلا 65) به رشته معادل ("65") تبدیل می شود : Text6.Text = Str(Asc(Mid(InBuffor, Val(Text5.Text) * 2 + 4))) در ادامه این رشته حاصل (مثلا "65") در Text6 قرار می گیرد.




این صفحه را در گوگل محبوب کنید

[ارسال شده از: سایت ریسک]
[مشاهده در: www.ri3k.eu]
[تعداد بازديد از اين مطلب: 405]

bt

اضافه شدن مطلب/حذف مطلب







-


گوناگون

پربازدیدترینها
طراحی وب>


صفحه اول | تمام مطالب | RSS | ارتباط با ما
1390© تمامی حقوق این سایت متعلق به سایت واضح می باشد.
این سایت در ستاد ساماندهی وزارت فرهنگ و ارشاد اسلامی ثبت شده است و پیرو قوانین جمهوری اسلامی ایران می باشد. لطفا در صورت برخورد با مطالب و صفحات خلاف قوانین در سایت آن را به ما اطلاع دهید
پایگاه خبری واضح کاری از شرکت طراحی سایت اینتن