الاخوة الاعزاء
السلام عليكم
لدي قاعدة بيانات خاصة باوزان الرسائل واجرتها حسب الوزن تضم ثلاثة جداول وكذلك ثلاثة نماذج فيها كثير من الحقول من ضمن تلك الحقول مربع نص 34 فيه الكود الموضح ادناه اقوم بكتابة وزن الرساله ويظهر المبلغ المستحق حسب الكود في مربع نص باسم(text2)
المشكله :
ان لكل جهه تسعيره خاصه حسب الاوزان ولذلك جعلت لكل جهه نموذج مستقل كما يظهر من الاكواد .
المطلوب :
اريد ان اجمع تلك النماذج في نوذج واحد واضيف مربع نص اخر خاص بالجهات بحيث يكون كالتالي :
1- داخل المنطقة
2- داخل المملكة
3- دول الخليج
بحيث اذا كتبت رقم 1 يعطيني التسعيره الخاصة بداخل المنطقة ورقم 2 يعطيني التسعيره الخاص داخل المملكة ورقم 3 يعطيني التسعيره الخاصة بدول الخليج
الاكواد هي كالتالي : (والمعذه ربما يختلف كتابتها في المنتدى مع اني كتبتها بالصورة الصحيحه )
(داخل المنطقة)
Select Case نص34
Case Is <= 500
text2 = "30 ريال"
Case 500 To 1000
text2 = "35 ريال"
Case 1000 To 1500
text2 = "40 ريال"
Case 1500 To 2000
End Select
End Sub
-------------------------
(داخل المملكة)
Select Case نص34
Case Is <= 500
text2 = "50 ريال"
Case 500 To 1000
text2 = "58 ريال"
Case 1000 To 1500
text2 = "66 ريال"
Case 1500 To 2000
text2 = "74 ريال"
End Select
End Sub
--------------------------
(دول الخليج)
Select Case نص34
Case Is <= 500
text2 = "60 ريال"
Case 500 To 1000
text2 = "70 ريال"
Case 1000 To 1500
text2 = "80 ريال"
Case 1500 To 2000
text2 = "90 ريال"
End Select
End Sub
ارجوا ان يكون السؤال واضح واذا لم تستوعب السؤالي فاني اقول باختصار شديد اريد ان اجمع الاكواد السابقه في كود واحد ويعطي نفس النتائج وشكرا جزيلا للجميع