Demetrio Cassarino
12 lines
354 B
VB.net
12 lines
354 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 Then
|
|
Txt.AcceptsReturn = True
|
|
Txt.TextWrapping = TextWrapping.Wrap
|
|
Txt.AppendText(Environment.NewLine)
|
|
End If
|
|
End Sub
|
|
|
|
End Class
|