تبدیل ايتم هاي يك ليست باكس به خطوط يك تكس باكس مالتي لاين

[Admin of Part]

سلام
من مي خوام تمام ايتم هاي يك ليست باكس رو به خطوط يك تكس باكس مالتي لاين بياورم.هر ايتم در يك خط.

[Admin of Part]

كسي جواب سوال منو رو نمي دونه؟؟؟

[Last Killer]

javabe soalet vazehe
1 halghe for mikhay az 0 ta lengh list boxet
bad ba index har ozv ro mizari tooye textbox alabte in joori
textbox1.text+=.

[Last Killer]

string s = "";
for (int i = 0; i < lengh; i++)
{
s = listBox1.Items[i].ToString();
if (i == 0)
textBox1.Text += s;
else
textBox1.Text += "\r\n" + s;
}

[Admin of Part]

سلام
اخ ببخشيد Last Killer من يادم رفت يگم كه منظورم در ويبي دات نت بود....

[Last Killer]

سلام
اخ ببخشيد Last Killer من يادم رفت يگم كه منظورم در ويبي دات نت بود....

خب فرقي نمي كنه فقط بايد syntax برنامه رو عوض كني ولي روش كار همينه
مخصوصا قسمت items[] كه يك آرايه
بازم اگه نتوانستي بگو تا با V.B.NET بنويسم

[Admin of Part]

سلام
اره...اگه زحمتي نيست به وي بي دات نت هم بنويس چون وقتي به كد سي نيگاه مي كنم سرم گيج ميره و فشارم مي افته!

[Admin of Part]

سلام
اره دستت درد نكنه بي زحمت بنويس!
خيلي ممنون باشه جبران كنم

[Last Killer]

سلام
اره دستت درد نكنه بي زحمت بنويس!
خيلي ممنون باشه جبران كنم

جبران لازم ني
اينم كد وي بي

Dim c As Integer
For c = 0 To 2
If c = 0 Then
TextBox1.Text += ListBox1.Items(c)
Else
TextBox1.Text += vbCrLf & ListBox1.Items(c)
End If
Next