Как можно реализовать cntr+a? на текст бокс не действует в хапущеном экзешнике.
Существуют ли простые средства копирования в буфер выделенного?
Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
If Shift = 2 And KeyCode = 65 Then
Text1.SelStart = 0
Text1.SelLength = Len(Text1.Text)
End If
End Sub
Clipboard.Clear
Clipboard.SetText Text1.Text
Сейчас этот форум просматривают: Google-бот и гости: 114