برامج

عندي سؤال بخصوص الـ KeyPress [الأرشيف] - برامج نت

المساعد الشخصي الرقمي

مشاهدة النسخة كاملة : عندي سؤال بخصوص الـ KeyPress


مسلم
10-09-2006, 06:39 AM
ممكن واحد منكم يشرح لي الكود هذا للـ VB.....انا اعرف وظيفته ولكني كلما احاول ان اعرف كيف الكود يعمل ماقدر استوعب:

If (e.KeyChar < "0" OrElse e.KeyChar > "9") AndAlso e.KeyChar <> ControlChars.Back AndAlso e.KeyChar <> "." Then
e.Handled = True
==============================
(If (e.KeyChar < "0" OrElse e.KeyChar > "9"
هذا الكود على حسب فهمي يبين انه اذا فيه اي رقم اقل من الصفر واكبر من التسعة فلا تسمح له بالظهور على خانة التعبئة....لكن العجيب عندما اضع في خانة التعبئة رقم اكبر من تسعة, يظهر لي ولكن اقل من الواحد لايظهر! كيف هذا؟

AndAlso e.KeyChar <> ControlChars.Back AndAlso e.KeyChar <>"."

وهذا الكود يقول (: واسمح للمستخدم ان يضغط Back Space اذا اراد وان يضع النقطة ولكن العجيب انه يوجد اشارة لاااا وهي <>!! فكيف يسمح للمستخدم استخدام الـ Backspace ووضع النقطة. ممكن التوضيح

ان شاء الله تكونوا فهمتوا قصدي.....ارجو المساعدة

مسلم
10-12-2006, 01:45 AM
ولارد! لايوجد محترفين هنا!؟ ام سؤالي غير واضح؟

@...Khalefa
10-12-2006, 02:41 AM
بسم الله
سؤالك واضح بس ياريت تظبط كتابة الكود ولو في ملف تكست علشان الكود ملغبط

Mr.Boom
10-14-2006, 05:52 AM
والله يالحبيب انا ماجربت الكود لان ماعندي فجوال بيسك
ولكن اعتقد ان الشرط if يتحقق في حال كتبت حرف او مسافة ( يعني مو رقم ولا نقطة ولا باك سبيس ) .
بس وش فايدة ذا اللي كتبت ؟ يعني وش المطلوب بالضبط ؟
اذا تبي تكتب حروف بس استخدم الاسكي افضل لك .

مسلم
10-14-2006, 08:20 AM
خلاص شباب, عرفت الحل.....على كل حال تسلموا حبايبي

21عزيز
03-26-2009, 09:08 PM
السلام عليكم ور حمة الله هذه اداة الشرط[

aminuss
04-12-2009, 03:17 AM
ya jib 3alaik kitabaf

Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
If e.KeyChar => "0" And e.KeyChar <= "9" Then
e.Handled = False
Else
e.Handled = True
End If
End Sub

madooo12
04-14-2009, 05:15 PM
اللي قبلي فعلا صح لأنك استعملت ORElse لكن يجب ان تستعمل and لان هذا يعني اذا كان الرقم اكبر من 0 و اصغر من 9 معا يتحقق الشرط و الله اعلم