منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
كود تمدد text في اثناء الكتابة - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم أسئلة واستفسارات الأعضاء - المنتدى القديم (http://vb4arb.com/vb/forumdisplay.php?fid=94)
+--- قسم : قسم Visual Basic 6 وما قبله (http://vb4arb.com/vb/forumdisplay.php?fid=167)
+--- الموضوع : كود تمدد text في اثناء الكتابة (/showthread.php?tid=9128)

كود تمدد text في اثناء الكتابة - wolf1120 - 02-06-13

من لديه كود كود تمدد text في اثناء الكتابة


الكود مثل مانضبط label في خاصية AutoSize

كود تمدد text في اثناء الكتابة - ALBRNS - 02-06-13

السلام عليكم

جرب التالي

PHP كود :
Private Sub Text1_Change()
Text1.Width = TextWidth(Text1.Text) + 120
Text1.Height = TextHeight(Text1.Text) + 120
End Sub 

بالتوفيق

كود تمدد text في اثناء الكتابة - samee119485r - 02-06-13

السلام عليكم

مشكور على الكود الجميل ورائع

تقبلوا مروري

كود تمدد text في اثناء الكتابة - VB_Coder - 03-06-13

السلام عليكم

- أفضل لك أن تضع ليبل وتخلي خاصية ال Autosize يساوي True وتخلي الليبل مخفي ، ثم تضع كود بسيط في حدث ال Change للتكست بوكس كالتالي :

كود :
Private*Sub*Text1_Change()
Label1.Caption = Text1.Text
Text1.Width*=*Label1.Width
Text1.Height*=*Label1.Height
End*Sub*

- وايضا اضبط نوع الخط وحجمه غي الليبل ليكون كما في التكست بوكس .
- تحياتي .

كود تمدد text في اثناء الكتابة - wolf1120 - 04-06-13

الف شكـــــــــــــــــــــــرا على الرد حياكم الله