آژانس هواپیماییexchanging

کمک فوری.میخوام توی تکست باکس یه عددی روبدم وتوی تکست روبروش عددموردنظرموبهم بده

شروع موضوع توسط hamid625 ‏21 می 2010 در انجمن Visual Basic 6

  1. hamid625

    hamid625 Registered User

    تاریخ عضویت:
    ‏8 ژانویه 2010
    نوشته ها:
    43
    تشکر شده:
    0
    سلام دوستان عزیز
    من میخوام یه دفترچه وزن تیرآهن یامیلگردواسه خودم بسازم وهر تیرآهن یامیلگردی وزن مخصوص خودشو داره.مثلا وزن مخصوص میلگرد14 میشه1.21ووزن16میشه 1.58 وهمینطور20و22و..وهمینطورتیرآهنها.میخوام طوری توش تعریف کنم که یه موقع وزن هرکدوم روخواستم وزنش روبهم بده.مثلانوشتم14 روبروش توی تکست باکس بدون کلیک یاچیزی بنویسه1.21

    مرسیییییییییییییییییییییییییییییییییییییییییییییییییییییی
     
  2. h4sh3m

    h4sh3m Registered User

    تاریخ عضویت:
    ‏12 سپتامبر 2010
    نوشته ها:
    61
    تشکر شده:
    1
    محل سکونت:
    0441
    اينو كه خودت جواب دادي.



    private sub text1_change()
    if text1.text = "14" then
    text2.text = "1.21"
    elseif text1.text = "16" then
    text2.text = "1.58"
    else
    text2.text = "Bikhial"
    end if