منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

طيب ارفع مثالك اللي تشتغل عليه ممكن فيه اشكال لم تذكره.

سعود كتب :طيب ارفع مثالك اللي تشتغل عليه ممكن فيه اشكال لم تذكره.

تفضل اريض اضافت كلمت name

Abu Ehab كتب :

PHP كود :

Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
        If TextBox1.Text.Length < 6 Then
            TextBox1.Text = "vb4arb"
        End If
    End Sub 


جزاك الله كل خير اخى لاكن كيف جعله يكتب جمب الكلمه وليس وراه؟

محمد كتب :تفضل اريض اضافت كلمت name

انا اقول لك ارفع مثالك ارفع المشروع ...على كل حال ان شالله انك عرفت الحل ونا متاكد انك عرفت.

kslawy كتب :

PHP كود :

Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged        
Dim Word As String = "vb4arb"        
If TextBox1.Text.Length < 6 OrElse Not TextBox1.Text.StartsWith(Word) Then     
TextBox1.Text = Word
End If
End Sub 


بهذه الطريقة لا يستطيع المستخدم كتابة أي شيء قبل الكلمة المطلوبة

جزاك الله خيرا أخى

سعود كتب :انا اقول لك ارفع مثالك ارفع المشروع ...على كل حال ان شالله انك عرفت الحل ونا متاكد انك عرفت.

جزاك الله خيرا اخى سعود تم اجاد الحل