Files
EgtCAM5/OptionPanel/DrawOptionPanel/InputExpander/InputExpanderV.xaml.vb
T
2025-03-21 11:15:44 +01:00

12 lines
418 B
VB.net

Public Class InputExpanderV
Private Sub TextBox_PreviewKeyDown(sender As Object, e As KeyEventArgs)
If e.Key = Key.Enter And Keyboard.Modifiers = ModifierKeys.Shift Or e.Key = Key.V And Keyboard.Modifiers = ModifierKeys.Control Then
Txt.AcceptsReturn = True
Txt.TextWrapping = TextWrapping.Wrap
'Txt.AppendText(Environment.NewLine)
End If
End Sub
End Class