منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

[php]
Private Sub Command1_Click()
Text3.Text = "%" & (Val(Text2.Text) / Val(Text1.Text)) * 100
End Sub
بالتوفيق

أكيد ممكن
Text3.Text = (Val(Text2.Text) / Val(Text1.Text)) * 100
Text3.Text = "%" & Left(Text3.Text, 5)

شكرآ لك بارك الله فيك

شكرا جزيلا للاخ Lion_Ksa على الاجابة

من دالة
round(text2.text,2)
حيث text2 مثلا الناتج
وعلامة الفاصلة بعدها يظهر رقمين عشريين فقط
يمكنك لزيادة