Copyright © 2013 by.Radinal S. Diberdayakan oleh Blogger.
Home » » Membuat aplikasi Rental |visual basic

Membuat aplikasi Rental |visual basic

Written By Unknown on Senin, 04 Februari 2013 | 2/04/2013 01:37:00 AM

Siang sobat, gimana kabarnya ne...? masih semangat kan belajar visual basic...?
sekarang saya akan ajak sobat semua untuk membuat aplikasi rental mobil, mana tau ada diantara sobat punya niat mau buka usaha rental mobil atau udah buka, ada baiknya sobat coba ne aplikasi yang satu,
yaitu : Aplikasi rental mobil by adi. [heheheheeeeeeeee]


Gambar berikut adalah contoh sederhananya :



buat gambar sepeti ^ diatas,
kemudian ===> get code


Private Sub cmdok_Click()
If cbomobil.Text = "Xenia" Then
 txtharga.Text = 300000 
End If
If cbomobil.Text = "Avanza" Then txtharga.Text = 400000 
End If
If cbomobil.Text = "Inova" Then txtharga.Text = 500000 
End If

End Sub Private Sub Form_Load()
cbomobil.AddItem "Xenia" 
cbomobil.AddItem "Avanza" 
cbomobil.AddItem "Inova"
End Sub

keterangan : untuk warna masukkan jenis mobil sobat.
                   untuk warna masukkan harga yang sobat tawarkan.

klik F5 untuk jalankan program, kayaknya paten dang..!
klo berhasil, seperti ini tampilannya sobat :


heheheeee..... selamat mencoba sobat..!

Download file here




 
Share this article :

0 komentar:

Posting Komentar

Terimakasih telah membaca Artikel ini, silahkan tinggalkan Pesan...
Salam Sejahtera :)

 
Support : TLDM | LLE | Simamora
Copyright © 2013. TLDM - All Rights Reserved
Template Created by Creating Website Published by Radinal S
Proudly powered by Blogger