-
چرا ( chr(13 کار نمی دهد
با سلام
یه سوال ساده دارم
فرض کنید دو تا تکس باکس داشته باشیم که با وارد کردن اطلاعات به یکی(text2.text) و کلیک روی باتم اطلاعات به تکس دیگر اضافه می شود اما می خواهم این اطلاعات با اینتر از هم جدا شوند یعنی
msgbox( text1.text + chr(13) + text2.text)
تا اینجا همان نتیجه ای را می دهد که می خواهم با این تفاوت که فقط نمایش می دهد مشکل اینجا است که با ریختن همین اطلاعات صحیح در text1.text بجای اینتر از کارکتر "س" استفاده می کند در رایانه دوستم نیز "م" می نویسد
ایراد از کجاست
-
اولاٌ که Msgbox تو این حالت پرانتز نمی خواهد . بعد کد هم درست است مشکلی نداره .
شما دو تا چیز رو امتحان کن .
اول به جای + از & استفاده کن
اگر نشد از کلمه کلیدی Vbcrlf به جای Enter استفاده ..
ولی این کدی که نوشتی باید جواب بده چون همینو من امتحان کردم جواب داد .
کد:
MsgBox Text1.Text + Chr(13) + Text2.Text
MsgBox Text1.Text & Chr(13) & Text2.Text
MsgBox Text1.Text & Vbcrlf & Text2.Text
-
اولا خیلی ممنون از جواب دادن شما دوست عزیز
دوما & را قبل از پرسش امتحان کرده بودم
سوما اگر text multiline ها برابر فالس باشد هیچ کدام از کدها کار نمی دهد
چهارم اگرtext multiline ها برابر تورو باشد کد شما Text1.Text & vbCrLf & Text2.Text کار می دهد
در ضمن من خودم اتفاقی فهمیدم که باید مولتی لایشن ترو باشه (از جواب دادن شما باز هم متشکرم)
-
اگه خواستی از chr هم استفاده کنی بزن ( chr(13) & chr(10 . به جای vbCrLf میشه vbNewLine هم گذاشت.