اذهب الي المحتوي
أوفيسنا

جعل الكود يكتب النص في سطرين


طاطاباشا

الردود الموصى بها

انا كاتب كود ياخذ قيم حقول نصية وينسخها  في حقل واحد لكنها تاتي جميعها في نفس السطر 

انا اريد ان اجعل كل قيمة تاتي في سطر منفصل في نفس الخلية

للتوضيح

حقل 1: به نص "السلام عليكم"

حقل 2: به نص "كيف الحال "

حقل تجميع : يكتبهما معا في حقل واحد بناء على الكود كالتالي: "السلام عليكم كيف الحال"

لكن انا اريد ان تكون هكذا

"السلام عليكم

كيف الحال"

في سطرين     كيف ذلك؟؟؟؟؟؟؟؟؟؟

تم تعديل بواسطه طاطاباشا
تعديل لغوي
رابط هذا التعليق
شارك

استخدم = ثم حدد الخانة التي فيها السلام عليكم ثم استخدم & ثم حدد الخانة التي فيها كيف الحال واعمل للخانه التفاف النص 

رابط هذا التعليق
شارك

وعليكم السلام 🙂

 

رجاء النظر الى جدول ascii هذا ، والذي فيه جميع رموز لوحة المفاتيح الانجليزية:

ascii-full.gif

.

بمعنى آخر ، كل زر تنقر عليه على لوحة المفاتيح (حرف يمكنك رؤيته وقراءته) ، يتم ترجمتها في الكمبيوتر ، حسب طلب البرنامج الذي تستعمله ، الى واحدة من هذه الارقام والرموز 🙂

من الجدول ، انظر الى الحقل Dec الرقم 10 و 13 ، والقيم التي تقابلها من الحقل Chr (او Char) (ومعناها) ، فهذه القيم هي التي تقرر الانتقال الى السطر التالي ، هكذا chr(10) و chr(13) 🙂
هذه القيم تعتمد على البرنامج الذي يستخدمها ، فهناك من يستعمل 10 وهناك من يستخدم 13 وهناك من يستخدمهم معا 🙂

 

رجاء تنظر الى المشاركات في هذا الرابط حتى يصير عندك إلمام كامل بالموضوع:

 

.

وفي محرر الاكواد VBE ، يمكننا استعمال مسميات هذه الرموز بلغة الاكسس (والتي تم اخذها من لغة Visual Basic ، VB) ، بدلا من الارقام اعلاه ،
في محرر الاكواد ، ابحث عن vb constants ، وسترى قائمة المسميات
image.png.025a40f20d5ebdb30ba1aa789bfbf453.png
.
وعند النقر على الرابط الذي عليه السهم (الاوامر التي تخص موضوعنا)

image.png.9ac66f50e36477d6fd98f50dc24a9850.png
.
نرى ان خياراتنا لجواب سؤالك اصبحت:

           الطريقة 2                   او                     الطريقة 1

Me.text3=Me.text1 & vbNewLine & Me.text2		Me.text3=Me.text1 & chr(13) & chr(10) & Me.text2
Me.text3=Me.text1 & vbCrLF & Me.text2		      Me.text3=Me.text1 & chr(13) & chr(10) & Me.text2             
Me.text3=Me.text1 & vbLF & Me.text2		        Me.text3=Me.text1 & chr(10) & Me.text2
Me.text3=Me.text1 & vbCr & Me.text2		        Me.text3=Me.text1 & chr(13) & Me.text2

 

 

جعفر

  • Like 7
  • Thanks 2
رابط هذا التعليق
شارك

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information