الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

مساعدة:- شلون اتعامل الريتش بوكس والكومبو بكس

بدأه السعيـد في 16 يوليو 2009 · 3 رد · 537 مشاهدة · في Microsoft Visual Basic.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم ،،

عندي مشكله بسيطه اتمنى منكم المساعده

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

على سبيل المثال المثال اخترت بالكومبو بكس اخترت دولة الكويت ,,

ابي بيانات الكويت تطلع بصندوق ( rich text box)

وكذلك الدول الاخرى

بس هذا اللي ابيه

طبعا عندي ملفات rtf بمجلد البرنامج موجوده :)

ابي كود الكومبو بكس والكود اللي بالرج تكست بوكس

وشاكر لكم :)

65z7q64u7.jpg

#2

السلام عليكــم ورحمـة الله وبركاتــه ،،

عندما يقوم المستخدم باختيار عنصر من الكومبو بوكس يتم تنفيذ الحدث SelectedIndexChanged

فيكون الكود بهذا الشكل

	Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged
		Me.RichTextBox1.LoadFile(filename, RichTextBoxStreamType.RichText)
	End Sub

استبدل filename بمسار الملف الذى تريد تحميله

إن قلت قال الله قال رسولـه همزوك همز المنكر المتعالي
أو قلت قد قال الصحابة والألـى تبعاً لهم بالقول والأعمال
أو قلت قـال الشافعي وأحمد و أبو حنيفة والإمام الغالي
صدوا عن وحي الإله ودينـه واحتالوا على حرام الله بالإحلال
يا أمةً لعبت بدين نبيها كتلاعب الصبيان في الأوحال
حاشا رسول الله يحكم بالهوى تلك إذاً حكومة الضلال

feed.1.gif

#3

السلام عليكــم ورحمـة الله وبركاتــه ،،

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

الكود كامل

 

Public Class Form1

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

ComboBox1.Items.Add("1")

ComboBox1.Items.Add("2")

ComboBox1.Items.Add("3")

End Sub

 

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

Select Case ComboBox1.SelectedItem

Case 1

ListBox1.Items.Clear()

ListBox1.Items.Add("A")

ListBox1.Items.Add("A")

ListBox1.Items.Add("A")

Case 2

ListBox1.Items.Clear()

ListBox1.Items.Add("B")

ListBox1.Items.Add("B")

ListBox1.Items.Add("B")

Case 3

ListBox1.Items.Clear()

ListBox1.Items.Add("C")

ListBox1.Items.Add("C")

ListBox1.Items.Add("C")

End Select

 

End Sub

End Class
#4

السلام عليكم

مشكورين على استجاااابتكم السريعه :) وماقصرتوا والله مشكورين كثير

:) رايتكم بيضه

مواضيع مشابهة

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…