cara membuat pilihan di turbo pascal

assalamu'alaikum wr.wb.
 kali ini saya akan membahas bagaimana cara membuat menu pilihan pada aplikasi turbo pascal menggunakan codingan "if else"yang kalo di bahasa indonesiakan berarti jika yang lain,menu pilihan ini membuat kita lebih gampang dalam membuat aplikasi daripada anda harus membuat aplikasinya satu-satu.

baca juga

• Membuat Aplikasi Konversi Mata Uang Dengan Visual Studio
• Membuat Aplikasi Konversi Suhu Menggunakan Pascal

 sebelum ke pembahasan bagaimana cara membuat menu anda harus tahu bahawa bahasa yang kita gunakan sekarang ini adalah bahasa pascal yang terkategorikan bahasa pemograman tingkat atas,yang di maksud bahasa pemograman tingkat atas disini bukan berarti bahasa yang sulit digunakan melainkan bahasa pascal ini bahasa yang pailing mudah digunakan karena bahasanya banyak yang menggunakan bahasa manusia tapi akan terasa agak sulit jika kita tidak bisa berbahasa inggris.

oke kita langsung saja ke pembahasannya:

• pertama-tama anda buka dulu aplikasi turbo pascalnya
• kemudian klik file lalu pilih new
• setelah itu masukan koding di bawah ini:

program penjualan;

var baju, celana, jumlah :real;

pilih :integer;

begin

writeln('===========Konversi Suhu=========');

writeln('1.baju');

writeln ('2.celana');

write('pilih barang yang anda beli    :'); readln(pilih);

if (pilih=1) then

begin

writeln('=============baju============='); 

write('masukan jumlah barang   :'); readln(baju);

jumlah :=baju * 30000;

writeln('jumlah yang harus anda bayar            :',jumlah:0:0);

readln;

end

else if (pilih=2) then

begin

writeln('============celana===========');

write('masukan jumlah barang      :'); readln(celana);

jumlah :=celana * 50000;

writeln('jumlah yang harus anda bayar       :',jumlah:0:0);

readln;

end

else

begin

writeln('tidak ada pilihan');

readln;

end

end.

• setelah anda selesai memasukan kodingnya anda pilih run atau anda tekan CTRL+F9 (bila aplikasi tidak berjalan berarti ada kesalahan penulisan ataupun ada titik atau koma yang tidak terketik)
• bila berjalan anda coba,dan bila berhasil maka akan seperti gambar dibawah

penjelasan koding/skript diatas:

• program penjualan:berfungsi untuk memberi nama program
• var:berfungsi untuk memasukan variabel yang akan anda gunakan
• integer:berfungsi memberi jenis variabel berupa angka
• real:berfungsi memberi jenis variabel berupa bilangan bulat
• write:berfungsi untuk menuliskan outputdengan posisi awal – posisi selanjutnya terletak pada akhir output yang ditampilkan pada baris yang sama
• writlen:berfungsi untuk menuliskan output dengan posisi awal – posisi selanjutnya, terletak pada awal baris berikutnya

Nb:bila ingin bisa dan mengerti jangan sekali-kali anda copy paste script diatas,lebih baik anda print atau foto kemudian anda tulis kembali.

sekian tutorial dan penjelasan tentang cara membuat aplikasi konversi dengan pascal,bila ada saran,kritik ataupun koreksi silahkan berkomentar.

Semoga bermanfaat

Read More

Membuat Aplikasi Konversi Mata Uang Dengan Visual Studio

Assalamualaikum Wr.Wb.
kali ini saya akan membahas bagaimana cara membuat aplikasi konversi mata uang menggunakan aplikasi visual studio (visual basic),yang sebelumnya juga saya sudah membahas bagaimana cara membuat aplikasi konversi suhu menggunakan visual studio,di visual studio ini bahasa pemrograman yang dipakai adalah bahasa pascal,ada baiknya sebelum anda memulai membuat aplikasi di visual studio (visual basic) terlebih dahulu anda harus menguasai atau memahami bahasa pemrograman yang akan kita gunakan yaitu bahasa pascal,walaupun dalam pembuatan aplikasi di visual studio (visual basic) drag and drop,namun di dalam pembuatannya juga terdapat koding mengoding dan bila anda belum menguasainya aplikasi pun akan sia-sia

Sebelum memulai ada baiknya anda menguasai:

•  Cara Membuat Aplikasi dasar Menggunakan Turbo Pascal
•  Membuat Aplikasi Konversi Suhu Menggunakan Pascal

 Ada beberapa hal yang harus anda persiapkan antara lain:

1. pastinya pc atau laptop
2. aplikasi Visual Studio(visual basic)
3. fokus dan metal (karena bila ada kurang satu titik saja pada koding bisa berpengaruh pada aplikasi)

oke,bila anda sudah menyiapkan hal yang diatas dan sudah menguasai bahasa pascal kita mulai saja tutorial dan pembahasannya:

