كود اظهار نتيجه حسابيه فى التكست بوكس تلقائيا
كود اظهار نتيجه حسابيه فى التكست بوكس تلقائيا
كود: Private Sub ResultTextbox3(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged, TextBox2.TextChanged If TextBox1.Text Is String.Empty Or Not IsNumeric(TextBox1.Text) Then TextBox3.Text = "" Exit Sub End If If TextBox2.Text Is String.Empty Or Not IsNumeric(TextBox2.Text) Then TextBox3.Text = "" Exit Sub End If TextBox3.Text = CType(TextBox1.Text, Integer) * CType(TextBox2.Text, Integer) End Sub |
الساعة الآن 01:18 PM |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Content Relevant URLs by vBSEO ©2010, Crawlability, Inc. TranZ By
Almuhajir