تحديد القيمة الأعلى المسموح بإدخالها في التكست بوكس

[أبوســـارة1973]

Private Sub TextBox20_Change()

TextBox39.Value = Val(TextBox14.Value) + Val(TextBox16.Value) + Val(TextBox18.Value) + Val(TextBox20.Value) + Val(TextBox22.Value) + Val(TextBox24.Value) + Val(TextBox26.Value)

TextBox35.Value = Val(TextBox2.Value) + Val(TextBox4.Value) + Val(TextBox6.Value) + Val(TextBox8.Value) + Val(TextBox10.Value) + Val(TextBox12.Value) + Val(TextBox14.Value) + Val(TextBox16.Value) + Val(TextBox18.Value) + Val(TextBox20.Value) + Val(TextBox22.Value) + Val(TextBox24.Value) + Val(TextBox26.Value) + Val(TextBox28.Value) + Val(TextBox30.Value) + Val(TextBox32.Value)

End Sub

أريد التعديل على هذا الكود ليقوم أيضا بتحديد أكبر قيمة مسموح بإدخالها في التكست بوكس أو إذا كانت هناك طريقة يمكن تحديد من خلال ( properties) الخاص بالتكست بوكس

في انتظار ردكم

[عبدالله المجرب]

أريد التعديل على هذا الكود ليقوم أيضا بتحديد أكبر قيمة مسموح بإدخالها في التكست بوكس أو إذا كانت هناك طريقة يمكن تحديد من خلال ( properties) الخاص بالتكست بوكس

في انتظار ردكم

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

فيمكنك من خلال properties

والصورة المرفقة توضح ذلك

توضيح.rar

[أبوســـارة1973]

شكرا أخي يا بن وطني الحبيب

المقصود من الحد الأعلى = أكبر قيمة maximum

وليكن مثلاً أن المطلوب إدخاله في التكست بوكس 1 يجب أن لاتكون أكبر من 10

بمعنى أن القيم المسموح بإدخالها في التكست بوكس1 هي الاعداد من ( 0 - 10 )

تم تعديل مايو 1, 2011 بواسطه abusarah73

[عبدالله المجرب]

شكرا أخي يا بن وطني الحبيب

المقصود من الحد الأعلى = أكبر قيمة maximum

وليكن مثلاً أن المطلوب إدخاله في التكست بوكس 1 يجب أن لاتكون أكبر من 10

بمعنى أن القيم المسموح بإدخالها في التكست بوكس1 هي الاعداد من ( 0 - 10 )

اخي ابو سارة

الكود المرفق (منقول)

يمكنك تغيير رقم التكست بوكس الذي تريد تحديد الارقام من 1 الى 10 فيه

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)

 If TextBox1.Value > 10 Then

 TextBox1 = ""

 MsgBox "يمكنك ادخال الارقام من 1 الى 10 فقط"

End If

End Sub

ابو احمد

[احمد فضيله]

السلام عليكم ورحمة الله و بركاته

اخي الحبيب / أبو أحمد

جزاك الله كل خير .. و ربنا يوفقك و دائماً للأمام

و الله الموفق و المستعان

و السلام عليكم ورحمة الله و بركاته