منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب > قسم لغة الفيجوال بيسك VB.NET > قسم اسئلة VB.NET > المساعدة في خطأ اواجهة للمره الاولى.
نسخة كاملة : المساعدة في خطأ اواجهة للمره الاولى.
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
الصفحات : 1 2

Rabeea Qbaha

16-11-18, 01:28 PM
السلام عليكم 


اواجة مشكلة تظهر معي لاول مره ولا اعرف ما هي 

الخطئ يظهر كالاتي :

إقتباس :
  • Exception Exception thrown: 'System.InvalidCastException' in System.Windows.Forms.dll ("Interface not registered Failed to find proxy registration for IID: {EAC04BC0-3791-11D2-BB95-0060977B464C}.") System.InvalidCastException
يحدث الخطئ عند محاولتي لعمل auto complete source textbox

هذا هو الكود :

PHP كود :
Conn.Open()
    Dim cmd As New OleDbCommand("SELECT MaterialName FROM Materials where SANF = @SANF", Conn)
    cmd.Parameters.AddWithValue("@SANF", "fix_parts")
    Dim ds As New DataSet
        Dim da As New OleDbDataAdapter(cmd)
        da.Fill(ds, "list")

        Dim col As New AutoCompleteStringCollection
    Dim i As Integer
    MsgBox(ds.Tables(0).Rows.Count)
    For i = 0 To ds.Tables(0).Rows.Count - 1
            col.Add(ds.Tables(0).Rows(i)("MaterialName").ToString())
        Next
        Conn.Close()
        TxTMaterialName.AutoCompleteSource = AutoCompleteSource.CustomSource
        TxTMaterialName.AutoCompleteCustomSource = col
        TxTMaterialName.AutoCompleteMode = AutoCompleteMode.Suggest 


للعلم الكود كان يعمل على اكمل وجة في السابق في نفس المشروع 
وعند الانتهاء والتجربة ظهرت المشكله ولا اعرف السبب 
هذه صوره الخطا بالكامل على امل المساعدة 



و اذا كان هنالك حل بدبل لل AutoComplete ساكون ممتن 
في السابق اتذطر اني شفت طريقه تكون listview مع ال textbox بطريقه ما تشبة ال AutoComplete
اذا حد عندو معرفة بالموضوع 

Rabeea Qbaha

17-11-18, 04:00 AM
الا يوجد حلول ؟؟

elgokr

17-11-18, 04:27 AM
وعليكم السلام ورحمة الله وبركاته

فقط استخدم الكود بهذا الشكل 
كود :
       Conn.Open()
       Dim cmd As New OleDbCommand("SELECT MaterialName FROM Materials WHERE SANF = '@SANF'", Conn)
       cmd.Parameters.AddWithValue("@SANF", "fix_parts")
       Dim dt As New DataTable
       Dim da As New OleDbDataAdapter(cmd)
       da.Fill(dt)

       Dim col As New AutoCompleteStringCollection
       Dim i As Integer

       MsgBox(dt.Rows.Count)

       If Not dt.Rows.Count > 0 Then Conn.Close() : Exit Sub

       For i = 0 To dt.Rows.Count - 1
           col.Add(dt(i)("MaterialName").ToString())
       Next

       Conn.Close()
       TxTMaterialName.AutoCompleteSource = AutoCompleteSource.CustomSource
       TxTMaterialName.AutoCompleteCustomSource = col
       TxTMaterialName.AutoCompleteMode = AutoCompleteMode.Suggest

وان شاء الله سيتم حل المشكلة
وكل ما عليك هو التاكيد من كود الاستعلام والقيمة المرسلة لها

تحياتى لك
وتمنياتى لك التوفيق

Rabeea Qbaha

17-11-18, 08:14 PM
شكرا صديقي لكن للاسف المشكلة تحدث عند تعين خصيه AutoCompleteMode 

في هذا السطر البرمجي.





PHP كود :
TxTMaterialName.AutoCompleteMode = AutoCompleteMode.Suggest 

elgokr

