Get Lost in Sabang

Gambar
Berpetualang di Titik Nol KM Indonesia LIBURAN. Apa sih yang ada dibenak kalian kalau mendengar kata liburan? Pasti menyenangkan kan? tapi nyatanya gak semua liburan itu menyenangkan loh apalagi kalau kelamaan, liburan yang gue kira cuman 3 minggu ternyata sebulanan ini, awalnya gue habisin dengan jalan-jalan bareng temen gue ke bogor tapi itu juga cuman sehari dan sekali seminggu. Minggu pertama dihabiskan dengan wisata kuliner, waktu itu gue lagi kepengen banget makan ayam doyong gara-gara nonton jwestbros di youtube, akhirnya kesampean namun kurang puas karena, warung ayam doyong yang dikunjungi gue berbeda sama yang jwestbros kunjungi, soalnya ayamnya beda gitu terus gue dan temen gue memutuskan untuk lanjut ke surken beli martabak dewa yang ada di jwestbros dalam episode sama. Setelah mencoba martabaknya ternyata worth it lah perjuangan ngantrinya sampai hampir sejaman kurang dan harganya yang cukup mahal sih menurut gue yaitu 45 ribu. Minggu kedua. kali ini gue dan teman-t

LAB-TI 1

Entri kali ini berisikan Act1 dan LA1 dari Lab-TI: Pengenalan Visual Basic 6.0, jika ada kesalahan mohon dimaklumi suhu




Contoh membuat login pada visual basic




LAPORAN AKHIR PRAKTIKUM


Mata Praktikum                    : Algoritma dan Pemograman 2A
Kelas                                      : 1IA16
Praktikum ke-                        : 1
Tanggal                                 : 13 Maret 2017
Materi                                     : Pengenalan Visual Basic
NPM                                       : 54416852
Nama                                      : Muhammad Ficki
Ketua Asisten                       : Fifi Meilani
Paraf Asisten                        :
Nama Asisten                       :
Jumlah Lembar                    : 7 Lembar






LABORATORIUM TEKNIK INFORMATIKA
UNIVERSITAS GUNADARMA
2016


            Pertemuan pertama ini membahas tentang membuat program sederhana dengan visual basic. Visual basic yang digunakan adalah 6.0.
Listing Program
Form
Private Sub Form_Load()
Label1.Caption = "Masukkan Alas dan Tinggi Segitiga"
Label2.Caption = "Alas"
Label3.Caption = "Tinggi"
Text1.Text = clean
Text2.Text = clean
Command1.Caption = "Hitung"
Command2.Caption = "Reset"
Label4.Caption = clean
Label5.Caption = "Luas Segitiga yang dicari adalah "
End Sub

Command1(Hitung)
Private Sub Command1_Click()
Label4 = Text1.Text * Text2.Text / 2
End Sub

Command2(Reset)
Private Sub Command2_Click()
Text1.Text = clean
Text2.Text = clean
Label5 = "Masukkan ulang data"
Label4 = clean
End Sub

Logika Program

Buka Program Visual Basic 6.0, lalu akan muncul gambar seperti ini:






Pilih standard EXE, dan kemudian akan muncul jendela Form seperti ini:
Mulailah membuat program yang ingin dikerjakan, hal pertama yang dapat dilakukan adalah mengatur luas Form, lalu mulailah memasukkan content dengan cara mengklik gambar icon ini:
 Textbox, berfungsi untuk membuat teks yang dapat diubah-ubah
 Label, merupakan tool untuk membuat teks seperti judul, dan sebagainya. Label tidak bisa di ubah-ubah.
Picture Box, untuk menampilakan gambar pada form
 Command Button, merupakan tool untuk membuat tombol, seperti tombol OK, cancel, dan sebagainya.
            Tambahkan 5 Label yang akan digunakan untuk, Judul dan Keterangan (Alas, Tinggi, Luas, Hasil hitung). Setelah menambahkan label, tambahkan textbox disamping Label alas dan tinggi. Terakhir tambahkan 2 command button yang berfungsi untuk Hitung dan reset, Lalu ketik code nya seperti berikut:
Setelah code dimasukkan cobalah Run program, jika berhasil buat form semenarik mungkin dengan menambahkan gambar sebagai background, mengubah font dan lain-lain pada jendela properties, seperti ini:
Untuk mengatur tata letak tampil program setelah dirun, atur pada jendela layout:




  


Output Program


1.    Berikut adalah tampilan program setelah dijalankan:



2.    Program berhasil menghitung:


3.    Program me-reset data



Komentar

Postingan populer dari blog ini

Get Lost in Sabang

Pengantar Komputasi Modern: Komputer Kuantum

Penerapan Komputer Kuantum di Berbagai Bidang