+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [سؤال] اكواد تستخدام اداة textbox فى عمليات حسابية واستخراج نتيجة رقمية (/showthread.php?tid=3104)
اكواد تستخدام اداة textbox فى عمليات حسابية واستخراج نتيجة رقمية - طالب فيجوال بيسك - 05-06-14
فكرة الآلة الحاسبة باستخدام اكواد لتحويل اداة textbox للعمليات الحسابية واستقبال النتيجة المخرجة .
انا باستخدم فيجوال بيسك دوت نت 2008
RE: اكواد تستخدام اداة textbox فى عمليات حسابية واستخراج نتيجة رقمية - vb_net - 05-06-14
ربما هدا الموضوع يساعدك
http://vb4arb.com/vb/thread-738.html
RE: اكواد تستخدام اداة textbox فى عمليات حسابية واستخراج نتيجة رقمية - طالب فيجوال بيسك - 06-06-14
وعليكم السلام ورحمة الله وبركاتة اخى vb_net
للأسف المساعدة التى تكرمت بتقديمها لم تكن مقصدى
بل كان مقصدى ان اداة التيكست بوكس تستقبال حروف فلا بد من دالة لتحويل القيم الى ارقام لاجراء عملية حسابية عليها كما بالالة الحاسبة اشكرك
ولعل تقصيرى فى الايضاح جعل الجواب بعيدا عن المقصد
RE: اكواد تستخدام اداة textbox فى عمليات حسابية واستخراج نتيجة رقمية - shwehdi4pc - 08-06-14
[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