استخدام With في الكود
- التفاصيل
- الزيارات: 4226
بدلا من كتابة الكود التالي
Text1.BackColor = vbRed
Text1.FontBold = True
Text1.Height = 100
Text1.Text = "Test"
Text1.Width = 1000
اكتب الكود التالي حيث انه يعتبر أسرع من السابق
With Text1
.BackColor = vbRed
.FontBold = True
.Height = 100
.Text = "Test"
.Width = 1000
End With
http://arabteam2000-forum.com/index.php