¿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