ورود

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



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

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

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

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


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

.:KeihanCPU:.
یک شنبه 04 بهمن 1388, 00:41 صبح
Text1.Text = List1.List(List1.ListIndex)

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

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

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

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

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

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

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

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