السلام عليكم
اريد صحة هذا الكود من عدمه لتكبير الخط فى مربع تحرير وسرد
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