درروال Change تکست باکس ازکدهای زیر استفاده کنید
Private Sub t1_Change()
Dim s As String
s = t1.Text
t1.Format = "Standard"
t1.SelStart = Len(s) + 1
End Sub
درروال Change تکست باکس ازکدهای زیر استفاده کنید
Private Sub t1_Change()
Dim s As String
s = t1.Text
t1.Format = "Standard"
t1.SelStart = Len(s) + 1
End Sub
قوانین ایجاد تاپیک در تالار
پاسخ با نقل قول