مامعنى هاذا المسج الذي يظهر لي؟؟؟

اظن الخطا في الكود

أخي عند ضغطك على زر موافق ستجد الكومبايلر ظلل جزء من البرنامج باللون الأزرق

هل يمكن أن تنسخ السطر الموجود به هذا التظليل وتضعه هنا حتى أستطيع تحديد الخطأ بالضبط

عفوا لما أضغط موافق لا يظلل لي شيء من الكود

لكني اكتشفت أن المسج تظهر عند وضعي لهذا الكود

Private Sub Form_Load()
Data3.DatabaseName = App.Path + "\medical1.mdb"
Data3.RecordSource = "select* from clienttable "
Data3.Refresh
Data3.Recordset.MoveFirst
While Not Data3.Recordset.EOF
AutoComplete1.AddItem Data3.Recordset("Clientname")
Data3.Recordset.MoveNext
Wend
End Sub

أنا أستخدم أداة الأوتو كمبليت لإظهار اسم العميل

لكني لم أعرف ماهو الخطأ بالكود لأنه كان يعمل ببرنامج آخر

المسج التي تظهر لاتمنع من عمل الأداة تظهر فقط عند الدخول للفورم

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

additem

لمعرفة اين الخطأ من خلال قائمة ادوات في الفيجوال بيسك

tools-->options-->General tabs

ثم error trapping

ضع صح على الخيار الاول

break on all errors

وشغل البرنامج حيث سيتوقف البرنامج عند السطر الخطأ

بعد ذلك ارجع الخيار الى ما كان عليه