كيفية نقل الكتابة من تكست بوكس الى ليبول

السلام عليكم

عفواً للخطأ

الحل كما قالت الأخت ندى بالضبط

هنالك طريقة أخرى تكمن كالتالي

  Dim frm2 As New Form2()
        frm2.txtBox2.Text = Me.txtBox1.Text
        frm2.Show()
        Me.Hide()

شاهد المثال المرفق

بالتوفيق

والله أعلم

frm.zip

عندك الفورم الأول بة مربع نص وزر و فورم ثاني فية اداة العنوان

اكتب في الفورم الأول في اعلى الشفيرة التالي

public shared a as textbox

وفي حدث تحمبل الفورم الأول

a=textbox1

a.text=textbox1.text

وفي الفورم الثاني في حدث تحميل الفورم الثاني

label1.text=form1.a.text

جرب وان شاء الله تضبط معك

سوف نقوم بتعريف variable على مستوى الفورم الاولى

عن طريق الكود الاتى

public myvar as string

بعد ذلك تستطيع ان تضع فى textbox lostfocus event الكود التالى:

myvar = me.textbox1.text

in the second form u can use form load event to write this code :

me.label1.text = myvar

now u can open the first form and write something in your textbox and go t another control then open form 2 u will see the result .....

والله تعالى اعلى واعلم واغنى ...

سوف نقوم بتعريف variable على مستوى الفورم الاولى

عن طريق الكود الاتى

public myvar as string

بعد ذلك تستطيع ان تضع فى textbox lostfocus event الكود التالى:

myvar = me.textbox1.text

in the second form u can use form load event to write this code :

dim myform as new form1
me.label1.text =myform.myvar

now u can open the first form and write something in your textbox and go t another control then open form 2 u will see the result .....

والله تعالى اعلى واعلم واغنى ...

اشكركم جميعا على حسن تعاونكم