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

نسخة كاملة : سورس كود الاله الحاسبه مثل الخاصه بويندوز 7
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
اريد سورس كود لاله حاسبه 

تقبل قيم لا نهائية لعملية حسابيه واحده وباكثر من شارة حسابيه 

كما فى الاله الحاسبه الخاصه بويندوز 7

مثال : 3*5+4-2/2=؟؟؟

أو

4+6+7+8-1-3=؟؟؟

وجزاكم الله خيرا اخوانى الكرام
إذا كنت تبحث عن كود يقبل قيمًا غير محدودة للعمليات الحسابية، يمكنك استخدام مكتبة تعامل مع الأرقام الكبيرة. في VB.NET، يُمكنك استخدام
كود :
BigInteger
للتعامل مع الأرقام الصحيحة الكبيرة جدًا بمستوى عالٍ من الدقة. هنا مثال بسيط يظهر كيف يمكنك استخدام
كود :
BigInteger
لإجراء عمليات حسابية غير محدودة:
PHP كود :
Imports System.Numerics

Public Class Form1
    Private Sub CalculateButton_Click
(sender As ObjectAs EventArgsHandles CalculateButton.Click
        
' استخدام BigInteger للقيام بالعمليات الحسابية
        Dim value1 As BigInteger = BigInteger.Parse(Value1TextBox.Text)
        Dim value2 As BigInteger = BigInteger.Parse(Value2TextBox.Text)

        Dim result As BigInteger

        Select Case OperationComboBox.SelectedItem.ToString()
            Case "+"
                result = BigInteger.Add(value1, value2)
            Case "-"
                result = BigInteger.Subtract(value1, value2)
            Case "*"
                result = BigInteger.Multiply(value1, value2)
            Case "/"
                If value2 = 0 Then
                    ResultLabel.Text = "Error: Division by zero!"
                    Return
                End If
                result = BigInteger.Divide(value1, value2)
        End Select

        ResultLabel.Text = result.ToString()
    End Sub
End Class 

هذا المثال يستخدم
كود :
BigInteger
لأداء عمليات الجمع، الطرح، الضرب، والقسمة. يتم قراءة القيم من TextBoxes (
كود :
Value1TextBox
و
كود :
Value2TextBox
) وتحويلها إلى
كود :
BigInteger
لتنفيذ العمليات الحسابية. يجب أن يتم اختيار العملية الحسابية المطلوبة من قائمة منسدلة (
كود :
OperationComboBox
) وسيتم عرض النتيجة في Label (
كود :
ResultLabel
)