• pertama anda buka aplikasi Visual Studio (visual basic)
• klik gambar di kiri atas gambar kemudian pilih visual basic kemudian klik dua kali pada window forms aplicattion seperti gambar dibawah ini:

• setelah anda klik window forms aplication maka akan terbuka form baru yang siap kita edit.
• bila anda ingin mempercantik aplikasi yang anda buat anda cari panel di bagian tolbox untuk. mengubah background sesuai dengan ukuran yang kita inginkan,setelah ketemu panel di bagian tolbox anda klik dua kali setelah muncul di bagian forms,sesudah muncul di forms anda sesuaikan ukurannya dan klik pada bagian panel jika anda ingin merubah warnanya dan cari backcolor pada bagian properties dan anda ganti warnanya sesuai dengan keinginan anda.
• bila anda ingin menambahkan kata-kata anda cari labels pada toolbox dan klik dua kali,masukan kata yang ingin anda tampilkan dengan cara mengetikannya di text bagian bawah di bagian properties,dan jika anda ingin merubah gaya text dan ukuran textnya anda cari font di properties.
• kemudian anda masukan kata input atau apapun terserah anda,cara memasukan katanya sama seperti yang diatas,setelah anda masukan silahkan sesuaikan tempatnya.
• setelah itu anda masukan textbox dengan cara mencarinya di bagian toolbox dan klik dua kali,sesuikan tempat dan ukurannya sesui dengan keinginan anda,setelah sudah dimasukan anda klik pada bagian textbox dan rubah text bagian atas di properties dan rubah menjadi "input"teks ini berfungsi untuk bagian koding.
• setelah itu anda masukan button dengan cara mencarinya di bagian toolbox dan rubah text bagian bawah menjadi hitung atau apapun terserah anda.
• kemudian anda cari kembali groupbox pada toolbox dan ganti nama text bawahnya menjadi "hasilnya"
• setelah itu anda buat text lagi dari labels rubah menjadi sinbol "$" untuk menyimbolkan dolar cara merubahnya sama seperti diatas
• kemudian anda buat lagi text dari labels di bagian toolbox,dan rubah text bagian bawahnya menjadi "0",tp kali ini text bagian atas di bagian propertiesnya juga di rubah menjadi output untuk menghasilkan jumlah konversi mata uangnya.
• setelah itu anda klik dua kali button yang ada di formsnya untuk memasukan kodingnya sehingga akan muncul forms koding button seperti gambar di bawah:

• bila sudah muncul silahkan anda tambahkan koding seperti di bawah ini:

 output.Text = Convert.ToDouble(Val(input.Text) / 13000)

• bila sudah coba anda jalankan aplikasinya dengan cara menekan tombol play di atas,bila aplikasi mendapat peringatan berarti koding anda ada yang salah.bila jalan maka akan seperti gambar di bawah ini:

• dan tadaa,aplikasi anda sudah jalan!!

penjelasan koding diatas:
" output.Text"koding ini adalah nama dari labels yang tadi kita beri nama output
"Convert.ToDouble"koding ini berfungsi agar output ada 0 komanya
"Val"koding ini adalah singkatan dari value
"input.Text"koding ini adalah nama dari textbox yang tadi kita beri nama input
 " / 13000"koding ini adalah rumus dari konversi mata uang rupiah - dollar

sekian tutorial dan penjelansan dari saya,bila ada saran,koreksi maupun kritik silahkan berkomentar
Semoga bermanfaat!!

Read More

Membuat Aplikasi Konversi Suhu Dengan Visual Studio (visual Basic)

Assalamu’alaikum Wr.Wb.
Kali ini saya akan membahas bagaimana caranya membuat aplikasi konversi suhu dengan menggunakan aplikasi Visual Studio (Visual Basic),bahasa pemrograman yang digunakan di  aplikasi Visual Studio adalah bahasa pascal,maka dari itu anda harus menguasai dahulu bahasa pascal sebelum memulai membuat aplikasi di aplikasi Visual Studio (Visual Basic),ada baiknya sebelum anda memulai membuat aplikasi di aplikasi Visual studio,lebih baik anda belajar mebuat aplikasi di aplikasi Turbo Pascal terlebih dahulu,untuk tutorialnya bisa anda lihat di artikel blog saya sebelumnya.
Sebelum memulai anda harus menguasai yang di bawah ini:

• Cara Membuat Aplikasi Dasar Menggunakan Turbo Pascal
• Cara Membuat Aplikasi Konvesrsi Suhu Menggunakan Pascal

Ada beberapa hal yang harus anda persiapkan diantaranya seperti yang saya cantumkan di bawah ini:

1. Tentunya anda harus menyiapkan pc/laptop 
2. Aplikasi Visual Studio
3. Fokus dan mental (karena bila ada kesalahan di koding bias mempengaruhi aplikasi)

Bila anda sudah mempersiapkannya mari kita mulai saja tutorial dan pembahasannya 

• Pertama-tama anda buka aplikasi Visual Studio(Visual Basic)  

