11 lines
196 B
Text
11 lines
196 B
Text
' FB 1.05.0 Win64
|
|
|
|
Dim s As String = "panda"
|
|
Dim s1 As String = Mid(s, 2)
|
|
Dim s2 As String = Left(s, Len(s) - 1)
|
|
Dim s3 As String = Mid(s, 2, Len(s) - 2)
|
|
Print s
|
|
Print s1
|
|
Print s2
|
|
Print s3
|
|
Sleep
|