منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[سؤال] تقسيم جملة بين 2 تكست بوكس - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغات البرمجة الاخرى (http://vb4arb.com/vb/forumdisplay.php?fid=4)
+--- قسم : قسم لغة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=18)
+---- قسم : قسم أسئلة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=28)
+---- الموضوع : [سؤال] تقسيم جملة بين 2 تكست بوكس (/showthread.php?tid=12863)



تقسيم جملة بين 2 تكست بوكس - أبو التيمان - 31-07-15

أريد تحديد length  معين لتكست ون وما تبقى من الجملة ينزل تلقائياً فى تكست 2

أرجو أن يكون المطلوب واضحا


RE: تقسيم جملة بين 2 تكست بوكس - Ahmed_Mansoor - 01-08-15

أهلا أخي الكريم :

كود :
Private Sub Command1_Click()

Dim zText As String
Dim zLength As Integer

zText = Text1.Text
zLength = 3

Text1.Text = Left$(zText, zLength)
Text2.Text = Mid$(zText, zLength + 1)

End Sub



RE: تقسيم جملة بين 2 تكست بوكس - أبو التيمان - 01-08-15

نسأل الله أن يجعل لك فى كل خطوة بركة

بارك الله لك فى علمك ووفقك