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

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : ممكن كود يجعل ComboBox يفتح تلقائيا عند بدأ الكتابة (/showthread.php?tid=8828)



ممكن كود يجعل ComboBox يفتح تلقائيا عند بدأ الكتابة - دمعة المقهور - 08-05-13

السلام عليكم ورحمة الله و بركاته
أخواني الاعضاء :
ممكن كود يجعل ComboBox يفتح تلقائيا عند بدأ الكتابة :confused:


ممكن كود يجعل ComboBox يفتح تلقائيا عند بدأ الكتابة - Sajad - 08-05-13

السلام عليكم

اخي العزيز سؤالك غير واضح؟

هل تقصد التكملة التلقائية للكلمات مثل الgoogle؟



ممكن كود يجعل ComboBox يفتح تلقائيا عند بدأ الكتابة - دمعة المقهور - 08-05-13

نعم أخي الكريم



ممكن كود يجعل ComboBox يفتح تلقائيا عند بدأ الكتابة - Sajad - 08-05-13

السلام عليكم اخي العزيز

ركز معي جيدا:

اولا هنالك ثلاث خصائص للCombobox مختص بالتكملة التلقائية للكلمات:

1- خاصية AutoCompleteCustomSource ومن خلاله نضيف البيانات الىها عن طريق الAdd لكي يكون حاوية للكلمات التي ستقارن بالتي تكتب بالCombobox
2- خاصية AutoCompleteMode ويحتوي على ثلاث حقول: الاول Suggest والثاني Append والثالث يضم الاول والثاني SuggestAppend أي (أقترح وأكمل الكلمة)
3- AutoCompleteSource من خلاله نحدد مصدر البيانات

اليك هذا المثال:

اولا اجعل خاصية AutoCompleteSource=CustomSource
ثانيا اجعل خاصية AutoCompleteMode=SuggestAppend

واكتب هذا الكود في حدث الLoad للفورم

PHP كود :
Dim names() As String = {"sajad","سمير","ameer","amjad","aya" }
ComboBox1.AutoCompleteCustomSource.AddRange(names

ثم نفذ واكتب أي اسم موجود ضمن المصفوفة وشاهد النتيجة


ممكن كود يجعل ComboBox يفتح تلقائيا عند بدأ الكتابة - دمعة المقهور - 09-05-13

شكراً أستاذ Sajad وووجزاك الله خير
جربت الكود وتنفذ 100% قمة الروعة


ممكن كود يجعل ComboBox يفتح تلقائيا عند بدأ الكتابة - Sajad - 09-05-13

السلام عليكم

العفو اخي العزيز نحن في الخدمة ان شاءالله



RE: ممكن كود يجعل ComboBox يفتح تلقائيا عند بدأ الكتابة - swengineeer - 26-05-15

(08-05-13, 08:42 PM)Sajad كتب : السلام عليكم اخي العزيز

ركز معي جيدا:

اولا هنالك ثلاث خصائص للCombobox مختص بالتكملة التلقائية للكلمات:

1- خاصية AutoCompleteCustomSource ومن خلاله نضيف البيانات الىها عن طريق الAdd لكي يكون حاوية للكلمات التي ستقارن بالتي تكتب بالCombobox
2- خاصية AutoCompleteMode ويحتوي على ثلاث حقول: الاول Suggest والثاني Append والثالث يضم الاول والثاني SuggestAppend أي (أقترح وأكمل الكلمة)
3- AutoCompleteSource من خلاله نحدد مصدر البيانات

اليك هذا المثال:

اولا اجعل خاصية AutoCompleteSource=CustomSource
ثانيا اجعل خاصية AutoCompleteMode=SuggestAppend

واكتب هذا الكود في حدث الLoad للفورم


PHP كود :
Dim names() As String = {"sajad","سمير","ameer","amjad","aya" }
ComboBox1.AutoCompleteCustomSource.AddRange(names

ثم نفذ واكتب أي اسم موجود ضمن المصفوفة وشاهد النتيجة

مشكور اخي .. كيف اعمل تكملة تلقائي textboox من قاعدة بيانات


RE: ممكن كود يجعل ComboBox يفتح تلقائيا عند بدأ الكتابة - الطالب - 26-05-15

سلام

هذا يعتمد على طريقة الربط مع قاعدة البيانات، فيه الطريقه الربط بالمعالج وفيه طريفه الربط بالكود

طريقه الربط بالمعالج
حدد الخاصيه AutoCompleteMode على Suggest
وحدد الخاصيه AutoCompleteSource على ListItems
وحدد الخاصيه DataSource على اسم الجدول من الداتاسورس
وحدد الخاصيه DisplayMember على اسم العمود اللي يبيه يظهر عي العاصر
وحدد الخاصيه ValueMember على اسم العمود وغابا يكون id

طريقه الربط باكود
كود :
Dim cnn As New OleDb.OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=Database1.accdb;")

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

    Dim dataAdapter As New OleDb.OleDbDataAdapter("SELECT * FROM [tb1]", cnn)
    Dim dataTable As New DataTable
    dataAdapter.Fill(dataTable)
    ComboBox1.DataSource = dataTable
    ComboBox1.DisplayMember = "fullName"
    ComboBox1.ValueMember = "id"
    ComboBox1.AutoCompleteMode = AutoCompleteMode.Suggest
    ComboBox1.AutoCompleteSource = AutoCompleteSource.ListItems

End Sub

موفقين