¿Cómo programar la copia de texto en VB?

Lo que se debe tener en cuenta aquí es que ?Text1.SelStart = 7 se selecciona después del 7. Queremos comenzar desde el 8, por lo que debe establecerse en 7. Consulte el archivo adjunto para obtener más detalles.

Subcomando privado1_Click()

Text1.SelStart = 7

Text1.SelLength = 9

Text1.SetFocus

End Sub

Private Sub Command2_Click()

Clipboard.Clear

Clipboard.SetText Text1.SelText 'Copia el texto seleccionado en el cuadro de texto a Portapapeles

Label1.Caption = Clipboard.GetText 'Asigna el texto del portapapeles a Label1

End Sub