ورود

View Full Version : مبتدی: اضافه کردن آیتم های Listbox به Textbox



behroz1992
شنبه 03 بهمن 1388, 22:01 عصر
سلام دوستان من listbox دارم چطوری وقتی یکی از عنصرهای listbox انتخاب کردم به textbox اضافه بشه ممنون

For K = 1 To List1.ListCount - 1
Text1.Text = List1.List(K)
Next

lordarma
شنبه 03 بهمن 1388, 23:17 عصر
سلام دوستان من listbox دارم چطوری وقتی یکی از عنصرهای listbox انتخاب کردم به textbox اضافه بشه ممنون

For K = 1 To List1.ListCount - 1
Text1.Text = List1.List(K)
Next


بفرمایید ، سورس اش را نوشتم...
موفق باشید.

.:KeihanCPU:.
شنبه 03 بهمن 1388, 23:41 عصر
Text1.Text = List1.List(List1.ListIndex)

javadt
یک شنبه 04 بهمن 1388, 00:22 صبح
Text1.Text = List1.Text

behroz1992
یک شنبه 04 بهمن 1388, 02:06 صبح
خیلی ممنون ولی یه مشکلی که دارند اینه که textbox را خالی میکنند من نمیخوام که textbox خالی بشه

xxxxx_xxxxx
یک شنبه 04 بهمن 1388, 03:12 صبح
Text1.Text = Text1.Text & " " & List1.List(List1.ListIndex)

behroz1992
یک شنبه 04 بهمن 1388, 06:32 صبح
Text1.Text = Text1.Text & " " & List1.List(List1.ListIndex)

ممنون میشم یه توضیح مخصر بدهید

.:KeihanCPU:.
یک شنبه 04 بهمن 1388, 09:19 صبح
ممنون میشم یه توضیح مخصر بدهید

یعنی هر چی که تو Textbox بود به اضافه یک فاصله " " و محتوای لیست باکس که روش کلیک شده

اینا همه میشه محتوای جدید تکست باکس