تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] تقسيم جملة بين 2 تكست بوكس
#1
أريد تحديد length  معين لتكست ون وما تبقى من الجملة ينزل تلقائياً فى تكست 2

أرجو أن يكون المطلوب واضحا
الرد
تم الشكر بواسطة:
#2
أهلا أخي الكريم :

كود :
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
الرد
#3
نسأل الله أن يجعل لك فى كل خطوة بركة

بارك الله لك فى علمك ووفقك
الرد
تم الشكر بواسطة: مبرمج بلا حدود , Ahmed_Mansoor , awidan76


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [vb6.0] كود لخزن اسماء داخل كومبو بوكس من تيكست بوكس وادي العوضي 4 25 منذ 7 ساعة مضت
آخر رد: وادي العوضي
  احتاج مساعدة في الكومبو بوكس scsi7000 3 157 28-12-18, 11:22 AM
آخر رد: scsi7000
  طريقة تغيير نوع بيانات الحقل داخل جملة الاستعلام عبدالله الصافي 3 234 05-11-18, 03:30 AM
آخر رد: حريف برمجة
  التعديل علا اليست بوكس wolf1120 7 330 08-08-18, 06:58 AM
آخر رد: Ahmed_Mansoor
  [سؤال] برجاء المساعدة ضروري فى جملة select ahmed eldouskey 6 536 21-06-18, 02:50 AM
آخر رد: princeofislam
  كيف يمكن ان استخدم جملة orderby princeofislam 5 328 20-06-18, 11:19 PM
آخر رد: elgokr
  [vb6.0] لرجاء المساعدة في جملة adoPrimaryRS.Open إبراهيم خشافه1 23 1,293 05-04-18, 04:37 AM
آخر رد: sendbad100
  [سؤال] جملة استعلام amro_demon 6 430 02-01-18, 04:50 PM
آخر رد: amro_demon
  السبيل لكود تقسيم الملفات عبدالله الصافي 19 1,157 20-12-17, 08:40 PM
آخر رد: Mohamad Anan
  اخوانى ارجو المساعدة بخصوص كومبو بوكس استايل mhareek 8 611 03-12-17, 02:04 PM
آخر رد: eiocm

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم