الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

عاوز كود الجمع

مغلق
بدأه hamada252_eg في 5 يوليو 2005 · 1 رد · 411 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

يا جماعة ياريت حد يساعدنى فى كود الجمع

عشان كل لما بعملة مبيجمعش

الكود

Private Sub Command1_Click()

Dim x As String

Text3.Text = x

x = Val(Text1.Text + Text2.Text)

يا ريت حد يساعدنى

#2

السلام عليكم

والله إنت راجل زي العسل..فكرتني بالماضي

Private Sub Command1_Click()

Dim x As String

x = Val(Text1.Text) + Val(Text2.Text)

Text3.Text = Str(x)

End Sub

هذا الموضوع مغلق.

مواضيع مشابهة