例: LenB function

' The length of an 8-character string, in bytes
Dim theString As String
theString$ = "alphabet"
Print LenB(theString$)	' Output:  16
' The number of bytes used to hold a Single variable
Dim singleVar As Single
Print LenB(singleVar!)	' Output:  4