Contoh Perintah Mid, left, Right Pada bascom

Contoh Program Bascom Untuk mengambil Nilai dari Kanan, Kiri, Tengah  

$regfile = "m8535.dat"      'untuk jenis Mikrokontroller yg digunakan'

$crystal = 8000000

Dim S As String * 15 , Z As String * 15

S = "ABCDEFG"            'Nilai Variabel S '

Z = Left(s , 5)                 'Z mengambil nilai S sebanyak lima Dari kiri'

Print Z                                                     'Tampilan keluar ABCDE

Z = Right(s , 3) : Print Z                         ' tampilkan nilai Z keluar adalah 3 dari kanan  yaitu GFE'

Z = Mid(s , 2 , 3) : Print Z                     'tampilkan nilai Z keluar adalah 2 dari kiri sampai dengan 3 nilAi      berikutnya  yaitu CDE'

End