[atefkhalf2004]

السيد الفاضل

  If newRun = True Then
            TextBox1.Text = 0
            newRun = False
        End If
[جربت ووضعت 
   Dim secundnum As Decimal
    Dim oparation As Integer
    Dim selected As Boolean = False
    Private newRun As Boolean
ووضعت اخر زر انتر
 newRun = True

ولكن لا جديد
برجاء اعادة تحميل السورس بعد التعديل