28-05-15, 12:59 AM
السلام عليكم
تقدر تكتب في الحدث :Textbox1_TextChanged (يعني بعد النقر مرتين على صندوق النص أكتب التالي)
السطر الثاني يقول امسح الحرف الاخير الذي تمت كتابته توّا
السطر الثالث يجعل القلم في نهاية النص
وبالنسبة لاغلاق الفورم الاول عند اغلاق الثاني
فيمكنك كتابة الكود التالي في الحدث :Form2_FormClosed
Form1.close
وشكرا
تقدر تكتب في الحدث :Textbox1_TextChanged (يعني بعد النقر مرتين على صندوق النص أكتب التالي)
If TextBox1.Text > 100 Then
TextBox1.Text = TextBox1.Text.Remove(TextBox1.Text.Length - 1, 1)
TextBox1.Select(TextBox1.Text.Length, 0)
TextBox1.Text = TextBox1.Text.Remove(TextBox1.Text.Length - 1, 1)
TextBox1.Select(TextBox1.Text.Length, 0)
End If
السطر الاول يقول اذا كان العدد اكبر من مئةالسطر الثاني يقول امسح الحرف الاخير الذي تمت كتابته توّا
السطر الثالث يجعل القلم في نهاية النص
وبالنسبة لاغلاق الفورم الاول عند اغلاق الثاني
فيمكنك كتابة الكود التالي في الحدث :Form2_FormClosed
Form1.close
وشكرا
