[عبدالرحمن.1]

اريد سورس كود لاله حاسبه 

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

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

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

أو

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

وجزاكم الله خيرا اخوانى الكرام

[HALIM ELEULMA]

إذا كنت تبحث عن كود يقبل قيمًا غير محدودة للعمليات الحسابية، يمكنك استخدام مكتبة تعامل مع الأرقام الكبيرة. في VB.NET، يُمكنك استخدام

كود :

BigInteger

للتعامل مع الأرقام الصحيحة الكبيرة جدًا بمستوى عالٍ من الدقة. هنا مثال بسيط يظهر كيف يمكنك استخدام

كود :

BigInteger

لإجراء عمليات حسابية غير محدودة:

PHP كود :

Imports System.Numerics

Public Class Form1
    Private Sub CalculateButton_Click(sender As Object, e As EventArgs) Handles 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

)