اريد كود لعمل نص متحرك بداخل التيكست

لماذا لم يرد احد هل المطلوب صعب الى هذه الدرجة ، ارجوا الإهتمام بالأمر و لا يشترط ان تكون تعرف لكى تشترك فقط لو عندك فكرة ما اخبرنى بها و سنحاول معا تطويرها او تعديلها.

الجواب ليس صعب على الاطلاق يا عزيزي:

Private Sub cmdStart_Click()
Timer1.Enabled = True
End Sub

Private Sub cmdStop_Click()
Timer1.Enabled = False
End Sub

Private Sub Timer1_Timer()
Text1.Text = VBA.Right$(Text1.Text, Len(Text1.Text) - 1) & VBA.Left$(Text1.Text, 1)
End Sub

شكرا جزيلا على تجاوبك معى يا اخى العزيز ساقوم بتجربة الكود و الرد عليك ان شاء الله

مرة اخرى شكرا لك :-)

اخى العزيز لقد جربت الكود و لم يحدث اى شىء و لا حتى رسالة خطأ ارجوا المساعدة و آسف لانى تعبتك معى

اين الجميع ، اريد هذا بشكل عاجل لو سمحتم.

يجب ان يكون عندك 2 كوماند واحد اسمه cmdstart و الثاني اسمه cmdstop و تايمر اسمه timer1 علي الفورم.

راااااااااااااااااااااااااائع ، ممتاز اخى الكريم لقد فعلت كما قلت و الكود اشتغل شكرا لك يا عزيزى :D

صديقي راجع مشاركتي بعنوان -أطلب مثال و سأحاول أن أجيبك- ستجد فيها طلبك و هو من آخر الأمثلة وستجد المشاركة باسمeias