penggunaan GO TO dalam turbo basic

else if lanjutan dari blog sebelumnya, disini masih membahas tentang program turbo basic menggunakan statement else if. Langsung saja kita ke TKP :D , berikut programnya :
Ketikkan pada turbobasic anda :
  1. cls
  2. print "/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\"
  3. print "Data pekerja PT. ISO YOH Kota Semarang "
  4. print "Tahun 2018"
  5. print "1.AJI REHAN DWI KESATRIA B H"
  6. print "2.ALI DWI YULIANTO"
  7. print "3.BAGAS DWI KUSYITO"
  8. print "4.DEWI KARUNIA LESTARI K"
  9. print "5.ENGGAR WULAN ASRI"
  10. print "6.FERIAN NIAGA ASIA D E"
  11. print "7.GALIH RIO PURNAWAN B S"
  12. input "Masukkan nama data yang akan anda cari:";P
  13. cls
  14. on P goto 1,2,3,4,5,6,7
  15. 1:
  16. print "Nama :AJI REHAN DWI KESATRIA BAJA HITAM"
  17. print "Alamat :jl. jayawijaya no 4, Semarang"
  18. print "Mulai bekerja : 21 desember 1998"
  19. end
  20. 2:
  21. print "Nama :ALI DWI YULIANTO"
  22. print "Alamat :jl.gang baru no.7, Semarang"
  23. print "Mulai bekerja :22 juni 2019"
  24. end
  25. 3:
  26. print "Nama : BAGAS DWI KUSYITNO"
  27. print "Alamat :jl.sendangraya, Semarang"
  28. print "Mulai bekerja :22 agustus 2019"
  29. end
  30. 4:
  31. print "Nama :DEWI KARUNIA LESTARI KUNCORO"
  32. print "Alamat :jl.raya ramai no.12, Semarang"
  33. print "Mulai bekerja :19 november 2019"
  34. end
  35. 5:
  36. print "Nama :ENGGAR WULAN ASRI"
  37. print "Alamat :perum rinjani blok f, Semarang"
  38. print "Mulai bekerja :20 oktober 2019"
  39. end
  40. 6:
  41. print "Nama :FERIAN NIAGA ASIA DAN EROPA"
  42. print "Alamat :jl.hujan rintik blok selasa, Semarang"
  43. print "Mulai bekerja :25 desember 2019"
  44. end
  45. 7:
  46. print "Nama :GALIH RIO PURNAWAN BANGGA SEKALI"
  47. print "Alamat :perum mendung blok tengah, Semarang"
  48. print "Mulai bekerja:3 januari 2020"
  49. end

Berikut tampilan dalam turbo basic:
Ups itu end di bagian terakhirnya tambahin sendiri ya... soalnya lupa gak aku screenshoot. Berikut tampilan hasil dalam turbo basic:
ini lanjutannya ya gaes :D,>>>>>
Hasil diatas saya memilih pilihan nomor 7, sehingga hasilnya sepertyi diatas ya gaes.....
Silahkan kalian coba program ini di turbobasic masing-masing dan tentukan pilihan anda di program ini, dan perhatikan hasilnya.
Demikian program ini saya buat dan silahkan dikembangkan menjadi program yang kalian inginkan , semoga blog ini membantu kalian dalam belajar program basic.
Silahkan bertanya di kolom komentar apabila kurang jelas yah.......

Komentar

  1. Wah keren nih. Ane nostalgia dengan Visual Basic juga.. Bahasa pemrograman.
    C++, Pascal, ada printf, scanf

    Makasih atas kunjungannya di mathcyber1997.com

    Sukses selalu

    BalasHapus
  2. Makasih infonya sangat berguna bagi saya yang masih awam pemrograman 😊

    BalasHapus

Posting Komentar

Postingan populer dari blog ini