کپی شدن مقدار text د رکامند

[vB.N3T]

دوستان سلام

من یه برنامه ای نوشتم که مقداری کاراکتر تو دو تا لیست باکس هست که وقتی رو هر کدوم از کاراکتر ها کلیک میکنم مقدار اون میاد تو تکس باکس قرار میگره با کلیک بعدی مقدار قبلی پاک میشه مقدار جدید میاد جاش چه جور میتونم مقدار قبلی رو حفظ کنم مقدار جدید هم کنارش نمایش داده بشه

در اخر هم کامند دارم که میخوام مقدار تکس رو نگه داره بعد هر جا خواستم پیست کنم ممنون کمکم کنید

[Tasiyan]

Private Sub Form_Load()
List1.AddItem ("Test0")
List1.AddItem ("Test1")
End Sub

Private Sub List1_Click()
Text1.Text = Text1 + " " + List1.Text
End Sub
:لبخند:

[xxxxx_xxxxx]

در اخر هم کامند دارم که میخوام مقدار تکس رو نگه داره بعد هر جا خواستم پیست کنم ممنون کمکم کنید

Private Sub cmdCopy_Click()
Clipboard.SetText Text1.Text
End Sub