17-11-18, 11:43 PM
اجعل الاسطر الاخيرة على هذا النحو
كود :
       TextBox1.AutoCompleteCustomSource = col
       TextBox1.AutoCompleteSource = AutoCompleteSource.CustomSource
       TextBox1.AutoCompleteMode = AutoCompleteMode.SuggestAppend

أو يمكنك ان تجعلها على هذا النحو
كود :
       TextBox1.AutoCompleteCustomSource = col
       TextBox1.AutoCompleteSource = AutoCompleteSource.ListItems
       TextBox1.AutoCompleteMode = AutoCompleteMode.SuggestAppend

وستحل المشكلة ان شاءا لله

تحياتى لك
وتمنياتى لك التوفيق

Rabeea Qbaha

18-11-18, 01:38 AM
(17-11-18, 11:43 PM)elgokr كتب : [ -> ]اجعل الاسطر الاخيرة على هذا النحو
كود :
       TextBox1.AutoCompleteCustomSource = col
       TextBox1.AutoCompleteSource = AutoCompleteSource.CustomSource
       TextBox1.AutoCompleteMode = AutoCompleteMode.SuggestAppend

أو يمكنك ان تجعلها على هذا النحو
كود :
       TextBox1.AutoCompleteCustomSource = col
       TextBox1.AutoCompleteSource = AutoCompleteSource.ListItems
       TextBox1.AutoCompleteMode = AutoCompleteMode.SuggestAppend

وستحل المشكلة ان شاءا لله

تحياتى لك
وتمنياتى لك التوفيق




احصل على الخطا الاتي :

إقتباس :An unhandled exception of type 'System.NotSupportedException' occurred in System.Windows.Forms.dll

Additional information: The value AutoCompleteSource.ListItems is not applicable to the TextBox control.

PHP كود :
       TextBox1.AutoCompleteCustomSource = col
        TextBox1.AutoCompleteSource = AutoCompleteSource.ListItems
        TextBox1.AutoCompleteMode = AutoCompleteMode.SuggestAppend 

واحصل على نقس الخطا في الاقتراح الاول

قمت بتعديل السؤال القي نظرة

elgokr

18-11-18, 03:10 AM
جرب كده اعمل مشروع جديد تجريبى
واضع بها الكود كامثال لكن اجعل قيمة col يدوياً
وشوف هل سيظهر نفس المشكلة فى المشروع الجديد

ام انه يعمل بدون اى مشكلة

تحياتى لك
وتمنياتى لك التوفيق

Rabeea Qbaha

18-11-18, 03:33 AM
(18-11-18, 03:10 AM)elgokr كتب : [ -> ]
جرب كده اعمل مشروع جديد تجريبى
واضع بها الكود كامثال لكن اجعل قيمة col يدوياً
وشوف هل سيظهر نفس المشكلة فى المشروع الجديد

ام انه يعمل بدون اى مشكلة

تحياتى لك
وتمنياتى لك التوفيق

قمت بتجربه هذا الشئ ويعمل بدون مشاكل

ايضا يعمل جيدا على النسخه الاقدم من المشروع ( نسخه احتياطية من قبل ٤ ايام)

elgokr

18-11-18, 02:23 PM
اذا المشكلة فى المشروع نفسه من جانب الملفات
او اصدار .net framework فى المشروع نفسه

على اى حال ارفق لى المشروع لاختباره عندى ومراجعة السورس
واعادة رفعه لك مع التوضيح انين كان المشكلة تماماً

تحياتى لك
وتمنياتى لك التوفيق

Rabeea Qbaha

18-11-18, 03:42 PM
ساحاول ارفاق المشروع لك لكن المشروع كبير قليلا,ساقوم بارسلة لك على الخاص لان المشروع للبيع ومن حق الزبون عدم نشر السورس كود 

لكن تذكرت شيء صغير يمكن ان يساعد :  لقد قمت بحذف VBIED من ال reference للمشروع بالخطأ

لكن انا جربت الكود في مشروع اخر جديد لا يوجد VBIED في ال reference الخاص به ويعمل ال auto complete بشكب جيد.

لا اعلم اذا يوجد علاقة
الصفحات : 1 2
منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب > قسم لغة الفيجوال بيسك VB.NET > قسم اسئلة VB.NET > المساعدة في خطأ اواجهة للمره الاولى.