[مبرمج أوتار]

ملاحظة مشاركة منقوله من المنتدي السابق للعضو:- ramilove

[COLOR="Navy"]بارك الله بيك اخي عمر

بس ملاحظة للي بدو يستخدمها يجب وضع جملة try لتجاوز الاخطاء في حال عدم ادخال قيمة في التكست بكس او في حال ادخال قيمة اكبر من مليار .[/COLOR]

PHP كود :

Try

            Dim m As New mero

            Label1.Text = (m.mero5000(TextBox1.Text))

        Catch ex As Exception
            MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)

        End Try 


او وضع Val(TextBox1.Text) لكي يأخذ قيمة رقمية في حال كان فارغ .