اريد ان ارفق الملف لكن الملف حجمه كبير 20 ميغابايت
كيف نعطل عمل TAB لأني اضغط على انتر المؤشر ينتقل الى مكان آخر بالرغم من استخدام الكود اللي كان مطروح هنا
Private Sub makemeastab(ByRef c As Control, e As KeyEventArgs)
If TypeOf c Is TextBox Then
If CType(c, TextBox).Multiline = False Then
If e.KeyData = Keys.Enter Then
SendKeys.Send("{Tab}")
End If
ElseIf CType(c, TextBox).Multiline = True And CType(c, TextBox).Text.EndsWith(".") Then
If e.KeyData = Keys.Enter Then
SendKeys.Send("{Tab}")
End If
End If
End If
End Sub
Private Sub Med_His_KeyDown(sender As Object, e As KeyEventArgs) Handles Med_His.KeyDown
makemeastab(sender, e)
End Sub
كيف نعطل عمل TAB لأني اضغط على انتر المؤشر ينتقل الى مكان آخر بالرغم من استخدام الكود اللي كان مطروح هنا
Private Sub makemeastab(ByRef c As Control, e As KeyEventArgs)
If TypeOf c Is TextBox Then
If CType(c, TextBox).Multiline = False Then
If e.KeyData = Keys.Enter Then
SendKeys.Send("{Tab}")
End If
ElseIf CType(c, TextBox).Multiline = True And CType(c, TextBox).Text.EndsWith(".") Then
If e.KeyData = Keys.Enter Then
SendKeys.Send("{Tab}")
End If
End If
End If
End Sub
Private Sub Med_His_KeyDown(sender As Object, e As KeyEventArgs) Handles Med_His.KeyDown
makemeastab(sender, e)
End Sub