hfrance

micheal R jordan نعم شكرا جزيلا لكم جميعا على هذة الردود المشجعة والاخ ولكن مزالت المشكلة قائمة اخى بهذا الكود ولم ينظبط معى فهو لايكتب جماعى ايضا بل وايضا من الناحية الفردية يكتب عدد احرف مزدوج طريقة key اكثر نجاحا فعلا ولكن هناك مشكلة مازالت تورقنى وهى اريد …

الله اكرم جزاك الله خيرا اخى اخيرا اتحلت المشكلة وبارك الله فيك فهمت الامر اذن العمل ب KeyAscii اريح بكثير من اى امر وشكرا مرة اخرى

اخى الكريم لو لاحظت او جربت هذا الكود الموضوع لن يعمل معك غير اخر امر فقط يعنى Text2.Text = Replace(Text1.Text, "e", "o") اما الباقى فسيلغى الامر منهم ..فاريد فقط كيفية جعل الجميع يعمل فى ان واحد دون الغاء اى منهم هل من مساعدة؟

نعم جزاك الله خيرا وان شاء الله ساراجع هذا الباب ...ولكن ياخى اظن انك لم تعرف مشكلتى بعد ...مشكلتى ليس فى كتابة الحرف الواحد هى فى كتابة اكثر من حرف بمعنى Text2.Text = Replace(Text1.Text, "h", "k") سمح بتكرار الكتابة بالفعل ولم يخطى ولكن المشكلة فى اكثر من حرف…

جزاك الله خيرا ياخى بس هناك تعقيب اولا شكرا فعلا الطريقة نجحت ولكن هنا امر ما ايضا if text1.text ="h" then text2.text = "k" end if text2.text= replace(Text1.Text, "h", "k") هذا يعمل جيدا اذا اردت كتابة حرف واحد ولكن اذا مثلا فعلت if text1.text ="h" then text2.…

السلام عليكم ورحمه الله وبركاتة لدى مشكلة اخوانى فى التكست فى الفيجول بيزك فانا اريد جعل 2 تكست يكتبو فى نفس الوقت اقصد بذلك الاتى if text1.text ="h" then text2.text = "k" end if المشكلة انى اريد ان كل ماكتب حرف الاتش ان يظهر حرف الكية لكن الذى يحدث انى عندما …