例: LeftBP function

' The value "AB" or other value depending on platform 
' is assigned to the variable subString.
Dim subString As String
subString = LeftBP$("ABC", 2)
Print subString$  ' Output:  "AB"