اذا كان TEXTBOX مملوء
اريد ان تخرج رسالة تقول انه مملوء
انا اعرف هذا الكود في حالة الفراغ
IF TEXTBOX.TEXT = "" THEN
انا اريد العكس اذا كان مملوء
هل هناك حل
او استخدم الكود التالي علماً ان الطرق كثيرة منها على سبيل المثال :
كود :
If TextBox1.Length > 0 Then
msgbox "مملوء"
else
msgbox "غير مملوء"
end if
ايضاً :
كود :
If TextBox1.Text <> "" Then
msgbox "مملوء"
else
msgbox "غير مملوء"
end if
etc....
اعتقد ان المقصود بالسؤال أن طول النص يملأ التكست بوكس علآخر
عندما تحدث هذه الحالة تكون فيمة الخاصية TextBox1.PreferredSize.Width أكبر من TextBox1.Width+4
العدد 4 : يمثل قيمة نفس الخاصية عندما يكون الصندوق فارغاً (القيمة الابتدائية)
اخي سمير :
اكبر قيمة لصندوق النص هي = 32767 محرف
و بالتالي يمتلي الصندوق عندما يصبح عدد المحارف به 32767 بما فيها الفراغات
اما انت فيمكنك تحديد طول النص المراد احتوائه و من ثم ارسال رسالة عندما يصل
الطول المدخل يساوي الطول المحدد من طرفك
نفترض ان الطول الذي حددته يساوي 10 اذا الشفرات هي :
كود :
Private Sub TextBox1_KeyPress(sender As Object, e As KeyPressEventArgs) Handles TextBox1.KeyPress
If Len(TextBox1.Text) = TextBox1.MaxLength Then
MessageBox.Show("لا يوجد مكان اضافي")
End If
End Sub
اليك شرح في المرفقات
رائع هذا التفاعل و هذه الحلول المتنوعة
