تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
كيف اجعل امر في فجوال بيسك يظهر مباشرة
#1
السلام عليكم 
اريد اعمل برنامج يظهر اية عمليه  وتظهر مبارشرة بدزن  زر امر
يعني مثلا اعمل ثلاث خانات نص في الثالث يظهر عمليه حسابية  او  يجمع نصين بدون زر امر  Huh
الرد }}}}
تم الشكر بواسطة:
#2
Private Sub TextBox_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged, TextBox2.TextChanged
TextBox3.Text = Val(TextBox1.Text) + Val(TextBox2.Text)
End Sub
الرد }}}}
تم الشكر بواسطة: khodor1985
#3
شكرا لك اخي sami2015 لاكن طلع رسالة خطا
الرد }}}}
تم الشكر بواسطة:
#4
ضع الكود في الحدث Leave
عن مولا نا علي ابن أبي طالب عليه السلام :
إضرب بعض الرأي ببعض يتولد منه الصواب.
الرد }}}}
تم الشكر بواسطة:
#5
جرب النموذج بالمرفقات


الملفات المرفقة
.rar   AutoCalc.rar (الحجم : 56.6 ك ب / التحميلات : 25)
الرد }}}}
تم الشكر بواسطة:
#6
شكرا لك اخي
khodor1985
عملت كما قلت الكود في الحدث Leave
لاكن لاتظهر النتيجة الا بعد الضغط على الtext 1 مرتين ولاتظهر بسرعة
وهذا ملف مرفق مفتوح وفيه ملف جاهز
وملف مرفق للفكرة التي اريدها برنامج صغير لصخر

شكرا اخوي boudyonline
حملت المرفق المشكلة قريبه من من نفس المشكلة ماتظهر النتيجة الا لما اضغط كلك مرتين text3


الملفات المرفقة
.rar   مجلد جديد (3).rar (الحجم : 15.28 ك ب / التحميلات : 25)
.rar   تحويل تاريخ ومقاسات.rar (الحجم : 150.6 ك ب / التحميلات : 27)
الرد }}}}
تم الشكر بواسطة:
#7
جرب الكود كالآتي :


كود :
Private Sub TextBox2_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox2.TextChanged
       TextBox3.Text = Val(TextBox1.Text) + Val(TextBox2.Text)
   End Sub

   Private Sub TextBox1_TextChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
       TextBox3.Text = Val(TextBox1.Text) + Val(TextBox2.Text)
   End Sub
الرد }}}}
تم الشكر بواسطة:
#8
يطلع رسالة خطا
الرد }}}}
تم الشكر بواسطة:
#9
بيمشي الحل تتنفذ العملية من خلال الضغط على Enter

ضع الكود في الحدث Keydown لمربعي النص دون مربع النص الذي سيظهر نتيجة العملية الحسابية:
PHP كود :
If e.KeyCode Keys.Enter Then
Me
.Textbox3.Text Val(TextBox1.Text) + Val(TextBox2.Text)
End IF 
عن مولا نا علي ابن أبي طالب عليه السلام :
إضرب بعض الرأي ببعض يتولد منه الصواب.
الرد }}}}
تم الشكر بواسطة:
#10
اخي الفاضل :
النموذج عندي لا يعطي أي أخطاء
ما هي رسالة الخطأ التي تظهر لك ؟؟؟

فيمكن أن يكون سببها كود آخر وضعته في برنامجك


الملفات المرفقة
.rar   AutoCalc.rar (الحجم : 57.59 ك ب / التحميلات : 25)
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  ممكن طريقة عمل حماية لبرنامجك في فيجوال بيسك 2010 بحيث يكون لكل جهاز سريال asas77477 0 50 06-12-17, 10:51 AM
آخر رد: asas77477
  [VB.NET] كيف اجعل عمود بالداتا جريد فيو يساوي نفس ارقام العمود السابق له مع حذف ارقام اقل من ص السيد الجوهري 1 64 22-11-17, 12:30 AM
آخر رد: محمد بن عطية
  كيف اجعل خليه في الداتا جريد فيو تظهر بلون معين بناء على شرط في خليه اخرى من نفس الصف samawi 2 89 16-11-17, 06:40 AM
آخر رد: samawi
  كيف اجعل برنامجي يعمل على شبكة خاصة aftfm 7 174 14-11-17, 09:46 PM
آخر رد: حريف برمجة
  فيجوال بيسك nironoorn 1 72 14-11-17, 09:10 PM
آخر رد: سعود
  كيف اجعل طريقة ادخال التاريخ صحيحه ومحددة الج نرال 6 227 12-11-17, 06:22 PM
آخر رد: الج نرال
  هل استطيع ان اجعل كومند بوتن لا يتفعل الا نهاية كل شهر samawi 3 136 12-11-17, 06:37 AM
آخر رد: samawi
  [كود] طلب كود فجول بيسك ضروري mohammedvego 3 184 11-11-17, 01:07 AM
آخر رد: a.ahmed
  كيف اجعل الكمبوبوكس فارغ عند التحميل الج نرال 2 65 08-11-17, 05:01 PM
آخر رد: الج نرال
  [VB.NET] ربط الفيجوال بيسك بقاعدة بيانات أكسيل moslimway11 1 107 04-11-17, 03:51 AM
آخر رد: Rabeea Qbaha

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم