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

أخي ذلك عن طريق الحدث textvaluechange

اكتب في التالي

if lst.text<>-1 then
msgbox "خطأ"
end if

إن لم يكن الجواب كذلك فأرجوا توضيح السؤال أكثر وشكرا

أخي الكريم ,, عذراً فانا لا افهم مامعنى كلمة الحدث ,,

فأنا مبتدئ , كما أرجو أن ترشدني خطوة بخطوة أين اجد هذا الحدث textvaluechange

ألف شكر

أرجو الرد

أخي الحدث اسمهTextChanged وتجده ضمن احداث أداة comboBox في الكود

أخي العزيز ,, المشكلة أني لا افهم مامعنى كلمة حدث !!!!!!!!!!!! لذلك انا اطلب التوضيح خطوه بخطوة ,,

جربت الكود التالي ,,

ComboBox5.TextChanged

لكنه وضع تحته خط أي انه غير موجود

جربت

ComboBox5.Text.Changed

أيضا غير موجود

جربت

ComboBox.TextChanged

ولكنه ايضا وضع خط

ذهبت وبحثت في البرابرتيز للكومبو بوكس ولكني لم اجد شيئاً ,, ارجو ان اعرف الجواب بشكل مفصل ودقيق مع العلم ان اسم الكومبو هوComboBox5

ااخوان ,,نريد الاجابه لو سمحتوا

و الله لا أعرف في الفيجوال بايسك

http://msdn2.microsoft.com/en-us/library/s...extchanged.aspx

http://msdn2.microsoft.com/en-us/library/aa711096.aspx

ياجماعه مااعتقد السؤال صعب ,, نريد جواب والله متعطل من اسبوعين

مكان أختيار الحدث فى شاشة الاديتور يوجد 2 كومبو يوكس الايمن خاص بأختيار الاحداث والايسر به اسماء الادوات الموجودة على الفورمه

كما بالصورة المرفقة كمبو الاحداث به هو اللى عليه علامة X محاطة بدائرة حمراء

صديقي مشكلتك تحدث لأن الحدث SelectedIndexChanged يتنفذ في كل مرة تحمل فيها ال ComboBox بال data.

فأنت في في ال Form Load تحمل ال ComboBox بال data و هكذا...

الحل هو ان تستعم ال Flags كي لا تسمح للحدث بأن يتكرر

مثلا : عرف متغير Global و سميه bFirstLoad و اسند له قيمة False, عند حدث ال Form Load اسند له True و في حدث ال SelectedIndexChanged لي ال ComboBox اكتب

IF bFirstLoad = False Then

ضع الكود المكتوب سابقا  هنا

Else

bFirstLoad = False

End IF

اسند القيمة bFirstLoad = True في اي حدث سيغير قيمة ال ComboBox مثل Form Load

لم تخبرنا عن النتائج!!!!

njd

شكراً جزيلاً ,, معلومه طالما بحثت عنها :))

علاء راجح

اضططرت للسفر ,, سأعود السبت ان شاء الله , واجرب الحلول ,, واخبركم بالنتائج,, وفعلا كلامك منطقي واعتقد انك اصبت , ارجو ان تكون متواجد السبت ان شاء الله ,, شكرا على حرصك ..

إخواني ,,,

لقد جربت حلولكم ,, ولكنه مازال يكرر نفس المشكلة !!

حتى انه اصبح يعطيني الرساله التاليه

This causes two bindings in the collection to bind to the same property.

Parameter name: binding

حيث اني استعمل الكومبو بوكس اكثر من مره . ماهو الحل؟

صديقي ارفع لي ال al code (.vb)

افحص المرفقات عزيزي

New_Folder__2_.rar

عندي سؤال أعتقد ان حله سيقوم بحل المشكلة ,,

كيف اقوم بمسح البيانات من تيكست بوكس واجعله نظيف ؟؟؟؟؟؟؟؟

فرضا اني قمت بإسناد قيمه في التكست بوكس بالطريقه هذه ,,

TextBox5.DataBindings.Add("Text", dataSet99, "Dests.dest_value")

كيف اقوم بتنظيف هذا التكست بوكس واجعله خالي؟

صديقي يرنامج صغير يستعمل كومبو بوكس و تتغير قيمته من اكثر من مكان

انظر كيف انحلت المشكلو بستخدام ال bFirstLoad.

ثم طبق هذا المبدأ على مشروعك

Dim bFistLoad As Boolean = False

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

bFistLoad = True

LoadComboBox()

End Sub

Sub LoadComboBox()

Dim i As Integer

For i = 0 To 10

ComboBox1.Items.Add(i)

Next

ComboBox1.SelectedIndex = 0

End Sub

Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged

If bFistLoad = False Then

MsgBox("Changed.")

Else

bFistLoad = False

End If

End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

bFistLoad = True

LoadComboBox()

End Sub

لا تنسى تحميل البرنامج

WindowsApplication2.zip

WindowsApplication2.zip

ألف شكر لك عزيزي ,, لقد تم حل المشكلة , والفضل لله ثم لك ,, ألف شكر