15-09-20, 08:39 PM
(آخر تعديل لهذه المشاركة : 15-09-20, 08:42 PM {2} بواسطة Anas Mahmoud.)
بقي ان انوه انه لايجب عليك ابدا استخدام val ، انتهى وقتها للابد
لانها لاتعطيك اي افادة بان النص قابل للتحويل لرقم ام لا
والاصح بدلا من Cdec استخدام Decimal.Parse لانها مختصة بال نصوص String ، ولانها تتيح TryParse التي تمكنك من التحقق من النص المدخل
لانها لاتعطيك اي افادة بان النص قابل للتحويل لرقم ام لا
والاصح بدلا من Cdec استخدام Decimal.Parse لانها مختصة بال نصوص String ، ولانها تتيح TryParse التي تمكنك من التحقق من النص المدخل
كود :
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim deposit As Decimal
If Decimal.TryParse(TextBox1.Text, deposit) = False Then
MsgBox("ادخل رقم سليم")
Return
End If
Form2.TextBox1.Text = deposit.ToString("c")
Form2.Total += deposit
Form2.TextBox2.Text = Form2.Total.ToString("c")
Form2.Show()
End Sub