Tuesday, April 19, 2011

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

No comments:

Post a Comment

Terima kasih atas komentar yang anda sampaikan , sehingga dapat menambah wawasan saya sebagai penulis dan membuat blog ini semakin berguna banyak orang