منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : اكواد تستخدام اداة textbox فى عمليات حسابية واستخراج نتيجة رقمية
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
فكرة الآلة الحاسبة باستخدام اكواد لتحويل اداة textbox للعمليات الحسابية واستقبال النتيجة المخرجة .
انا باستخدم فيجوال بيسك دوت نت 2008
ربما هدا الموضوع يساعدك

http://vb4arb.com/vb/thread-738.html
وعليكم السلام ورحمة الله وبركاتة اخى vb_net
للأسف المساعدة التى تكرمت بتقديمها لم تكن مقصدى
بل كان مقصدى ان اداة التيكست بوكس تستقبال حروف فلا بد من دالة لتحويل القيم الى ارقام لاجراء عملية حسابية عليها كما بالالة الحاسبة اشكرك

ولعل تقصيرى فى الايضاح جعل الجواب بعيدا عن المقصد
[code]Public Sub Button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn1.Click, btn2.Click, _
btn3.Click, btn4.Click, btn5.Click, btn6.Click, btn7.Click, btn8.Click, btn9.Click, btn0.Click, btndot.Click
dim x as string
Dim index As Integer = x.ToString.IndexOf(":")
x.ToString.Substring(index + 2)
textbox1.text = x

end sub
هذا الكود يقوم ببعث قيمة الزر
button.text = 1