سه COMBOBOX میخوام تو یه تکس نشون بدم

[Masoudse7en]

سلام
من سه تا کمبو دارم سال/ماه/روز میخوام این سه تا رو تویه یه تکس باکس نشون بدم مرسی اگه کمک کنید

[MahmoodGH]

سلام

يه پروژه ي جديد باز كن و توش يه دونه كمبو باكس و يكي تكس باكس و يه دونه هم دكمه قرار بده. خاصيت MultiLine تكس باكس برابر با True كن و بعد كد هاي زير رو توي فرمت بريز و ببين چي كار كردم.


Private Sub Command1_Click()
For i = 0 To Combo1.ListCount - 1
Text1.Text = Text1.Text & Combo1.List(i) & vbCrLf
Next i
End Sub

Private Sub Form_Load()
For i = 1 To 10
Combo1.AddItem ("User" & i)
Next i
Combo1.Text = Combo1.List(0)
'Text1.MultiLine
End Sub

[butterfly8528]

سلام دوست عزیز .

Text1.Text = Combo1.Text & "/" & Combo2.Text & "/" & Combo3.Text
موفق باشید .