Disini saya akan membuat project aplikasi parkir menggunakan aplikasi visual studio 2012 :
Pertama - tama saya akan membuat from , new project > pilih windows froms application.
Kedua saya akan mendesain form parkirnya, saya akan memakai :
- LABEL ( Nomor parkir, Lama parkir, Harga parkir/jam, Jam masuk, Jam keluar, Jenis kendaraan, Total bayar ), ada di toolbox.
- TEXTBOX
- RADIO BUTTON ( Mobil, Motor )
- BUTTON
- saya akan mengcoding radiobutton MOTOR sebagai berikut :
Private Sub RBMotor_CheckedChanged(sender As Object, e As EventArgs) Handles RBMotor.CheckedChanged
If RBMotor.Checked = True Then
TxtHrgp.Text = "2000"
TxtJenis.Text = "Motor"
End If
End Sub
- Lalu saya akan mengcoding radiobutton MOBIL sebagai berikut :
Private Sub RBMobil_CheckedChanged(sender As Object, e As EventArgs) Handles RBMobil.CheckedChanged
If RBMobil.Checked = True Then
TxtHrgp.Text = "5000"
TxtJenis.Text = "Mobil"
End If
End Sub
- Selanjutnya Saya Akan mengcoding button TOTAL sebagai berikut :
Private Sub BTotall_Click(sender As Object, e As EventArgs) Handles BTotall.Click
TxtTB.Text = CInt(TxtHrgp.Text) * CInt(TxtLP.Text)
End Sub
TxtTB.Text = CInt(TxtHrgp.Text) * CInt(TxtLP.Text)
End Sub
- Next saya akan mengcoding button BERSIHKAN sebagai berikut :
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
TxtNoKen.Text = ""
TxtHrgp.Text = ""
TxtJamMsk.Text = ""
TxtJamKel.Text = ""
RBMobil.Checked = False
RBMotor.Checked = False
TxtTB.Text = ""
TxtLP.Text = ""
TxtJenis.Text = ""
End Sub
TxtNoKen.Text = ""
TxtHrgp.Text = ""
TxtJamMsk.Text = ""
TxtJamKel.Text = ""
RBMobil.Checked = False
RBMotor.Checked = False
TxtTB.Text = ""
TxtLP.Text = ""
TxtJenis.Text = ""
End Sub
Setelah semuanya saya coding saya akan menjalankan program saya :
Diatas ini adalah output dari aplikasi yang tadi sudah saya buat,
Nah disini saya akan mengimport aplikasi saya biar keluar ke microsoft word dan microsoft excel
Yang pertama saya akan membuat aplikasi saya agar outputnya bisa ditampilkan di microsoft word :
Pertama kalian membuat microsoft wordnya dulu yaa
Lalu kita bikin bookmarksnya caranya yaitu klik insert > bookmark
Setelah membuat bookmark seperti contoh saya diatas , oiya jangan lupa yaa di tes dulu bookmarknya sesuai ga dengan keluarnya contoh saya seperti kita klik BJm lalu klik go to cursor akan langsung mengarah ke jam masuk itu contoh saya, saya akan menyimpan wordnya di ( D:tugas aldi\aldiansya ) dengan nama ( Parkingasoy ) jika sudah kita ke tahap selanjutnya
Lalu kita tulis codingan seperti yang dibawah ini , kita menulisnya di paling atas ya,
nah tulis seperti itu yaa lalu kita buka visual basicnya lalu pilih project > add reference kita klik
kita klik COM > cari micorsoft word seperti gambar dibawah ini yaa lalu kita centang jika sudah
ketemu microsoft wordnya lalu klik OK
Cuz kita mulai mengcoding di button wordnya yaa caranya doble klik ajadi button (word)
Dan ini hasil output yang ditampilkan di word
Lalu saya akan menampilkan aplikasi saya agar outputnya biar muncul di microsoft excel :
Di microsoft excel pun hampir sama, langkah pertama ane akan membuat datanya dulu lalu saya
simpan di (D:\tugas aldi\aldiansya) dengan nama ( excelqu )
Lalu kita menambahkan code tulisnya dibawah imports word yang kita buat tadi yaa
Setelah itu kita mengcoding di button excel dengan cara klik dua kali codenya sebagai berikut
Lalu kita start pojects kita seperti word tadi
Dan ini output project saya
Terima Kasih Yaa, Sekian Dan Terima Kasih ....










0 Comments for "Aplikasi parkir menggunakan aplikasi visual studio"