26-03-16, 10:12 PM
27-03-16, 04:45 PM
أخي الكريم مع أنني لم أتمكن من فهم السؤال جيداً
يمكنك تجزئة الجملة حرف حرف من خلال التعليمة Mid
حيث Text1 هو نص و w هو الحرف و عندما يكون الحرف A يكتبه في text2
و أرجو أن يكون هذا طلبك
يمكنك تجزئة الجملة حرف حرف من خلال التعليمة Mid
كود :
For i = 1 To Len(Text1.Text)
w = Mid$(Text1.Text, i, 1)
if w="A" then Text2.Text= w
Nextو أرجو أن يكون هذا طلبك