RosettaCodeData/Task/Binary-strings/VBA/binary-strings-8.vba

7 lines
150 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
Sub ExtractFromString()
Dim A$, B As String
A = "Hello world"
B = Mid(A, 3, 8)
Debug.Print B 'return : llo worl
End Sub