تكبير الخط فى مربع تحرير وسرد

[مصطفى كمال متولى]

السلام عليكم

اريد صحة هذا الكود من عدمه لتكبير  الخط فى مربع تحرير وسرد

 

Private Sub Text1_KeyPress(KeyAscii As Integer)
Dim a As String, b As Integer
Text1.Text = StrConv(Text1.Text, vbProperCase) + vbcrf
Text1.SelStart = 10
Text1.SelStart = Text1.SelStart + 50
End Sub

77777.rar

[مصطفى كمال متولى]

للرفع

[ابو راكان العودة]

للرفع