•  Lalu anda klik gambar di pojok kiri atas,setelah muncul kotak dialog anda pilih visual basic kemudian anda klik dua kali di bagian “window forms application” seperti gambar di bawah ini

 

• Bila sudah maka akan tampil form kosong yang siap kita edit 
•  bila form baru sudah tampil anda bias mengubah nama program sesuai keinginan anda dengan cara mengubah nama teks di bagian properties tapi perlu anda ingat yang dig anti hanya bagian teks yang di bawahnya saja 
•  bila anda ingin mempercantik aplikasi yang anda buat,silahkan anda cari panel di bagian toolbox dan klik dua kali untuk mewarnai background aplikasi dengan ukuran sesuai yang anda inginkan,untuk mengganti warnanya anda cari background di bagian properties tapi anda harus klik panelnya dahulu sebelum menganti warnanya,kemudian anda beri nama sesuai keinginan anda dengan cara mengklik dua kali label di bagian toolbox,bila ingin mengetik nama yang anda inginkan klik label yang ada di form tadi kemudian cari teks yang di bawah di bagian properties,bila mau memngubah ukuran,type dan tebalnya anda cari font di bagian properties seperti gambar di bawah ini.

• kemudian anda klik dua kali label dan anda beri nama pilihan atau apapun terserah anda 
•  setelah itu anda cari combobox di bagian toolbox dan klik dua kali,kemudian drag and drop di bagian yang anda suka,untuk kali ini anda rubah bagian teks yang di atas yang ada di bagian properties dengan nama “pilihan”(ingat ini sangat penting,karena untuk di masukan di bagian kodingnya),setelah sudah diberi nama anda beri pilhan dengan cara cari “autocomplet(collection)” di bagian properties dan anda isikan sesuai keinginan anda,karna saya hanya mengkonversi Celcius ke Reamur dan Reamur  ke Celcius yang saya singkat menjadi CeltoRe da RetoCel,namun bila anda mau menambahkan konversi suhu anda bisa tambahkan lagi,dan contohnya seperti gambar yang dibawah ini:

• setelah itu anda klik lagi labels dan beri nama input caranya seperti label sebelumnya 
•  setelah itu anda cari lagi text box di bagian toolbox dan sesuaikan posisinya  sesuai dengan keinginan anda dengan cara mendrag and drop dan anda beri nama “input” di bagian text yang atas di bagian properties 
• setelah itu anda cari lagi button di bagian toolbox dan anda bias ganti nama dengan cara merubah text yang dibawah yang ada dibagian properties sesuai keinginan anda,namun disini saya beri nama dengan nama “Hitung” 
•  kemudian anda cari lagi groupbox di bagian toolbox dan anda sesuiakan posisinya,dan anda beri nama sesuai keinginan anda di bagian teks yang di bawah sesuai keinginan anda,namun saya member nama dengan nama “Hasil” 
•  kemudian anda cari lagi labels di bagian toolbox dan rubah text yang bawah dengan “0” dan text bagian atas dengan nama “output” untuk menampilkan hasil dari konversi. 
• setelah itu anda klik dua kali button yang ada di form tadi maka akan berpindah ke halaman koding button,setelah anda sudah di bagian koding button silahkan anda masukan koding di bawah iniif pilihan.Text = ”CeltoRe” then 
                 output.text = val(input.text) * 4/5
  Elseif pilihan.Text = “RetoCel” then 
                 output.text = val(input.text)* 5/4
  bila anda mau menambah konversi lagi anda tingal tambahkan kodingnya lagi seperti diatas dan masukana rumusnya sesuai konversi suhu yang anda inginkan,dan contoh gambarnya dibawah ini:

• setelah itu anda coba aplikasi yang anda buat dengan cara mengklik tombol play yang ada di atas,dan aplikasi anda dimulai seperti gambar di bawah ini:

Penjelasan Koding diatas

“if pilihan.Text = ”CeltoRe” then” koding ini dimaksudkan bila anda memilih CeltoRe di bagian pilihan maka akan memulai program CeltoRe.

“output.text = val(input.text) * 4/5”koding ini berfungsi untuk memasukan rumus dari CeltoRe

“Elseif pilihan.Text = “RetoCel” then” koding ini dimaksudkan bila anda memilih RetoCel di bagian pilihan maka akan memulai program RetoCel.

“output.text = val(input.text)* 5/4” koding ini berfungsi untuk memasukan rumus dari RetoCel

Walaupun kodingnya tidak serumit seperti di aplikasi Turbo pascal yang semuanya full koding tapi ada baiknya anda harus menguasai dulu aplikasi Turbo pascal agar memudahkan membuat dan memahami koding di aplikasi Visual Studio (Visual Basic).

Demikian tutorial dan penjelasan mengenai membuat aplikasi konversi suhu di Visual Studio (Visua Basic),bila ada kritik,koreksi ataupun saran silahkan berkomentar.

Semoga bermanfaat!!

Read More