تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[كود] كود برمجي
#1
سلام عليكم ارجو المساعده
سوال
عندي ثلاث تكست بوك واحده للاسم الرباعي وواحده للاسم الثلاثي وواحد للاسم الرباعي واللقب اريد كود بحيث اذا ضفت اسم غير رباعي في تكتست الاسم الرباعي يقولي  لازم تدخل الاسم الرباعي ونفس الحاله للتكست بوك الباقين (الاسم الثلاثي,الاسم الرباعي واللقب) [يعني اذا دخلت اسم غير ثلاثي في تكست بوك الاسم الثلاثي تظهر راله اتقول انو الاسم غير ثلاثي ,وكذالك بالنسبه للاسم الرباعي واللقب اذا دخلت الاسم رباعي من غير لقب تظهر رساله تقول يجب ادخال اللاسم الرباعي واللقب) بالاضافه الى ذلك اريده مثلا من ادخل اسم في اي من التكست بوك الثلاث (الاسم الرباعي ,الاسم الثلاثي,الاسم الرباعي واللقب )وكان الاسم غير متطابق في اي وحده من التكست بوك دول  تظهر رساله تقول انو الاسم غير متطابق ... اذا ممكن تساعدوني  
الرد }}}
تم الشكر بواسطة:
#2
.....

الاسم الثلاثي والرباعي يصعب حسمها ب TextBox واحد،
ومن مشاكلها لو كان الإسم الواحد اشتمل على مسافة مثل (ضيف الله)الذي يصعب حذف المسافة،
فعندئذ الاسم (محمد ضيف الله) سيعتبر اسم ثلاثي،
قد يستعين البعض بمكتبة أسماء لاستنثناء الاسماء المركبة التي تحتوي مسافة واعتبارها اسماً واحداً
ولكن لا تسلم من اسماء لم تخطر بالبال
أو حتى بعض الاسماء المركبة مثل (صالح محمد "أنا أعرف شخصا اسمه الأول فقط هكذا")
فستحتار بكيفية التعامل معه هل هما اسمان أم اسم واحد مركب.

الكثير استخدموا مربعات نص منفصلة لكل من الاسم الأول والاسم الثاني الخ للخروج من هذه المشكلة مع
وضع حقل لكل اسم بالاضافة للإسم الكامل الذي يشمل محتويات الاسماء  كلها مثل
TextBox1: ضيف الله
TextBox2: محمد
TextBox3: العربي
TextBox4: (ضيف الله محمد العربي) أو (العربي ضيف الله محمد) حسب الاسلوب المتبع من ناحبة البدء بالعائلة أم بالاسم الأول.

قد يستغن بعض المبرمجين عن TextBox4 إذا كانوا متمكنين من الاستعلام في قواعد البيانات.

.....
الرد }}}
تم الشكر بواسطة:
#3
شكرا جزيلا
لكن اذا ممكن تنطيني الكود البرمجي...
الرد }}}
تم الشكر بواسطة:
#4
شكرا جزيلا
الرد }}}
تم الشكر بواسطة:
#5
مشكور اخي جزاك الله خير ....لكن كيف اقدر اعمل الاسم الاول من الاسم الثلاثي يساوي الاسم الاول من الاسم الرباعي لنفس الاسم
الرد }}}
تم الشكر بواسطة:
#6
.....

ممكن عمل أربع TextBox بالاضافة لواحد خامس يظهر الاسم كامل سواء أدخل ثلاثي أو رباعي كالتالي
Text1 الاسم الأول - إجباري
Text2 الاسم الثاني - إجباري
Text3 الاسم الثالث
Text4 اسم اللقب (العائلة) - إجباري
Text5 الاسم كاملاً

هنا نرى أن الأول والثاني بالاضافة إلى اللقب (العائلة) إجباري، فبالتالي لن يكتب أقل من الاسم الثلاثي
كود :
Private Sub Command1_Click()
    ' نلاحظ لم نتفحص الثالث لأنه اختياري
    If Trim$(Text1.Text) = "" _
    Or Trim$(Text2.Text) = "" _
    Or Trim$(Text4.Text) = "" Then
        MsgBox "يجب إدخال الاسم الثلاثي على الأقل شامل اللقب"
    End If
End Sub

Private Sub Text1_Change()
    Call FullName
End Sub
Private Sub Text2_Change()
    Call FullName
End Sub
Private Sub Text3_Change()
    Call FullName
End Sub
Private Sub Text4_Change()
    Call FullName
End Sub

Private Sub FullName()
    Dim name As String
    name = Trim$(Text1.Text)
    name = name & " " & Trim$(Text2.Text)
    name = Trim$(name) & " " & Trim$(Text3.Text)
    name = Trim$(name) & " " & Trim$(Text4.Text)
    Text5.Text = Trim$(name)
End Sub


اطلاق العنان للخيال البرمجي بتسلسل منطقي ينتج في النهاية برمجة المهمة المطلوبة

.....
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  سطر برمجي يعطي رسالة خطأ عند التنفيذ - تكوين قاعدة بيانات ةقت التنفيذ ahmed.m 2 1,571 30-09-19, 01:36 AM
آخر رد: ahmed.m
Question كود برمجي متعدد المهام dr.mostashar 1 1,537 31-05-19, 03:28 AM
آخر رد: Amir_Alzubidy
  من لديه كود لضغط الزر برمجي كل 10 ثوان scsi7000 6 2,515 17-09-16, 04:42 PM
آخر رد: Amir_Alzubidy

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


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