lordring قام بنشر نوفمبر 14, 2011 قام بنشر نوفمبر 14, 2011 السلام عليكم لدي حقل رابط تشعبي في النموذج لاضافة رابط لمكان موجود على الجهاز ماهو الامر البرمجي الواجب وضعه على الزر ادراج رابط في الصورة التالية لكي يفتح لي المربع الحواري الخاص بتحرير هذا الرابط كما في الصورة التالية hy.rar
أ / محمد صالح قام بنشر نوفمبر 14, 2011 قام بنشر نوفمبر 14, 2011 أخي الكريم ضع هذا الكود في حدث عن النقر للزر Me.الرابط.SetFocus SendKeys "^k" ويعني هذا الكود وضع المؤشر في حقل الرابط ثم الضغط على مفاتيح Ctrl+k وهي الخاصة بإظهار الصندق الحواري تحرير ارتباط تشعبي وذلك من خلال الطريقة sendkeys .......... ونصيحة أخي الكريم تعود على تسمية الحقول في الجداول والنماذج بحروف انجليزية ولو حتى بأسماء عربية مثل edafa حتى يسهل كتابة الكود 1
lordring قام بنشر نوفمبر 14, 2011 الكاتب قام بنشر نوفمبر 14, 2011 اخي مايحدث عن تطبيق الكود ظهور التالي حرف k داخل مربع النص فقط ولاتظهر النافذة الحوارية اذا امكن تعمل التعديل على الملف وتجربه وشكرا لك
أ / محمد صالح قام بنشر نوفمبر 14, 2011 قام بنشر نوفمبر 14, 2011 تفضل أخي الكريم diplay_hl_dialogbox.rar 1
lordring قام بنشر نوفمبر 14, 2011 الكاتب قام بنشر نوفمبر 14, 2011 شكرا اخي اكتشفت اين المشكلة حيث ان الكي بورد كان على اللغة العربية فلا يتم الايعاز عندما احوله الى اللغة الانكليزية يتم المطلوب لذلك جعلت فقط لغة لوحة المفاتيح لهذا المربع اللغة الانكليزية والان الامور تمام شكرا لك
Bluemind قام بنشر نوفمبر 15, 2011 قام بنشر نوفمبر 15, 2011 اسمحوا لي باضافه هذا الكود الى الحل في حدث عند النقر لزر الامر الرابط Private Sub cmdHyperlink_Click() On Error GoTo Errhandler Me.link.SetFocus RunCommand acCmdEditHyperlink Exit Sub Errhandler: If Err = 2501 Then Else MsgBox Err.Description, vbExclamation End If End Sub
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.