PDA

View Full Version : سوال: مشكل در نوشتن 13469 كاراكتر در textbox به وسيله ي كد


homahelp
جمعه 10 خرداد 1392, 10:32 صبح
مي خوام تو محيط كد نويسي، تعداد 13469 كاراكتر را در textbox بنويسم تمام اين كاراكتر ها در يك خط است اما وقتي تو قسمت كد كپي مي كنم در يك خط جا نمي شه و بنابر اين ويژوال بيسيك اخطار مي ده چجوري مي شه تمام اين كاراكتر ها رو در قسمت كد در يك خط نوشت؟
setroyd
جمعه 10 خرداد 1392, 11:53 صبح
شما multiline رو true نکنی میشه چون خط بعدی وجود نداره . البته با Multi هم میشه ولی اگه نیازی به multi نداری نکن اگرم داری تست میکنم یه کد برات میزارم اگه بشه .

Private Sub Command1_Click()
For a = 1 To 13469
Text1.Text = Text1.Text & "A"
Next
End Sub
mehran901
جمعه 10 خرداد 1392, 16:07 عصر
َما میتونی تا 65 هزار کاراکتر و خورده ای رو داخل ی رکورد از ریسورس قرار بدی و با دستور loadresstring اونو به داخل تکستباکس منتقل کنین ...

text1 = loadresstring(ID)
setroyd
جمعه 10 خرداد 1392, 20:03 عصر
اهان گرفتم بگو تو محیط کد نویسی خوب ! نه نمیشه چون مقداری واسه پیش فرض هست و vb اخطار میده .
vbhamed
شنبه 11 خرداد 1392, 02:02 صبح
سلام

بهترين راه استفاده از ريسورس هست كه mehran901 (http://barnamenevis.org/member.php?269113-mehran901) عزيز اشاره كردن و اگر هم كاراكترهات بيشتر هست مي‌توني از فايل براي ذخيره سازي اوليه استفاده كني

البته يك راه ديگه هم وجود داره، در زير مي‌تونيد براي هر بار مقدار قرار دادن در x حدودا 25 خط بنويسيد و اين خطوط 25 تايي رو به تعداد دلخواه تكرار كنيد، خطوط 25 تايي دوم تا آخر يك فرق كوچيكي دارن و اون اينكه در اونها متغير x با مقدار قبليش جمع ميشه
Dim x$

x = "word word word word word word word word word word word word word word " & _
"word word word word word word word word word word word word word word " & _
"word word word word word word word word word word word word word word " & _
"word word word word word word word word word word word word word word " & _
"word word word word word word word word word word word word word word "

x = x & "word word word word word word word word word word word word word word " & _
"word word word word word word word word word word word word word word " & _
"word word word word word word word word word word word word word word " & _
"word word word word word word word word word word word word word word " & _
"word word word word word word word word word word word word word word "

x = x & "word word word word word word word word word word word word word word " & _
"word word word word word word word word word word word word word word " & _
"word word word word word word word word word word word word word word " & _
"word word word word word word word word word word word word word word " & _
"word word word word word word word word word word word word word word "